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

نسخة كاملة : تحديد أعمدة من الداتاغريد فيو
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم إخوتي الأعزاء



عندي داتاغريدفيو بها 6 أعمدة و عندي تكست بوكس  و عندي زر (بوتون)



أريد أن يصبح الزر غير مفعل ENABLED = FALSE عندما تكون الأعمدة من 2 إلى السادس فارغة لا بيانات فيها و عند العكس يكون هذا الزر مفعلا ENABLED = TRUE

و هذه العملية تحدث عند إدخال بيانات إلى التكسبوكس  TextBox4.TextChanged



شكرا مقدما 
سأضطر إلى الإستعانة بالأخ عبد الله الدوسري في حل هذه المشكلة
أين أنت يا عبد الله الدوسري ؟
وعليكم السلام
 عملت لك مثال في المرفقات
هل تقصد الحقول في الصف المحدد؟
لان بشكل عام طبيعي انه لن يتم تفعيل الزر  لاحتمالية وجود حقول بلا قيم.
ان وجدت الحل بمشاركة الاخ الكريم ابو انس شكر الله له فالحمدلله والحمدلله على كل حال (و نعوذ بالله من حال اهل النار) , وان لم تجدها فاظن انه يجب تحديد صف قبل تحديد الاعمدة.
وفق الله الجميع لكل خير.
حبيت اجهز مثال لتكون مشاركتي مفيدة اكثر


كلاس الفورم كامل كالتالي:
PHP كود :
Public Class Form1
    Dim index 
As Integer 1
    Private Sub gd
()
 
       Dim rows() As String = New String() {index"Row:" index40 index1000 index}
 
       Me.DataGridView1.Rows.Add(rows)
 
       index += 1
    End Sub
    Private 
Function IsOk(row As DataGridViewRow) As Boolean
        For Each cel 
As DataGridViewCell In row.Cells
            If String
.IsNullOrEmpty(cel.ValueThen
                Return False

            End 
If
 
       Next
        Return True
    End 
Function
 
   Private Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click
        gd
()
 
   End Sub
    Private Sub DataGridView1_MouseClick
(sender As ObjectAs MouseEventArgsHandles DataGridView1.MouseClick
        If e
.Button MouseButtons.Left Then
            If Not IsNothing
(sender.currentrowThen
                Me
.GroupBox1.Enabled IsOk(sender.currentrow)
 
           End If
 
       End If
 
   End Sub
End 
Class 
بسم الله
شكرا و حمدا لله رب العالمين
شكرا لأخ أبو أنس على المثال الجيد الذي حل المشكلة كما ينبغي ...
شكرا للأخ المتميز سعود على مشاركته التي حلت لي مشكلة أخرى
الحقيقة تنتابني مشاعر فياضة من الأخوة الإسلامية و أنا أرى إخوتي يتعاونون فيما بينهم