|
日期的问题是:在上一条记录输入时把输入的日期存入一日期类型的全局变量中,在新的记录输入时将该变量作为文本框的默认值,想法是如此,但出来的结果却不行,本来输入的2002-05-09,出来的却是1905-(后面的月和日记不清了),而用msgbox显示变量却没有问题,这是怎么回事?
组合框的问题是:在一个窗体FORM1上建了个组合框,名称是“油品名称”,里面有“液化气”、“汽油”、“柴油”、“润滑油”和“沥青”这几项,另有一个窗体(名为“销量”)中也有一组合框(“产品名称”),内容与上一组合框相同,并绑定到数据表的同名字段上。然后在FORM1上建了个按钮,根据向导选择了“窗体操作”之“打开窗体”、“打开窗体查找特定数据并显示”、“油品名称”与“产品名称”匹配。一切弄好后运行,在“油品名称”中选择了“一个,点击按钮后“销量”窗体是打开了,但出来的是新记录,而不是筛选后的含有“汽油”的记录,这是怎么一回事?另外,如何读取组合框的文本值(如“汽油”等)而不是数字?上述按钮的代码是:
Private Sub 命令4_Click()
On Error GoTo Err_命令4_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "销量"
stLinkCriteria = "[产品名称]=" & "'" & Me![油品名称] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_命令4_Click:
Exit Sub
Err_命令4_Click:
MsgBox Err.Description
Resume Exit_命令4_Click
End Sub
|
|