تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تعديل الكود
#1
انا متأكد ان الكود صحيح 
لدي عدد 2 ليبل علي الفورم 
ليبل 1 بيحمل قيمه 20 عند تحميل الفورم وليبل 2 بيأخذ قيمته من تكست بوكس 
وعند الضغط علي الزر بيتم طرح قيمه ليبل 2 من ليبل 1 
المشكله بقي انه عندما بيكون ليبل 1 بيساوي 8 وليبل 2 بيساوي 4 لم يتم الطرح وبيدخل علي جمله اليس 
اين المشكله
كود :
 If Label1.Text < Label2.Text Then
           Dim sa As Integer = Label1.Text
           Dim s2 As Integer = Label2.Text
           Dim da As Integer
           da = sa - s2
           Label1.Text = (da)
       Else

           MsgBox("ليس لديك نقاط كافيه")
       End If
       
الرد }}}
تم الشكر بواسطة:
#2
عندك اثنين اخطاء , االاول في علامة < والثاني في عدم تحويل القيمة من string الى integer عن طريق Cint 

PHP كود :
   If CInt(Label1.Text) > CInt(Label2.TextThen
            Dim sa 
As Integer Label1.Text
            Dim s2 
As Integer Label2.Text
            Dim da 
As Integer
            da 
sa s2
            Label1
.Text = (da)
 
       Else

            MsgBox
("ليس لديك نقاط كافيه")
 
       End If 
الرد }}}
#3
(11-12-19, 10:16 AM)علي بنيان كتب : عندك اثنين اخطاء , االاول في علامة < والثاني في عدم تحويل القيمة من string الى integer عن طريق Cint 

PHP كود :
   If CInt(Label1.Text) > CInt(Label2.TextThen
            Dim sa 
As Integer Label1.Text
            Dim s2 
As Integer Label2.Text
            Dim da 
As Integer
            da 
sa s2
            Label1
.Text = (da)
 
       Else

            MsgBox
("ليس لديك نقاط كافيه")
 
       End If 
فعلا كان لازم احول القيمه الي انت علشان يقوم بالعمليه الحسابيه بشكل صحيح مش عارف وقعت مني ازاي النقطه دي 
شكرا لك اخي علي اخوك بقي لسه بيتعلم وبيستفاد منكم
الرد }}}



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم