|
偶有一个查询叫查询日期: SELECT DISTINCT客户信息表.下传日期
FROM 客户信息表
WHERE 客户信息表.新机构号='8001';
单独运行查询可以得到一个字符值,如20051215
偶有一个窗体1,上面创建了一个文本框TEST1,控件来源为 [查询日期]!下传日期
还有一个列表框 LIST1,控件来源为空,行来源为 SELECT 查询日期.下传日期 FROM 查询日期 ORDER BY [下传日期];
运行窗体的结果为 TEST1那儿显示 #名称? (这是为什么?)
LIST1 那儿显示 20051215
但是当偶运行一段代码:
Function xxx()
On Error GoTo xxx_Err
Dim bool As Boolean
Dim date1, date2 As String
DoCmd.SetWarnings False
DoCmd.OpenForm "窗体1", acNormal, "", "", , acNormal
date1 = [Forms]![窗体1]![List1]
'date2 = [Forms]![窗体1]![text1]
MsgBox (date1)
'MsgBox (date2)
结果是date1 为空值NULL,这又是为什么呢? 请TX指教,谢谢!
|
|