采煤工作面所有安全出口与巷道连接处20米范围内必须加强支护，锚杆巷道除外。

在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。
下列能正确实现上述功能的程序是 _________。

A．Private Sub List1_Click()
Label1.Caption=List1.ListIndex
End Sub

B．Private Sub List1_Click( )
Label1.Name=List1.ListIndex
End Sub

C．Private Sub List1_Click( )
Label1.Name=List1.Text
End Sub

D．Private Sub List1_Click()
Label1.Caption=List1.Text
End Sub