专家坐堂-[求助]窗口查询的相关问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- [求助]窗口查询的相关问题
各位老师中午好，不好意思我又来了

现在我要单独做一个查询窗口（档案明细查询），因为我刚开始启动这个窗口的时候不想让表加载数据，另外主窗口中又有关联表，因此没有将表绑定到明细表，而是将表定义为SQLQuery类型，并连接数据源。然后进行查询，通过查询将明细表中符合查询条件的数据在表中表示出来。以下是查询按钮的代码：

Dim filter As String

Dim dtp1 As WinForm.DateTimePicker

Dim dtp2 As WinForm.DateTimePicker

Dim cmb As WinForm.ComboBox

dtp1 = e.Form. Controls("起始日期").text

dtp2 = e.Form. Controls("结束日期").text

cmb = e.Form. Controls("档案类型").text

If dtp1 Is Nothing

Messagebox.show("请输入起始日期!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

Else If dtp2 Is Nothing

Messagebox.show("请输入结束日期!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

Else If cmb Is Nothing

Messagebox.show("请输入档案类型!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

End If

DataTables("档案明细查询_Table1").Fill("Select * From {档案管理明细} Where 归档日期 >= dtp1 And 归档日期 <= dtp2 And 档案类型 = cmb ","sqlserver",True)

请大家帮我看看哪地方有问题呀？