关于在ACCESS中对变量引用时的引号处理,很多前辈都有论述
大致的情况如下:
数字型变量:"& 变量 & "
文本型变量:'"& 变量 &"'
日期型变量:#"& 变量 &"#
如:
dim TheID as long
TheID=1000
Me.Form.RecordSource = "Select * From 表1 Where 编号>" & TheID & " And 显示=-1"
(取表中编号>1000且显示为是的记录)
dim TheName as string
TheName="张三"
Me.Form.RecordSource = "Select * From 表1 Where 姓名='" & TheName & "'"
(取表中姓名为张三的记录)
Dim TheDate As Date
TheDate = Date
Me.Form.RecordSource = "Select * From Table1 Where 日期=#" & TheDate & "#"
(取表中日期等于当天的记录)

很多新手被这些新手整得头大,一会单引,一会双引,不知怎么回事,其实,我们应该换个角度来考虑一下变量的引用.
其实变量就是变量,它的值赋给它之后,它就代表那个值,至于一会单引,一会双引,主要是看接收变量的环境所致.
我们应该把引号看成与变量无关的东西,它其实是引用它的环境的东西.
上面说了,大致的情况是那样,那换句话说,就是不是定式.
如数字型变量:
dim TheID as long
TheID=1000
Me.Form.RecordSource = "Select * From 表1 Where 编号>" & TheID
(取表中编号>1000的记录)

dim BackColor as long
BackColor=16777215
Me.Label1.BackColor = TheColor
(把标签Lable1的背景色设为白色)
这里两个例子虽说是数字型变量,但引用的方法却有所变化,也可以通过.

文本型变量:
dim TheFiledName as string
TheFiledName="建单日期"
Me.Form.RecordSource = "Select *,"& TheFiledName &" As A From 表1"
(取表中所有字段值及把建单日期字段定义为别名A)
这个例子,虽说TheFileName为字符串变量,但用的地方不同,引号又不同.
也就是说,字符串变量如果做为查询的条件的话,必需要接受它的环境语句里添加'(单引号)来处理.
如上面变量TheName那个例子,最后的查询语句是:
Me.Form.RecordSource = "Select * From 表1 Where 姓名='张三'"
TheFiledName 这个例子,最后的查询语句是:
Me.Form.RecordSource = "Select *,建单日期 As A From 表1"

再如:
dim TheValue as long
TheValue=65465
msgbox "您当前定义的值为: "& TheValue
msgbox "您当前定义的值为: ("& TheValue &")."
(对一个值的Msgbox的两种不同情况,两种方法)

综上所述,概括一点,就是:变量就是变量,没什么神秘,引用的引号是根据环境不同而不同.