[ahmadpal]

عند اضافة الجملة التي تقول عنها فانها يضع سطر خطأ تحت split 

كود :

Dt.Clear()
       Txt_MultiSearsh.Text = StringSplitOptions.RemoveEmptyEntries
       Dim Str() As String = Txt_MultiSearsh.Text.Split(",", StringSplitOptions.RemoveEmptyEntries).Length

       Dim dt1 As New DataTable
       Dim da1 As New OleDbDataAdapter

       'Try
       For i As Integer = 0 To Str.Length - 1

               da1 = New OleDbDataAdapter("select * from CV_Person where FName like '%" & Str(i) & "%'", con)
               da1.Fill(dt1)
               Dgv_Table.DataSource = dt1
           Next


       'Catch ex As Exception
       'End Try

   End Sub

وارجوا ان لا اكون قد تسببت بازعاجك