我想在使用datagrid的时候动态的改变数据源,请问如何实现?
解决方案 »
- 第一次使用水晶报表,哪位能告诉我如何让水晶报表动态获取数据库中的字段名和值?
- 大虾们路过的看一个MSFlexGrid得简单问题!
- 打印怪问题,有兴趣来看看
- 怎么用msbcode9.ocx控件进行条形码打印???????在线等待!!!!
- 关于循环嵌套的问题
- 怎么分析文件的格式? 比如.eml
- 请教大侠我用ADODC控件+ACCESS,为何选择MS JET驱动时出错,选择ODBC DRIVER时正常,这两个有什么分别吗?详细见内!
- 请问IIS(inter IC Sound)中的SOUND是什么意思?IIS又要怎么翻译呢?
- 菜鸟问:ie自动化服务器的问题
- mscomm 无 法 稳 定 完 整 接 收 数 据 ,如何办?
- 文件大小问题
- 本人想学习Visual Basic--ActiveX方面的知识 请推荐好书!
If rst.State Then rst.Close
sql = "select * from 表1 where 字段='值'"
rst.Open sql, conn, adOpenKeyset, adLockPessimistic
Set DataGrid1.DataSource = rst
ElseIf cmdok.ToolTipText = "未 审 核" Then
If rst.State Then rst.Close
sql = "select * from 表2 where 字段='值'"
rst.Open sql, conn, adOpenKeyset, adLockPessimistic
Set DataGrid1.DataSource = rst
End IfExit Sub
errorhandler:
'错误处理
End Sub
运行演示图:http://bbs.2ccc.com/uploads/huangtao/运行效果图.jpg
下载地址:http://bbs.2ccc.com/uploads/huangtao/smartmail1.0.rar
源码 放送