Dim filter As String="checked is null"
Dim StartDate As Date = e.Form.Controls("DateTimePicker1").Value
Dim jb1 As New SQLJoinTableBuilder("盘点单检查","R05_RetailShipment")
Jb1.C
Jb1.AddExp("本单单号","smartID")
Jb1.AddExp("本单日期","smartDate")
Jb1.AddExp("是否检查","checked")
Jb1.AddExp("检查日期", "#" & StartDate & "#" )
Jb1.Filter = ""& filter &""
jb1.Build()
MainTable = Tables("盘点单检查")
Tables("盘点单检查").visible = True
上述按钮控件代码执行后报错如:关键字 'As' 附近有语法错误。求老师帮忙看下是哪里的问题
[此贴子已经被作者于2019/6/21 16:24:09编辑过]