帮下忙，谢谢~~~
请帮帮忙
窗体上有一个TEXT，一个COMMANDBUTTON，一个ADODC，一个DATAGRID
我想在TEXT输入要查询的表名
DATAGRID就显示记录
Private Sub Command1_Click()
Adodc1.RecordSource = "select * from " + Trim(Text1.Text)
Set DataGrid1.DataSource = Adodc1
End Sub
现在我输入第一个表名能显示。但是输入第二个的时候，点击了COMMANDBUTTON之后，DATAGIRD显示的还是第一个表的记录。请问，应该怎么写代码？？？
[解决办法]
Private Sub Command1_Click()
On Error GoTo err
Dim strsql As String
strsql = "select * from " & Trim(Text1.Text)
Adodc1.RecordSource = strsql
Adodc1.Refresh
DataGrid1.Refresh
Exit Sub
err:
End Sub
这样就可以了
adodc会自动捕获错误并报错的
[解决办法]
没什么区别,习惯问题!
