昨天才解决了SELECT中的时间变量语法,今天又碰到了字符串变量的问题。在进行了N次尝试后得出了以下的可以得出正确结果的语法。同时也是一个双重SELECT的语法。
Dim d1, d2 As Date
d1 = Date_quest_buy_buybl_start.Value.Date
d2 = Date_quest_buy_buybl_end.Value.Date
Dim sup As String
sup = ComboBox_quest_buy_buybl_supplyer.Text
OleDbConnection2.Open()
OleDb_quest_taobao_buybl.SelectCommand.CommandText = "select * from (select * from buy_bl where buy_date between #" + d1 + "# and #" + d2 + "#) where [supplyer] = '" + sup + "'" *这里的红色部分是关键,字段名要加[],后面的字符串变量是 一个单引号再加双引号和+ 变量名。[],' ', " " , + + 这4个符号缺一不可。 同时这也是一个双重SELECT的语句。
OleDb_quest_taobao_buybl.Fill(DataSet_quest_taobao_buybl1)
OleDbConnection2.Close()