[ابراهيم ايبو]

السلام عليكم اخي الكريم Dubai.eig
اولا للتذكير ان عبارة AndAlso تقوم بالتحقق من الشرط وعن اول قيمة False تتوقف عن التحقق وتحسب الحساب المنطقي
وهنا اريد ان أسألك هل تريد للشرط ان يكون مثلا( اكبر من واصغر من ) استخدم and ......??


اما جملة if  ان اردت كتابتها على سطر واجد فضع ( بعد كلمة then ثم msgbox على النحو التالي
بالمجمل هذا مافهمته منك تقبل تحياتي

كود :

If Val(TextBox1.Text) >= 7000 AndAlso Val(TextBox1.Text) <= 7070 Then : MsgBox("1")
       ElseIf Val(TextBox1.Text) >= 70000 AndAlso Val(TextBox1.Text) <= 70700 Then : MsgBox("2")
       ElseIf Val(TextBox1.Text) >= 7070 AndAlso Val(TextBox1.Text) <= 7300 Then : MsgBox("3")
       ElseIf Val(TextBox1.Text) >= 70700 AndAlso Val(TextBox1.Text) <= 73000 Then : MsgBox("4")
       End If