主题：填充数据

按钮中代码如下，但报错如图，请问老师如何解决?

Dim filter As String="checked is null"

Dim StartDate As Date = e.Form.Controls("DateTimePicker1").Value

Dim jb1 As New SQLJoinTableBuilder("盘点单检查","R05_RetailShipment")

Jb1.AddExp("本单单号","smartID")

Jb1.AddExp("本单日期","smartDate")

Jb1.AddExp("是否检查","checked")

Jb1.AddExp("检查日期",""& StartDate &"")  ‘检查日期列类型为日期时间

Jb1.AddExp("原因","null")

Jb1.Filter = ""& filter &""

jb1.Build()

MainTable = Tables("盘点单检查")
此主题相关图片如下：1561103262(1).jpg