VB 2008 Express Editionでデータの抽出ができない

質問

VB 2008　Express Editionでデータの抽出ができません。

「Btn検索」ボタン押下時に「TextBox1.text」のデータで抽出を行いたいのですがデバッグして「TextBox1.text」にデータを入力して「Btn検索」ボタンを押下すると
「OledbExceptionはハンドルされませんでした。１つ以上の必要な値のパラメータが設定されていません」と表示されてしまいます。

ちなみにソースは下記になります。
--------------------------------------------------------------
Private Sub Btn検索_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn検索.Click
Dim cn As New OleDb.OleDbConnection
Dim dView As New DataView
Dim strRec As String

cn.ConnectionString= "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source = C;\管理台帳データベース.mdb"

dadp = New OleDb.OleDbDataAdapter("SELECT * FROM PC管理台帳 WHERE 新ＰＣ名=TextBox1.Text", cn)

dadp.Fill(dset, "PC管理台帳")
'データベースの表示
DataGridView1.DataSource = dset.Tables("PC管理台帳")

End Sub
--------------------------------------------------------------
ちなみに下記のようにTextBox1.Textを'1111'とかにするとうまく抽出できます。

dadp = New OleDb.OleDbDataAdapter("SELECT * FROM PC管理台帳 WHERE 新ＰＣ名='1111'", cn)

となたかアドバイスお願いします。

回答No.2

kikujack · ベストアンサー

dadp = New OleDb.OleDbDataAdapter("SELECT * FROM PC管理台帳 WHERE 新ＰＣ名='"+TextBox1.Text+"'", cn)

回答No.1

nda23

"SELECT * FROM PC管理台帳 WHERE 新ＰＣ名=TextBox1.Text"
　　　　　　　　↓
"SELECT * FROM PC管理台帳 WHERE 新ＰＣ名=""" & TextBox1.Text & """"