31-05-20, 01:56 PM
(آخر تعديل لهذه المشاركة : 31-05-20, 01:58 PM {2} بواسطة ahmedbezia.)
السلام عليكم اخوان الكرام
اين الخطئ في هد الكود من حين لاخر لاينفد الشرط حتي ولو كانت القيمة في تاكست 1 اكبر من القيمة في التاكست 2 والعكس
Dim dg As String
Dim dg2 As String
dg = TextBox1.Text
dg2 = TextBox2.Text
If dg > dg2 Then
MsgBox("الكمية المطلوبة اكثر من الموجودة في المخزون ")
ElseIf dg = ("") Then
MsgBox("اضف الكمية")
ElseIf dg = 0 Then
MsgBox("اضف الكمية")
Else
Form2.DataGridView1.CurrentRow.Cells(2).Value = dg
Form2.DataGridView1.AllowUserToAddRows = True
Close()
End If