منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

(10-02-23, 07:28 PM)Abdallah61 كتب : [ -> ]السلام عكليم
قمت بوضع جملة IF عند تغير القيمة في تكسيت بوكس
اذا كانت القمية اكبر من الموجود في Label فانه يعطي رساله خطأ
الكود يعمل عند اول رقم فقط 
مثال: اذا كانت القيمة الموجوده في Label هي 5 فاذا وضعت 7 يعطي رساله خطأ

الخطأ هنا: اذا كانت القيمة الموجوده في Label هي 5 فاذا وضعت 10 لا يعطي اي رسالة

PHP كود :

 Private Sub Qtytxt_TextChanged(sender As Object, e As EventArgs) Handles qtytxt.TextChanged


        If qtytxt.Text = Nothing Or qtytxt.Text = "0" Then
            totalGtxt.Text = "0"
        ElseIf qtytxt.Text > Label12.Text Then
            MsgBox("!قمت بأختيار قيمة اكبر من المشتراه")
            qtytxt.Text = ""
            qtytxt.Focus()

        Else
            Dim x As Integer = Val(Rebuy.DataGridView1(11, Rebuy.DataGridView1.CurrentRow.Index).Value)
            totalGtxt.Text = qtytxt.Text * x

        End If
    End Sub 


(10-02-23, 08:50 PM)asmarsou كتب : [ -> ]شكرا جدا جدا اخي الكود يعمل بكفائة