Textbox コントロールで Dataview をフィルタリングしたいのですが、プログラムを実行すると次のエラーが表示されます
「テーブル 0 が見つかりません」
これが私のコードです
Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TextBox1.KeyPress
Dim conn As New OleDbConnection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + IO.Directory.GetCurrentDirectory + "\Kyc.mdb"
conn.Open()
Dim cmdfilter As String = " select ID as الرقم_الوطني,fname as الاسم_الاول,sname as الاسم_الثاني,thname as الاسم_الثالث,finame as الاسم_الرابع from O_name "
Dim dataadabtar As New OleDbDataAdapter(cmdfilter, conn)
Dim ds As New DataSet
Dim dsview As DataView
Dim bs As New BindingSource
dsview = ds.Tables(0).DefaultView
bs.DataSource = dsview
bs.Filter = "الرقم_الوطني LIKE '" & TextBox1.Text & "'"
DataGridView1.DataSource = bs
conn.Close()
End Sub
私を助けてください