Question

想在VB中写SQL语句，请问为什么会说关键字select附近有语法错误？

Dim sql As String
sql = "select 站号,时间," & Combo2.Text & " from test where 站号='" & Combo1.Text & "'And 时间>='" & DTPicker1.Value & "'And 时间<='" & DTPicker2.Value & "'"
Adodc1.RecordSource = sql
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
Adodc1.Refresh
想实现查询功能在DataGrid控件中显示查询结果，怎么做？

Answer 1

注意And 前面需要空格。
验证代码如下
Dim sql As String
sql = "select 站号,时间," & "Combo2.Text" & " from test where 站号='" & "Combo1.Text" & "'And 时间>='" & "DTPicker1.Value" & "'And 时间<='" & "DTPicker2.Value" & "'"
MsgBox(sql)

追问

好的，谢谢

Answer 2

应该是sql语句语法有问题.设立一个断点,取SQL的值再检查一下.