[填空題] 在窗體上畫一個列表框、一個命令按鈕和一個標(biāo)簽。程序運行后，在列表框中選擇一個項目，然后單擊命令按鈕，即可將所選擇的項目刪除，并在標(biāo)簽中顯示列表框當(dāng)前
[填空題] 在窗體上畫一個列表框、一個命令按鈕和一個標(biāo)簽。程序運行后，在列表框中選擇一個項目，然后單擊命令按鈕，即可將所選擇的項目刪除，并在標(biāo)簽中顯示列表框當(dāng)前的項目數(shù)。
下面是實現(xiàn)上述功能的程序，請?zhí)羁铡?/p>
Private Sub Form_Load()
List1.AddItem "AAAAA"
List1.AddItem "BBBBB"
List1.AddItem "CCCCC"
List1.AddItem "DDDDD"
End Sub
Private Sub Command1_Click()
Dim L1 As Integer
L1= 【12】
If L1 ＞=0 Then
List1.RemoveItem 【13】
Labell.Caption= 【14】
Else
MsgBox("請選擇要刪除的項目")
End If
End Sub
正確答案：[12]List1.ListIndex [13]L1 [14]List1.ListCount解析：[分析]： 本題提供的程序包括兩個事件過程，其中Form Load事件過程用來向列表框中添加項目，而Command1_Click事件過程刪除列表框中被選擇的項目，并在標(biāo)簽中顯示列表框當(dāng)前的項目數(shù)，需要填空的代碼在這個事件過程中。為了刪除列表框中指定的項目，可以使用RemoveItem方法，其格式為：列表框名稱．RemoveItem 索引值 其中的“索引值”是項目的地址，列表框中的項目從0開始計數(shù)，被選擇
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。