在窗體上繪製列表框，在窗體上繪製乙個列表框

1樓：匿名使用者

private sub form_load()list1.additem "item1"

list1.additem "item2"

list1.additem "item3"

list1.additem "item4"

end sub

private sub list1_click()list1.removeitem list1.listindexend sub

2樓：匿名使用者

i=0while i

end if

wend

3樓：vb妮可

private sub list1_click()

list1.removeitem list1.listindex

end sub

在窗體上畫乙個名稱為list1的列表框

4樓：匿名使用者

d。當你選中一項時，listindex會返回乙個整型值（未選中任何項時返回-1），用來標記選中了哪項（0第一項，1第二項），removeitem 用來刪除乙個項，前提是必須提供需要刪除的項的標記（整型值）。abc三個選項會發生錯誤，因為沒有提供正確的標記（整型值）。

希望能幫到你

vb怎樣在窗體上建立乙個驅動器列表框！大神，求幫助！

5樓：匿名使用者

在工具箱上有乙個名為：drivelistbox控制項，就是了；

用滑鼠雙擊該控制項圖示，就會在窗體上建立乙個該控制項。

窗體上有乙個名為list1的列表框（允許做多項選擇），乙個名稱為text1的文字框，三

在窗體中引入乙個文字框text1，在文字框下引入乙個列表框list1，單擊新增按鈕，將文字框中內

6樓：你猜我猜哇擦猜

如:第乙個窗體1即:form1的**:

private sub 窗體2_click()form1.hide

form2.show

end sub

第二個窗體2即:form2的**:

private sub 還回_click()form2.hide

form1.show

end sub

退出**:

private sub 退出_click()unload me '退出"

end sub

7樓：匿名使用者

private sub command1_click()if text1 = "" then msgbox "沒用內容，不與新增！」: exit sub

list1.additem text1

end sub

private sub command2_click()if list1.listindex thenlist1.removeitem list1.listindexelse

msgbox 「請選擇條目!"

end if

end sub

VB編寫程式 設計程式，當單擊窗體時，在窗體上顯示任意一

假設你的 路徑為d fafa.gif,如下 private sub form click picture1.picture iif picture1.picture loadpicture loadpicture d fafa.gif loadpicture end sub 這樣就可以單擊切換 了，...

請教 在窗體上每隔500毫秒顯示三種顏色（紅 綠 黃）之一，用vb怎樣寫

dim i 定義乙個變數來儲存事件的次數 private sub form load timer1.interval 500 每隔500毫秒計時器觸發一次事件，也就是每隔500毫秒顯示三種顏色 end sub private sub timer1 timer static times as inte...

可以在窗體模組的通用宣告段中宣告什麼

1 宣告乙個全域性 非陣列 變數。option explicit public a as double 它可在其它窗體以該窗體名。變數名使用。2 宣告區域性變數或陣列變數，見下面 option explicit public a as double 宣告全域性變數dim b 10 as single...