سوال در مورد لیست باکس

[reza.k1375]

سلام من میخوام طبق عکس وقتی که روی هر کدوم از گزینه های داخل لیست باکس کلیک میکنم یه عدد رو نشون بده.
در ضمن من میخوام که وقتی روی اولین اسم کلیک میکنم عدد 1 و وقتی رو دومین اسم کلیک میکنم عدد 2 رو نشون بده.
لطفا راهنمایی کنید.
http://up1.iranblog.com/images/yxx5vizoit5rptsr1f64.jpg

[محسن واژدی]

سلام
برای اینکار از کد زیر استفاده کنید:

Private Sub List1_Click()
Label2 = List1.ListIndex + 1
End Sub


موفق باشید