سوال در باره ی combo box

[Mr FTHEL]

سلام
من یک combo box ساختم با دستور additem بهش ایتم اضافه کردم حالا فرض کنید ایتم های 1 2 3 4 5 رو اضافه کردم حالا میخوام وقتی 3 سلکت میشه توی یک تکس بنویسه 3 و مثلا اگر 5 select میشه توی یک تکست بنویسه 5 چطوری میشه اینکارو کرد؟
ممنون

[arenaw]

سلام

Private Sub Combo1_Click()
Text1.Text = "Select " & (Combo1.ListIndex + 1)
End Sub

[just4froum]

با سلام :

Private Sub Combo1_Click()
Text1.Text = "Selected Item Is : " & Combo1.List(Combo1.ListIndex)
End Sub