主题：[求助]刚才发的忘记图片了，大家再帮我看看吧

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

请大家帮我看看哪地方有问题呀？
此主题相关图片如下：111.png

Dim dtp1 As date

Dim dtp2 As date

Dim cmb As string

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

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

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

Dim filter As String

Dim dtp1 As Date

Dim dtp2 As Date

Dim cmb As String

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

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

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

If dtp1 = Nothing

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

    Return

Else If dtp2 = Nothing

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

    Return

Else If cmb = Nothing

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

    Return

End If

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

如果先不做这些判断，又报Select语法或者数据源的问题（如图222）

此主题相关图片如下：333.png

此主题相关图片如下：444.png


此主题相关图片如下：222.png

这么多问题，头都大了，帮主帮帮忙

日期类型是没问题了，但是又报Select语法或者数据源的问题

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

你把拼接的SQL语句 利用messagebox.show弹出来看看那