منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال فى التيكست - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : سؤال فى التيكست (/showthread.php?tid=30220)



سؤال فى التيكست - احمد خطاب - 09-07-19

السلام عليكم 
ازاى لما تكون القيمة داخل التيكست اكبر من صفر يتم تلوين التيكست بلون احمر مثلا واذا كانت اقل من الصفر يتم تلوين التيكست بلون اخضر 
واشكركم


RE: سؤال فى التيكست - ابراهيم ايبو - 09-07-19

السلام عليكم ورحمة الله وبركاته
تفضل اخي الكريم له ثلاث حالات اضفت الحالة صفر يبقى ابيض
كود :
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
       If Val(TextBox1.Text) > 0 Then
           TextBox1.BackColor = Color.Red
       ElseIf Val(TextBox1.Text) = 0 Then
           TextBox1.BackColor = Color.White
       Else
           TextBox1.BackColor = Color.LightGreen
       End If
   End Sub




RE: سؤال فى التيكست - احمد خطاب - 09-07-19

اشكرك جداااااااااااااااااااااااااااااااااااااا اخى الفاضل وتحياتى وتقديرى لشخصكم الكريم وجعله الله فى ميزان حسناتكم


RE: سؤال فى التيكست - ابراهيم ايبو - 09-07-19

الحمد لله والشكر لله
 ولك اخي الكريم