تقييم الموضوع :
  • 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 

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن مساعدة توفي العراقي 1 32 منذ 1 ساعه مضت
آخر رد: ali.alfoly
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 43 01-12-16, 03:09 AM
آخر رد: khalaroy
  [سؤال] مساعدة في الفيجوال بيسك عبدالرحمن المكاوي 1 59 28-11-16, 02:11 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة في عمل برنامج rabeh.ram 4 169 27-11-16, 12:29 AM
آخر رد: rabeh.ram
  مساعدة في انشاء ثيم عبدالرحمن المكاوي 11 280 25-11-16, 11:57 AM
آخر رد: العزابي
  مساعدة في عرض البيانات في التقرير haiderkh 1 70 21-11-16, 11:24 PM
آخر رد: السرور
  التعديل علي datagridview باستخدام sql command dark1459 6 130 21-11-16, 11:55 AM
آخر رد: dark1459
  [VB.NET] DataGridView بطيء جدا ساعدوني لاجد حل dubai.eig 4 135 20-11-16, 09:22 PM
آخر رد: ابو ليلى
  اضافة عمود من نوع image ل bound datagridview noway 1 68 17-11-16, 12:08 PM
آخر رد: Genius Live
  مساعدة بخصوص Listbox CLARO 3 78 16-11-16, 06:15 PM
آخر رد: silverlight

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


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