تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اريد مساعدة بسيطة فى DataGridView
#1
السلام عليكم

لقد قمت بعمل مشروع يعرض اسماء الاعمدة لقاعدة بيانات فى DataGridView و عند الضغط على الخلية فى صف معين
يحفظ اسم العمود فى متغير و يعرضة فى textbox كما بالصورة
   
المطلوب هو عند الغاء التحديد يحذف اسم العمود و ال (,) من المتغير
   
و هذا هو المشروع 
.rar   test.rar (الحجم : 112.39 ك ب / التحميلات : 16)
الرد }}}}
تم الشكر بواسطة: سعود
#2
اضف زر امر واكتب بحدث النقر له الكود التالي:
PHP كود :
 For a 0 To DataGridView1.Rows.Count - (IIf(DataGridView1.AllowUserToAddRows21))
 
           If DataGridView1.Rows(a).Cells(2).Value True Then

                If TextBox1
.Text.Trim.ToLower.Contains(DataGridView1.Rows(a).Cells(0).Value.ToString.ToLower ",") = False Then
                    TextBox1
.AppendText(DataGridView1.Rows(a).Cells(0).Value.ToString ",")
 
               End If

 
           Else
                TextBox1
.Text TextBox1.Text.Replace(DataGridView1.Rows(a).Cells(0).Value.ToString ","String.Empty)
 
           End If
 
       Next 

اذا لم ترد هذه اخبرني افكر بطريقتك


======================================
///////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\
======================================


ياسلام .. الحيلة ان جت فجاة ونجحت حلوةSmile
في نفس حدث DataGridView1_CellClick
استبدل ماعندك بالتالي:
PHP كود :
       If e.ColumnIndex 2 Then
            If DataGridView1
.Rows(e.RowIndex).Cells(2).Value True Then
                DataGridView1
.Rows(e.RowIndex).Cells(2).Value False
            Else
                DataGridView1
.Rows(e.RowIndex).Cells(2).Value True
            End 
If


 
           If DataGridView1.Rows(e.RowIndex).Cells(2).Value True Then
                If TextBox1
.Text.Trim.ToLower.Contains(DataGridView1.Rows(e.RowIndex).Cells(0).Value.ToString.ToLower ",") = False Then
                    TextBox1
.AppendText(DataGridView1.Rows(e.RowIndex).Cells(0).Value.ToString ",")
 
               End If
 
           Else
                TextBox1
.Text TextBox1.Text.Replace(DataGridView1.Rows(e.RowIndex).Cells(0).Value.ToString ","String.Empty)
 
           End If
 
       End If 
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: mohamed haroon
#3
(20-10-15, 06:47 PM)سعود كتب : اضف زر امر واكتب بحدث النقر له الكود التالي:
PHP كود :
 For a 0 To DataGridView1.Rows.Count - (IIf(DataGridView1.AllowUserToAddRows21))
 
           If DataGridView1.Rows(a).Cells(2).Value True Then

                If TextBox1
.Text.Trim.ToLower.Contains(DataGridView1.Rows(a).Cells(0).Value.ToString.ToLower ",") = False Then
                    TextBox1
.AppendText(DataGridView1.Rows(a).Cells(0).Value.ToString ",")
 
               End If

 
           Else
                TextBox1
.Text TextBox1.Text.Replace(DataGridView1.Rows(a).Cells(0).Value.ToString ","String.Empty)
 
           End If
 
       Next 

اذا لم ترد هذه اخبرني افكر بطريقتك


======================================
///////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\
======================================


ياسلام .. الحيلة ان جت فجاة ونجحت حلوةSmile
في نفس حدث DataGridView1_CellClick
استبدل ماعندك بالتالي:
PHP كود :
       If e.ColumnIndex 2 Then
            If DataGridView1
.Rows(e.RowIndex).Cells(2).Value True Then
                DataGridView1
.Rows(e.RowIndex).Cells(2).Value False
            Else
                DataGridView1
.Rows(e.RowIndex).Cells(2).Value True
            End 
If


 
           If DataGridView1.Rows(e.RowIndex).Cells(2).Value True Then
                If TextBox1
.Text.Trim.ToLower.Contains(DataGridView1.Rows(e.RowIndex).Cells(0).Value.ToString.ToLower ",") = False Then
                    TextBox1
.AppendText(DataGridView1.Rows(e.RowIndex).Cells(0).Value.ToString ",")
 
               End If
 
           Else
                TextBox1
.Text TextBox1.Text.Replace(DataGridView1.Rows(e.RowIndex).Cells(0).Value.ToString ","String.Empty)
 
           End If
 
       End If 

شكرا اخ سعود
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] تمرير القيمة من مربع نص وجمعها مع القيمة الاولى في datagridview يونس 4 87 22-02-17, 06:50 PM
آخر رد: يونس
Photo [VB.NET] تمرير القيمة من مربع نص وجمعها مع القيمة الاولى في DataGridView يونس 0 48 22-02-17, 05:15 PM
آخر رد: يونس
  كيفية عرض البيانات فى DataGridView فى وضع CrossTab noway 1 73 21-02-17, 09:03 PM
آخر رد: noway
  [سؤال] اريد مثال على طريقة ادراج صورة من السكانر ناصر شير 0 30 20-02-17, 02:45 PM
آخر رد: ناصر شير
Wink [VB.NET] استفسار بخصوص التعديل والحفظ علي اداة datagridview dark1459 9 128 20-02-17, 02:13 AM
آخر رد: khodor1985
Question [سؤال] اريد حل لهذه المشكلة دعم العربية shwehdi4pc 1 91 11-02-17, 02:35 AM
آخر رد: مساعدة
  اريد كود تنسيق التاريخ bidaya 10 276 06-02-17, 03:08 AM
آخر رد: bidaya
Heart [VB.NET] احتاج الى مساعدة في برنامج لمحل لحساب الفاتورة malek369 1 183 06-02-17, 02:44 AM
آخر رد: ٌRy SAEED
  مساعدة فى xml Mohamed20 2 89 02-02-17, 05:40 PM
آخر رد: Mohamed20
  [VB.NET] مشكلة مع datagridview لا تعرض السجلات الجديدة الا بعد اقفال البرنامج darklibya88 3 140 01-02-17, 04:01 PM
آخر رد: جابر

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم