在窗体上画一个名称为Labell的标签和一个名称为Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label中显示所选中的项目，如下图所示。请在______和______处填入适当的内容，将程序补充完整。 Private Sub Form_Load（) List1.AddItem "北京" List1.AddItem "上海" List1.AddItem

Private Sub Form. load()

Listl.AddItem “北京”

List1.AddItem “上海”

List1.AddItem “河北”

End Sub

Private Sub ______()

Labell.Caption=______

End Sub

Private Sub Form_Load()

List1.AddItem "北京"

List1.AddItem "上海"

List1.AddItem "河北"

End Sub

Private Sub List ______()

LabeCaption = ______

End Sub

A．Private Sub Listl_Click() Labell.Capfion=Listl.Listlndex End Sub

B．PrivateSubLial click() Labell.Name=Listl.Listlndex End Sub

C．PrivateSubListl click() Labell.Name=Listl.Text End Sub

D．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub

在窗体上画一个名称为Listl的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为()。

A． Private Sub Listl_Click() Labell.Caption=Listl.ListIndex End Sub

B．Private Sub Listl_Click() Labell.Name=Listl.ListIndex End Sub

C．Private Sub Listl_click() Labell.Name=Listl.Text End Sub

D．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub

请在【 】和【 】处填入适当内容，将程序补充完整。 Private Sub Form_load() List1.Addltem"北京" List1.Addltem"上海" List1.Addltem"河北" End Sub Private Sub【 】() Label1.Caption=【 】 End Sub

能够正确实现上述功能的程序是()。

A．Privale Sub List1_Click（）

Label1.Caption=List1. ListIndex

List1.Removeltem List1.Text

End Sub

B．Private Sub List1_Click（）

Label1.Name=List1. ListIndex

List1.RemoveItem List1.Text

End Sub

C．Private Sub List1_Click（）

Label1.Caption=List1.Text

List1.RemovItem List1.ListIndex

End Sub

D．Private Sub List1_Click（）

Label1.Name=List1. Text

List1.RemoveItem List1. ListIndex

End Sub