在窗体上画一个名称为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