VB的label控件数组问题，内详谢谢！

Question

有两个(或者几个)标签label1(0),label1(1)等，
有一个list1,其中有2个数0和1或者更多个数，
如果list1中选中的数是0，那么点label1(0)的时候，它的caption变成“好”，而点label1(1)的时候，两个标签都没变化，
如果list1中选中的数是1，那么点label1(0)的时候，两个标签都没变化，而点label1(1)的时候，label1(1)的caption变成“好”
请赐教！谢谢！
谢谢帮忙，不过，我无论点哪个label，都会有一个label变化，我想，如果点的不是希望变化的那个，两个都没有变化。也就是当list1为1的时候，我点第1个标签，两个标签都没有反应！不知能不能做到！

Answer 1

Private Sub Form_Load()
List1.AddItem "0", 0
List1.AddItem "1", 1
End Sub

Private Sub Label1_Click(Index As Integer)
If Index = List1 Then Label1(Index).Caption = "好"
End Sub

这样绝对可以……

Answer 2

我会VB,但是只是皮毛,所以我无法这样就准确地打出VB源代码来帮助你.不过很您很幸运,我依然可以100%地帮到您.
label1(0)的鼠标单击事件如下
select case list1
case 0
label1(0).caption = "好"
case 1

case 2
.
.
.
end select
label1(1)的鼠标单击事件如下
select case list1
case 0

case 1
label1(1).caption = "好"

case 2
.
.
.
end select