VB给动态建立的控件数组添加事件问题

[fsk33]

根据LISTVIEW里的数据数量（行数n），动态创建了相应的n个LABEL2控件数组（1-n），控件数组LABEL2（0）是手工创建的，其它LABEL（1-n）是用LOAD方法动态生成。
现在我想点击LABEL数组中一个控件时，比如点LABEL（n），则LISTVIEW相对应的第n个记录处于选中状态，我用SELECT CASE INDEX的方法是失败的，因为每次都不确定到底有多少行，不可能一直CASE到n行吧。
求大神给个方法或思路。
谢谢
Private Sub Label2_Click(Index As Integer)
VScroll1.SetFocus
Select Case Index
'Case 1
ListView1.ListItems(1).Selected = True
‘太多了，咋办？
End Select
End Sub

[milaoshu1020]

Private Sub Label2_Click(Index As Integer)
    VScroll1.SetFocus
    ListView1.ListItems(Index).Selected = True
End Sub

[fsk33]

引用 1 楼 milaoshu1020 的回复:

Private Sub Label2_Click(Index As Integer)
    VScroll1.SetFocus
    ListView1.ListItems(Index).Selected = True
End Sub

不得行啊

[fsk33]

引用 2 楼 fsk33 的回复:

[quote=引用 1 楼 milaoshu1020 的回复:]

Private Sub Label2_Click(Index As Integer)
    VScroll1.SetFocus
    ListView1.ListItems(Index).Selected = True
End Sub

不得行啊[/quote]可以的，谢谢