请帮帮忙窗体上有一个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显示的还是第一个表的记录。请问,应该怎么写代码???
我想在TEXT输入要查询的表名
DATAGRID就显示记录Private Sub Command1_Click()
Adodc1.RecordSource = "select * from " + Trim(Text1.Text)
Set DataGrid1.DataSource = Adodc1
End Sub现在我输入第一个表名能显示。但是输入第二个的时候,点击了COMMANDBUTTON之后,DATAGIRD显示的还是第一个表的记录。请问,应该怎么写代码???
解决方案 »
- VB怎么写HTTP头伪搜索来源
- 我想把一组记录插入一个表中,想通过VB来实现,想一次把该记录集插进去。不想循环。请大家帮忙!
- 关于ZLIB压缩问题,紧急求救!
- MDI窗体中放了一个picturebox,为什么再调用其它窗体的时候不能正常显示,只显示在picturebox下面,而无法覆盖pictuerbox!?谢谢!
- 请问如何用VB实现BMP或JPG图片的全屏显示
- Setup Factory 6.0的使用
- 用ADO.Connection和ADO.Recordset打开EXCEL文件的时问题?(100分)-----------在线(急急!!!!!!!!!)
- 有哪位高手知道VB组件开发是怎么一回事,和AxtiveX控件有什么样的关系,怎么开发?
- 请问VB里面有没有像Delphi里面那个QReport的那些快速报表控件?
- VB里的VScroll上的那一闪一闪的是什么?
- 刚发现问题 MDI窗体退出加了 end 再win98 下 出错
- 【100分】内存文件映射之后,急!!
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会自动捕获错误并报错的
& 连接 和 + 连接有什么区别的吗?