dim cn as odbcconnection
cn = new odbc connection(" driver = { Microsoft access driver(*。MDB)};uid = adminpwd =;Dbq=數據庫路徑\數據庫名稱。mdb”)
將tsql標註為字符串
tsql= "從[用戶]中選擇用戶名"
dim od as odbcdataadapter
dim ds as dataset =新數據集
od =新odbcdataadapter(tsql,cn)
外徑填充
listbox.items.clear
for i=0到ds . tables(0). rows . count-1
listbox.items.add(ds.tables(0))。行(I),I)
接下來我
大概就是這樣。希望對妳有幫助。