[aftfm]

السلام عليكم ورحمة الله وبركاته

البحث في بيانات 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