سوالي در مورد چك باكس شدن در ListBox1

[sajjad_india]

سلام
سوالي دارم در مورد ليست باكس
ببينيد من 5 تا آيتم در ليست باك خودم دارم آنها رو بصورت چك باكس در آوردم
حالا ميخوام مثلا آيتم هاي 2 3 تيك خورده باشه يك كاري كنه ! اين كدش چطور ميشه ؟

آيتم ها در ليست باكس :
1
2
3
4
(( حالا مثلا 2 3 انتخاب بشن يه كاري كنه يا 4 و 1 انتخاب بشن يه كاري كنه ))‌

راهنمايي لازم رو ميكنيد ؟
ممنون ميشم از همه شما دوستان عزيز

[p_ooya]

اگر منظورتون رو درست متوجه شده باشم می تونید به سادگی مسئله رو حل کنید. یه procedure (رویه) بنویسید و در رویداد مربوطه‌‌ی تمام چک باکس‌ها، این رویه رو فراخوانی کنید. بعد در بدنه procedure با چند if تو در تو و یا case تمام حالات مد نظرتون رو مدیریت کنید. اگر سوالاتون چیز دیگه ای هست، لطفاً مطرح کنید.

[joker_pok]

من فکر می کنم لیست باکس نمیتونه هم چت باکس بشه هم حالت استاندارد فکر می کنم همگی یه شکل می شن یا چک باکس یا استاندارد اما اینکه هر کدوم یه کاری بکن آسونه

اینم کدش

Dim i As Integer
i = List1.ListIndex
Select Case i
Case 0
MsgBox "1"
Case 1
MsgBox "2"
Case 2
MsgBox "3"
Case 3
MsgBox "4"
End Select

[M.T.P]

برای تشخیص تیک خوردن آیتم های داخل List باید از خصوصیت Selected استفاده کنید.


If Lst.Selected(1) = True Then
MsgBox "true"
End If