08-04-21, 09:15 PM
السلام عليكم ورحمة الله وبركاته
البحث في بيانات DataGridView1 حسب المكتوب في اداة RichTextBox من بداية النص حتى يجد (المسافة) فإن وجد الكلمة وضعها في DataGridView2 وإن لم يجدها يقتطع جزء منها ويبحث عنه في DataGridView1 فإن وجدها يضعها في DataGridView2 ومن ثم يبحث عن بقية الكلمة وتستمر العملية مع بقية النص
علماً أن في ا ل DataGridView1 مجموعة من الاحرف والاقام والكلمات
هذا الكود يظهر بيانات DataGridView1
البحث في بيانات DataGridView1 حسب المكتوب في اداة RichTextBox من بداية النص حتى يجد (المسافة) فإن وجد الكلمة وضعها في DataGridView2 وإن لم يجدها يقتطع جزء منها ويبحث عنه في DataGridView1 فإن وجدها يضعها في DataGridView2 ومن ثم يبحث عن بقية الكلمة وتستمر العملية مع بقية النص
علماً أن في ا ل DataGridView1 مجموعة من الاحرف والاقام والكلمات
هذا الكود يظهر بيانات DataGridView1
كود :
Dim temp As Integer = 0
For i As Integer = 0 To DataGridView1.RowCount - 2
For j As Integer = 0 To DataGridView1.ColumnCount - 2
If DataGridView1.Rows(i).Cells(j).Value.ToString = Me.RichTextBox1.Text Then
MsgBox("Item found")
temp = 1
End If
Next
Next
If temp = 0 Then
MsgBox("Item not found")
End If