11-12-19, 07:58 AM
انا متأكد ان الكود صحيح
لدي عدد 2 ليبل علي الفورم
ليبل 1 بيحمل قيمه 20 عند تحميل الفورم وليبل 2 بيأخذ قيمته من تكست بوكس
وعند الضغط علي الزر بيتم طرح قيمه ليبل 2 من ليبل 1
المشكله بقي انه عندما بيكون ليبل 1 بيساوي 8 وليبل 2 بيساوي 4 لم يتم الطرح وبيدخل علي جمله اليس
اين المشكله
لدي عدد 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