+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] جعل الجدول يقبل فقط 10 حقول (/showthread.php?tid=19402)
جعل الجدول يقبل فقط 10 حقول - Crazy_Vb.NeT - 25-02-17
السلام عليكم ورحمة الله وبركآته
رجاءا لدي استفسار فضلا في قاعدة البيانات من نوع اكسس المربوطة في VB.NET
وهو الاستعلام او كيفية جعل الجدول يقبل فقط 8 حقول ، كمثال الحقول الـ 8 التالية :
وعند محاولة ادخال حقل جديد بعد الـ 8 حقول يظهر رسالة بإنه لا يوجد مساحة كافية و الجدول مليئ بالبيانات.
RE: جعل الجدول يقبل فقط 10 حقول - sendbad100 - 25-02-17
السلام عليكم
حسب ما فهمت
اذا كمنت تستخدم DataGridView1
استخدم الكود التالي
PHP كود :
If Val(DataGridView1.RowCount) > 8 Then MsgBox("هنا ضع نص الرسالة ")
RE: جعل الجدول يقبل فقط 10 حقول - Crazy_Vb.NeT - 25-02-17
(25-02-17, 12:49 AM)sendbad100 كتب : السلام عليكم
حسب ما فهمت
اذا كمنت تستخدم DataGridView1
استخدم الكود التالي
والله الموفقPHP كود :
If Val(DataGridView1.RowCount) > 8 Then MsgBox("هنا ضع نص الرسالة ")
وعليكم السلام
الكود يعمل جيدا
كل الشكر والتقدير لك اخي الكريم
sendbad100
RE: جعل الجدول يقبل فقط 10 حقول - مساعدة - 25-02-17
السلام عليكم
إضافة لما ذكره الأستاذ sendbad100 بارك الله فيه
مشاركتي بدون إظهار رسالة، فقط تخفي سطر الإضافة عند وصول عدد الأسطر إلى 8 ويعود سطر الإضافة بمجرد حذف سطر (أي يصبح أقل من 8 أسطر)
فقط في حالة كنت تستخدم الإضافة والتعديل والحذف من نفس أداة الداتاجريد استخدم هاذين الحدثين
كود :
Private Sub DataGridView1_CellEndEdit(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
If Me.DataGridView1.Rows.Count > 8 Then Me.DataGridView1.AllowUserToAddRows = False
End Sub
Private Sub DataGridView1_RowsRemoved(sender As Object, e As DataGridViewRowsRemovedEventArgs) Handles DataGridView1.RowsRemoved
If Me.DataGridView1.Rows.Count < 8 Then Me.DataGridView1.AllowUserToAddRows = True
End Sub