现想做一个VB录入查询系统，连接Access数据库，想在VB面板中添加按钮，利用按钮实现对数据库内容的查询，查询结果显示在VB相应的TextBox中，求查询代码
Dim db As New ADODB.Connection, RS As New ADODB.Recordset, strSQL As String, txtSQL As String  （全局）
Public Sub SJK(db)
  db.ConnectionString = "DRIVER=Microsoft Access Driver (*.mdb);dbQ=" & App.Path & "\1234.mdb"
  db.Open
End Sub

Private Sub Command2_Click()
.
.
.
.
.
.                                     查询该怎么写？VB中text1存储在Access中T1，text2在T2。。。

[ 本帖最后由 schumi001001 于 2015-4-30 00:00 编辑 ]