مساعدة في جمل الشرط

لنفرض أن اسم المستخد مخزن في متغير اسمه مثلا UserName وText1 لإدخال الإسم

IF Text1.Text=""  Then 
     MsgBox "يجب إدخال اسم المستخدم"
     Exit Sub
End If
IF Text1.Text<>UserName Then
     MsgBox "اسم مستخدم خاطئ"
     Exit sub
End If

وأتمنى الإيضاح أكثر لنتمكن من المساعدة أكثر

بن ملعاط

مشكور اخوي على الرد

وبالنسبه للتوضيح اكثر القيم انا حاطتها في متغيرات بحيث لو دخل المستخدم قيمه غير اللى في المتغير راح تظهر له رسالة خطأ وابي اضيف بعد لو ماادخل المستخدم اي قيمه وضغظ زر موافق ابي تظهر له رسالة تقول مثلا يجب ادخال البيانات

لو ان اسم المستخدم في متغير وليكن username

والباسوورد في متغير وليكن bass

والهوية في متغير وليكن userid

if text1.text="" then msgbox("من فضلك أدخل اسم مستخدم")
exit sub
else
if text2.text="" then msgbox("من فضلك أدخل باسووردك")
exit sub
else
if text3.text="" then msgbox("من فضلك أدخل هويتك")
else
if text1.text= username and text2.text= pass and text3.text=userid then
'أكتبي هنا الشرط اذا كان الثلاثة صح
else
msgbox("من فضلك أدخل بيانات صحيح تأكد من الاسم او الباسوورد او الهوية")
end if
end if
end if

أتمني ان اكون افدتك