1樓：匿名使用者
for i = 1 to list1.listitems.count'逐條判斷是否被選中，如果選中，得到該專案if list1.
listitems(i).selected = true then
stritem = list1.listitems(i)end if
next
vb程式設計如何將listbox中選中的多個選項新增至文字輸入框？ 50
vb6.0中如何以listbox中的選中項為資料庫的查詢條件
2樓：
sql = "select * from formqt where 地區 like '%" & combo3.text & "%'"
這是模糊查詢語法
請在以上語句後面新增條件，
sql = "select * from formqt where 地區='" & combo3.text & "' and 街道名稱='" & list1.list(list1.
listindex) & "'
在你使用查詢語句前,你需要處理 listbox 中獲取得的字串.可以使用下面的語句來獲取listbox控制元件中的字串
text1.text = list1.list(list1.listindex)
3樓：通才玩家
是不是sql = "select * from formqt where 地區 like '%" & combo3.text & "%'"第一個查詢條件？在listbox中列舉出來list.
additem rs!("地區")
再將 rs!地區 賦值給一個變數chaxun
第二個查詢條件sql = "select * from formqt where 地區 = ''chaxun''" and ...
4樓：
資料庫的結構是啥樣的？
vb 如何將listbox1 中選中的專案移動到 listbox2中？
5樓：匿名使用者
樓主沒有要求listbox1中的專案移動到listbox2中還保持之前的順序是不是，如果是的話，我就提供以下**，但是要加一個按紐，2個列表框
private sub command1_click()dim i as integer
for i = 1 to list1.selcountlist2.additem list1.list(list1.listindex)
list1.removeitem list1.listindexnext i
end sub
vb listbox控制元件中的某些項如何設定為預設選中？
6樓：網海1書生
如果是單項選擇的listbox，那麼只要把選項設為當前選項即可：
list1.listindex = 5 '把第6項設為預設選中如果是多項選擇的listbox（multiselect屬性不為0），則可以用selected屬性：
list1.selected(2) = true '第3項預設選中
list1.selected(4) = true '第5項也預設選中
vb中雙擊listbox中一項使其在文字框中顯示的程式
7樓：匿名使用者
新增窗體，新增listbox控制元件list1，新增文字框text控制元件text1,**如下：
private sub form_load()for i = 1 to 20
list1.additem "編號：" & inext i
end sub
private sub list1_dblclick()text1 = list1.list(list1.listindex)
end sub
執行後，達到你的要求，效果如下：
8樓：網海1書生
private sub list1_dblclick()
text1.text = list1.text
end sub
怎樣用按鍵獲取vb程式中listbox中的值
VB計時器，如何用VB程式做計時器？
前提是timer的interval已經設定為1000毫秒按鈕為陣列控制元件0.1或者其他。根據個數來看。private sub c1 click index as integer select case index case 1 timer1.enabled falsecase 0 timer1.e...
Excel中如何用VB實現這樣的條件隱藏
右鍵點該工作表的名字 在工作簿的左下方呢 檢視 貼上如下 private sub worksheet change byval target as range on error goto line1 if target.range a1 address am 1 then columns bu cj...
在中如何用鍵盤畫出直線,在word中如何用鍵盤畫出直線
在word中，用鍵盤畫抄出直線的法 1 一襲條bai細直線 du連zhi續輸入3個 後回車 2 一條實直線 按住shift鍵，連續輸入dao3個 後回車 3 雙直線 連續輸入3個 後回車 4 波浪線 連續輸入3個 後回車 5 點線 連續輸入3個 後回車 6 兩條細實線之間一條粗實線 連續輸入3個 後...