SQL语句中使用VB控件的属性或变量

Dim strSQL As String
strSQL= "select 口令 from 系统用户 where 用户名=' " & UserName & " ' "

        以上两句话的意思即为给字符串变量strSQL赋值，右边的值则是通过select语句实现。    
        在SQL语法中，字符串需要用单引号' '括起来，select语句应为：

select 口令 from系统用户 where 用户名='要搜索的字符串'

        由于要搜索的字符串UserName的值为变量，所以select语句被分解为三部分，即：

                select 口令 from系统用户 where 用户名='        

                UserName

               '

        而VB中的字符串需要用双引号" "括起来，中间用字符串连接符&串联起来。
        同样的，若变量的地方为某个控件的属性，则需要用同样的格式写，比如：

strSQL= "selec