السلام عليكم ورحمة الله وبركاته
كيفكم ... عساكم بألف صحة وعافية
كيف اضع كود يحسب القيمة هل هي بين رقمين ام لا
مثلا
عندي تكست
وعندي ليبل
اذا كانت قيمة التكست تتراوح بين 5 الى 10 ......... يكون لون الليبل اخضر
اما اذا كانت قيمة التكست اقل من 5 أو أكبر 10 ..... يكون لون الليبل أحمر
فأنا ماضبطت معي
وشاكر لكم مقدما
وعليكم السلام اهلا ابو عقيل
جرب الكود ده
For n = 0 To 5
Dim i
For i = 6 To 10
Dim o
For o = 11 To 1000
If Text1.Text = n Then
Label1.BackColor = vbRed
ElseIf Text1.Text = i Then
Label1.BackColor = vbGreen
ElseIf Text1.Text = o Then
Label1.BackColor = vbRed
End If
Next
Next
Next
انا اشوف هذه طريقه انشاء الله طيبه
يمكن تعديل الارقام من بين وبين
تحياتي.,,,
السلام عليكم
PHP كود :
Private Sub Command1_Click()
If Val(Text1.Text) > 10 Or Val(Text1.Text) < 5 Then
Me.Label1.BackColor = &HC000&
Else
Me.Label1.BackColor = &HFF&
End If
End Sub
عفوا عمور2016 ما شفت اجابتك
يعطيك العافية
الف شكر لكم
تمت التجربة ونجحت
الله يوفقكم جميعا
إضافة لما تقدّم به الإخوة الأفاضل جزاهم الله خير الجزاء .. من الممكن أيضا الاستغناء عن زر الأمر بهذا التغيير البسيط
إحتراماتي
كود :
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Val(Text1.Text) > 10 Or Val(Text1.Text) < 5 Then
Me.Label1.BackColor = &HC000&
Else
Me.Label1.BackColor = &HFF&
End If
End Sub
الف شكر لكم جميعا
ماقصرتوا معي
الله يوفقنا وإياكم