1樓：司馬塵戀
'定義一個字串變數 str
dim str as string
'給str賦值為一條sql查詢語句,從house,guestinfo,guest 表中查詢ding='1'且 house.nam=houseno 且 guestinfo.numb=guest.
numb 的記錄
str = "select * from house,guestinfo,guest where ding='1'and house.nam=houseno and guestinfo.numb=guest.
numb"
'定義一個資料庫記錄集myrs
dim myrs as adodb.recordset'例項化
set myrs = new adodb.recordset'設定資料集遊標儲存在客戶機的記憶體
myrs.cursorlocation = aduseclient'設定更新資料時使用樂觀鎖(可自己找找其定義)myrs.locktype = adlockoptimistic'設定資料遊標型別為動態(即時)
myrs.cursortype = adopendynamic'連線資料庫(資料庫連線:mycon),執行sql語句(str),查詢結果儲存在資料集myrs
myrs.open str, mycon
2樓：手機使用者
myrs.open str, mycon 開啟查詢到的 str，和後臺資料庫相連。
應有dim mycon as adodb.connection
3樓：匿名使用者
定義str為字元型變數
str為select語句，從house資料庫中選擇表guestinfo中ding=1同時滿足後兩個條件的欄位
固定的例項化語句，定義一個新的adodb記錄集遊標型別
是否鎖定
開啟符合條件的記錄集
vb語句中case is<0,1,2是什麼意思呢，求高手解答
4樓：匿名使用者
例如：select case x
case is < 0,1,2:
...end case
這段**相當於：
if(x < 0 or x = 1 or x = 2)...end if
5樓：匿名使用者
is可以等同於select case 後面那個引數
例如select case a
...case is>2 '就是a>2的意思
vb題vb題，求高手解答急急急急
6樓：新宇笑
（1）int((4-1+1)*rnd+1
（2）label1.text
vb中如何設定下拉選單框,並加入我想選擇的內容，求高手解答
7樓：匿名使用者
如果想加入的是固定不變的，可以點選下拉選單框的list屬性，逐個加入（按ctrl+enter）換行。
如果是動態的用以下**：
combo1.clear
combo1.additem "你要新增的內容" '如果多條，可以對這條語句進行迴圈操作
8樓：dl_會飛的青蛙
combo1.additem "fdafda", 0
直接加入item後面的專案 最後一個引數是index
我想知道這是什麼意思,我想知道半馬是什麼意思
愛你在心口難開。我想知道半馬是什麼意思 半馬，即半程馬拉松，又稱 二分之一馬拉松，英文 half marathon，目前國際上從眾增長最快的賽跑專案。路程長度是21.0975公里，或13.1英里。半程馬拉松的程長很有挑戰性，但對跑步者的要求不像全程馬拉松那麼嚴苛。通常，半程馬拉松會與全程馬拉松 有時...
我想知道這段話是什麼意思,我想知道下面這段話是什麼意思。？
這句話，完整翻譯過來就是 面對磨難，有的人哭天抹淚 抱怨 生活的不公平。而有的人在逆境中不忘自己遠大的 抱負 仍然用快樂 抱住 生活。面對前者，生活會 抱怨 地說 你將被我拋棄。面對後者，生活會高興地說 我將送你走向成功。我想知道下面這段話是什麼意思。源於 易經 的 集結 同人 和同 卦。同人於野，...
在vb中是什麼意思，VB中「 」是什麼意思？
運算 符用來對兩個數作除法並返回一個整數。語法result number1 number2 運算子的語法具有以下幾個部分版 部分 描述 result 必需的 任何數權值變數。number1 必需的 任何數值表示式。number2 必需的 任何數值表示式。說明在進行除法運算之前，數值表示式通過捨去小數...