+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=46305)
تحديد أعمدة من الداتاغريد فيو - kebboud - 16-06-23
السلام عليكم إخوتي الأعزاء
عندي داتاغريدفيو بها 6 أعمدة و عندي تكست بوكس و عندي زر (بوتون)
أريد أن يصبح الزر غير مفعل ENABLED = FALSE عندما تكون الأعمدة من 2 إلى السادس فارغة لا بيانات فيها و عند العكس يكون هذا الزر مفعلا ENABLED = TRUE
و هذه العملية تحدث عند إدخال بيانات إلى التكسبوكس TextBox4.TextChanged
شكرا مقدما
RE: تحديد أعمدة من الداتاغريد فيو - kebboud - 16-06-23
سأضطر إلى الإستعانة بالأخ عبد الله الدوسري في حل هذه المشكلة
أين أنت يا عبد الله الدوسري ؟
RE: تحديد أعمدة من الداتاغريد فيو - ابو انس - 16-06-23
وعليكم السلام
عملت لك مثال في المرفقات
RE: تحديد أعمدة من الداتاغريد فيو - سعود - 17-06-23
هل تقصد الحقول في الصف المحدد؟
لان بشكل عام طبيعي انه لن يتم تفعيل الزر لاحتمالية وجود حقول بلا قيم.
ان وجدت الحل بمشاركة الاخ الكريم ابو انس شكر الله له فالحمدلله والحمدلله على كل حال (و نعوذ بالله من حال اهل النار) , وان لم تجدها فاظن انه يجب تحديد صف قبل تحديد الاعمدة.
وفق الله الجميع لكل خير.
RE: تحديد أعمدة من الداتاغريد فيو - سعود - 17-06-23
حبيت اجهز مثال لتكون مشاركتي مفيدة اكثر
كلاس الفورم كامل كالتالي:
PHP كود :
Public Class Form1
Dim index As Integer = 1
Private Sub gd()
Dim rows() As String = New String() {index, "Row:" & index, 40 + index, 1000 + 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.Value) Then
Return False
End If
Next
Return True
End Function
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
gd()
End Sub
Private Sub DataGridView1_MouseClick(sender As Object, e As MouseEventArgs) Handles DataGridView1.MouseClick
If e.Button = MouseButtons.Left Then
If Not IsNothing(sender.currentrow) Then
Me.GroupBox1.Enabled = IsOk(sender.currentrow)
End If
End If
End Sub
End Class
RE: تحديد أعمدة من الداتاغريد فيو - kebboud - 17-06-23
بسم الله
شكرا و حمدا لله رب العالمين
شكرا لأخ أبو أنس على المثال الجيد الذي حل المشكلة كما ينبغي ...
شكرا للأخ المتميز سعود على مشاركته التي حلت لي مشكلة أخرى
الحقيقة تنتابني مشاعر فياضة من الأخوة الإسلامية و أنا أرى إخوتي يتعاونون فيما بينهم