اريد وضع اكثر من اشرط على المشروع ( If )

اخي الكريم

يمكن ذلك باستخدام if و elseif و end if

مثال

 if text1.text = "S.N1" then
	msgbox "OK"
elseif text1.text="s.N2" then 
   msgbox "OK"
elseif text1.text="s.N3" then 
   msgbox "OK"
elseif text1.text="s.N4" then 
   msgbox "OK"
else
  msgbox "Wrong Number"
end if

بس هذي طريقة طويلة اذا كان عندي مثلا 100 سريل

هل يوجد طريقة اسهل

اخي الكريم

في هذه الحالة ممكن ان تضع جميع الأرقام في ملف تكست او قاعدة بيانات تنزل مع البرنامج وارمي بها الويندوز بين الاف الملفات واجعل القراءة منها ومن ثم المقارنة

تحياتي

Select Case أفضل و أسرع فى الحالات دى.

أخ matrixyb أن كنت هتحطهم بملف نصى زى ما قال الأخ omani يبقى شفرهم.

و بعدين جرت العادة على أن الأرقام دى مش بتتسجلش انما لما المستخدم بيدخلها البرنامج بيشوف ان كان الرقم ده تنطبق عليه مواصفات معينة و لا لأ و ان كانت تنطبق عليه يبقى الرقم صحيح.