Dim da As String = "SELECT Count(檢測項目) FROM b where 檢測項目='cc'"
網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)建站!專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了白水免費(fèi)建站歡迎大家使用!
這句寫錯啦,你直接傳送的是檢測項目為字符串"cc"的參數(shù),并不是你程序?qū)懙腃C參數(shù)
改為:
Dim da As String = "SELECT Count(檢測項目) FROM b where 檢測項目='" cc "'"
建議通過程序組織的sql語句可以通過msgbox da 彈出來看看,這樣你較容易查出是什么錯誤,較長的就用textbox1.text=da來看了,不過記得設(shè)置斷點(diǎn)"exit sub"
使用ACCESS數(shù)據(jù)庫的日期列比較,應(yīng)為:
"select * from 表 where 日期列=" "#" cdate(textbox1.text) "#"
注意前后兩個“#”號
使用sqlserver
"select * from 表 where 日期列=" "'" cdate(textbox1.text) "'"
當(dāng)然日期格式要注意,如長短日期等。
日期期間:between 小日期 and 大日期(記得加#號)
vb中可以使用+連接字符串,
也可以使用連接字符串,
建議使用連接字符串,以區(qū)別數(shù)學(xué)運(yùn)算符+。
Provider=Microsoft.ACE.OLEDB.4.0;Data Source=|DataDirectory|\Temp\aaa.accdb;Persist Security Info=True
或
Provider=Microsoft.ACE.OLEDB.4.0;Data Source=|DataDirectory|\Temp\aaa.accdb;Persist Security Info=True
或
Provider = Microsoft.Jet.OLEDB.4.0;Data Source ="E:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Northwind.mdb"
需要注意的問題。
文件夾路徑中出現(xiàn)的空格處理,要加引號。
豎線是用來包括系統(tǒng)內(nèi)置路徑的,不能用作文件夾分隔符。
其它的沒有什么大問題。
Label3.Text = "ennum1 " * " ennum2 "=" "
改成:
Label3.Text =ennum1.tostring() "*" ennum2.tostring() "="
就可以了,你試試!