VB2010とアクセスの接続方法

質問

textboxにID入力し、ENTERを押したらそのIDのデータがアクセスのデータベースから出力される、というプログラムを書き方のヒントを教えていただけないでしょうか。

Imports System.Data.OleDb

Public Class Form1

Private Sub Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Enter

'▼データの取得
Dim Cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Database\Animals.mdb")
Dim SQLCm As OleDbCommand = Cn.CreateCommand
Dim Adapter As New OleDbDataAdapter(SQLCm)
Dim Table As New DataTable

SQLCm.CommandText = "SELECT * FROM T_akusesu"
Adapter.Fill(Table)

'▼データの連結
textbox.DataBindings.Add("Text", Table, "名前")
textbox2.DataBindings.Add("Text", Table, "フリガナ")

Table.Dispose()
Adapter.Dispose()
SQLCm.Dispose()
Cn.Dispose()

End Sub

End Class

・アクセスデータ
　ID、名前、氏名

以上、よろしくお願い致します。

回答No.1

hirotn · ベストアンサー

IDを入力するテキストボックスがよくわかりませんが、

＞SQLCm.CommandText = "SELECT * FROM T_akusesu"

右辺のSQL文を改造します。

"SELECT * FROM T_akusesu WHERE ID=" & textbox.text