+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] التحكم باسطر الجريد (/showthread.php?tid=2521)
التحكم باسطر الجريد - ABO.BANCIANA - 10-04-14
السلام عليكم ورحمة الله وبركاتة
لدى شاشة لادخال سندات صرف مخزن
يتم اضافة التكست الى الجريد عن طريق الكود
grid.AddItem Sn_Auo & vbTab & ITEMCODE.text & vbTab
[attachment=1662]
---------------------
اريد التحكم بعدد الاسطر المدخلة بالجريد ولتكن 15 سطر فقط
واظهار رسالة تفيد بعدم امكانية اضافة سطر اخر للجريد
مع العلم ان عند تحميل الفورم يكون عدد الاسطر للجريد 1
تحياتى
RE: التحكم باسطر الجريد - ABO.BANCIANA - 10-04-14
السلام عليكم
وجد الحل ..... اشكركم
قبل زر الاضافة يوضع الكود التالى
If grid.Row < 13 Then
grid.AddItem Sn_Auo & vbTab & ITEMCODE.text & vbTab
Else
MsgBox " The number of records available for input is (13).. ", vbInformation + vbOKOnly, " Information "
End If
تحياتى