1樓：
private sub command1_click()dim cn as adodb.connectiondim mysql as string
dim myrs as adodb.recordsetcn.cursorlocation = aduseclientcn.
connectionstring = "driver=;dbq=資料庫路徑及資料庫名"
mysql = "select 姓名 from 表名 where 學號='" & text1.text & "' "
set myrs = cn.execute(mysql)if myrs.recordcount > 0 thenmsgbox "姓名：
" & myrs.fields.item(0).
value & ""
end if
myrs.close
set myrs = nothing
end sub
2樓：匿名使用者
cn.cursorlocation = aduseclient這句刪掉試試看。
access資料庫查詢，怎樣實現ACCESS資料庫中的查詢
表1中出現，並且在表2中未出現過的應該是ccc和ddd，但是你給的結果是aaa和bbb，我也不確定你要的是表2中出現過的還是未出現過，所以兩個全給了。表1中出現，並且在表2中也出現過的 select 表1.姓名,表1.年齡 from 表1 right join 表2 on 表1.姓名 表2.姓名 表...
access資料庫多表查詢及匯出
不是高手 想試試syfjackey 163.com 如果能滿足要求會給你回覆，如果不行，繼續關注 信已收到，操作前確認 是否進行加密 hi我，我幫你一下吧。oracle資料庫多表連線查詢 select a.b.bma.bmname aname,bmb.bmname bname from a left...
利用vb對access資料庫增加新欄位
首先開啟資料來源，然後使用alter table語句即可，具體範例如下 set new adodb.connectionset rs new adodb.recordsetconstr driver microsoft access driver mdb dbq 資料庫路徑及專檔名 open con...