[填空題] 在窗體上畫一個(gè)列表框、一個(gè)命令按鈕和一個(gè)標(biāo)簽，其名稱分別為L(zhǎng)istl、Commandl和 Labell，通過屬性窗口把列表框中的項(xiàng)目設(shè)置為：“第一個(gè)項(xiàng)目”、“第二個(gè)項(xiàng)目”、“第三個(gè)項(xiàng)目”、“第四個(gè)項(xiàng)目”。程序運(yùn)行后，在列表框中選擇一個(gè)項(xiàng)目，然后單擊命令按鈕，即可將所選擇的項(xiàng)目刪除，并在標(biāo)簽中顯示列表框當(dāng)前的項(xiàng)目數(shù)，運(yùn)行情況如下圖所示(選擇“第三個(gè)項(xiàng)目”的情況)。下面是實(shí)現(xiàn)上述功能的程序，請(qǐng)?zhí)羁铡?/p>

Private Sub Commandl Click()

If Listl.ListIndex＞=______Then

Listl.RemoveItem ______

Labell.Caption=______

Else

MsgBox “請(qǐng)選擇要?jiǎng)h除的項(xiàng)目”

End If

End Sub

0 Listl.ListIndex Listl.ListCount

本題考查列表框的屬性，這也是歷年考試熱點(diǎn)。ListIndex屬性用來確定已被選中表項(xiàng)的位置，如果表項(xiàng)沒有被選中，其值為-1，故本處填0。表示當(dāng)某表項(xiàng)被選中。 由于ListIndex屬性用來確定已被選中表項(xiàng)的位置，故第10空應(yīng)填Listl.ListIndex。RemoveItem方法表示移除某個(gè)表項(xiàng)，Listl.ListIndex一個(gè)被選中的表項(xiàng)，符合題意。ListCount是列表框扣個(gè)很重要的屬性，它返回列表框中表項(xiàng)的數(shù)量。本處填Listl.ListCount，并將其值賦給Label1的Caption屬性。符合題意。