[al9atl]

(27-10-19, 01:49 AM)3booody كتب :

كود :

Select Case ComboBox1.Text
           Case "احمد", "محمد", "خالد"
               MsgBox("msg")
       End Select

شكرا لك اخيه هو المطلوب
ممكن عدبك بسؤال اخر
لو اضيف للكود اداة اخرة لشرط مثل اد كان
textbox1.text = "1"
و تم اختيار احمد من combobox تظهر الرسالة نعم 
Msgbox("نعم"(
و اد كانت textbox.text = "2" 
تظهر رسالة لا
Msgbox("لا"(
هل يمكن دمجها مع 

Case

جربت 

Case "احمد" and textbox1.text = "1"

لكن لم تعمل