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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=9140)

ما الخطء فى هذا الكود - مبتدئ - 03-06-13

كود :
Dim i As Integer
        If Label2.Text = i < 300 AndAlso i > 100 Then
            Label2.ForeColor = Color.Red
        End If


ما الخطء فى هذا الكود - سعود - 03-06-13

هل تريد ان تتحقق من اداة التسمية ام من المتغير i

ما الخطء فى هذا الكود - Easy4ever - 03-06-13

مبتدئ كتب :
كود :
Dim i As Integer
        If Label2.Text = i < 300 AndAlso i > 100 Then
            Label2.ForeColor = Color.Red
        End If

أفصل Label2.Text = i عن i < 300 بكلمة And

هذا الكود بعد التعديل

PHP كود :
Dim i As Integer
If Label2.Text = i And i < 300 And i > 100 Then
 
    Label2.ForeColor = Color.Red
 
End If 

ملاحظة لاتنسى إضافة قيمة لمتغير i

ما الخطء فى هذا الكود - مبتدئ - 03-06-13

سعود كتب :هل تريد ان تتحقق من اداة التسمية ام من المتغير i

Easy 4ever كتب :أفصل Label2.Text = i عن i < 300 بكلمة And

هذا الكود بعد التعديل

PHP كود :
Dim i As Integer
If Label2.Text = i And i < 300 And i > 100 Then
 
    Label2.ForeColor = Color.Red
 
End If 

ملاحظة لاتنسى إضافة قيمة لمتغير i
لم يعمل الكود اخى
اريد اذا كان العدد 100 لى 300 الون يتحول الى الاحمر مثلآ 150 200 288 299 الخخخخخ لغايت ما يوصل لى 300 بعد ال 300 يرجع الون اسود

ما الخطء فى هذا الكود - سعود - 03-06-13

كود :
if val(label1.text) >=100 and val(label1.text) <= 300 then
your code here
end if


ما الخطء فى هذا الكود - مبتدئ - 03-06-13

سعود كتب :
كود :
if val(label1.text) >=100 and val(label1.text) <= 300 then
your code here
end if
شكرآ اخى لقد عل الكود