اين الخطئ في هد الكود - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=35053) |
اين الخطئ في هد الكود - ahmedbezia - 31-05-20 السلام عليكم اخوان الكرام
اين الخطئ في هد الكود من حين لاخر لاينفد الشرط حتي ولو كانت القيمة في تاكست 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
RE: اين الخطئ في هد الكود - alshandodi - 31-05-20 لا تجعل القيمه string اجعلها integer RE: اين الخطئ في هد الكود - ahmedbezia - 31-05-20 (31-05-20, 02:23 PM)alshandodi كتب : مشكور اخي لاكن ادا كانت التاكست بوكس فترغة راح يطلع خطئ بما ان dg من نوع رقم ما الحل في رئيك RE: اين الخطئ في هد الكود - alshandodi - 31-05-20 اتمنى ان يكون هذا الكود ذو فائده .. - اذا كان اقل من 3 يضيف وينبه المستخدم انه قريب تنفذ الكمية - وعندما يصل 0 لا يضيف اي شي - إذا كانت اكبر من في المخزن لا يعمل شي كود : Sub checkqty() RE: اين الخطئ في هد الكود - Sorax - 01-06-20 PHP كود : Try |