【題目】在名稱為Form1的表單上添加一個名稱為L1的串列框，添加一個
' 名稱為Text1的文本框,添加兩個名稱分別為C1和C2的命令按鈕。
'【要求】
' ①通過屬性視窗給L1添加串列項“AAA”、“BBB”、“CCC”。
' ②設定C1和C2按鈕的標題分別為“添加串列項”和“洗掉串列項”。
' ③撰寫適當的事件程序，程式運行時，給文本框中輸入字串“DDD”
' 時，單擊“添加串列項”按鈕,把文本框中的內容添加到串列框中。單擊
' “洗掉串列項”把選中串列框中的串列項洗掉。
uj5u.com熱心網友回復：
代寫作業屬于收費專案uj5u.com熱心網友回復：
編程是option explicit
private sub C1_click()
L1.additem text1.text
end sub
private sub C2_click()
L1.removeitem L1.listindex
end sub
為什么在洗掉的時候就錯了?
uj5u.com熱心網友回復：
L1.removeitem L1.listindex改成
L1.removeitem 0
試試?
listindex在沒有選中串列元素的時候可能是-1.
uj5u.com熱心網友回復：
用這個試試：Option Explicit
Dim x As Integer
Private Sub C1_click()
L1.AddItem Text1.Text, L1.ListCount
x = L1.ListCount
End Sub
Private Sub C2_click()
L1.RemoveItem (x - 1)
x = x - 1
End Sub
uj5u.com熱心網友回復：
listindex是指你在串列框選中的項的索引，你不選中的話默認值為-1
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/30220.html
標籤：VB基礎類
上一篇：查詢選修全部課程的學生姓名