Question

VB查询ACCESS数据库问题

在查询按钮出我编了如下
Private Sub Command4_Click()
Dim a As Integera = Text8.TextAdodc1.RecordSource = "select * from 表1 where ID=" & aAdodc1.RefreshSet DataGrid1.DataSource = Adodc1
End Sub Private Sub Command5_Click()
Dim b As Stringb = Text9.TextAdodc1.RecordSource = "select * from 表1 where 姓名="" & b & """Adodc1.RefreshSet DataGrid1.DataSource = Adodc1
End Sub

两个按钮，一个查询ID（数字），一个查询姓名（字符），但两个都不能好好运行，都是
Adodc1.Refresh这条语句出问题，ADODC和DATEGREDE这两个控件都连接上了的，是我少写了什么语句还是写错了啊

Answer 1

Dim a As Integer
a = Text8.Text
你把a定义为整形，而text8.text却是文本。
改成a=text8.value，或a=cint(text8.text)
剩下的部分，不会断句了

Answer 2

a虽然定义成整形 但是vb中连接成字符串是没问题的 从语句上看 看不出什么问题 能不能把源码传上来？