请教datagrid控件的初级问题

mi6236 2004-01-11 10:07:35
dim mrc as adodb.recordset
已将记录集结果保存到mrc中
怎样将mrc中的记录显示到datagrid中,请教解决详细代码,不胜感激.
...全文
19 8 打赏 收藏 举报
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
mi6236 2004-01-14
我是使用ADO库,利用代码进行数据库连接的。
昨天我已找到原因了,但不知为何会出现这种现象?
出问题方法:
利用代码方式获得recordset付值给mrc
在DATAGRID属性页中设置表头后不能显示数据库中的内容只能显示空记录。
没有问题的方法:
利用代码方式获得recordset付值给mrc
利用程序给表头付值
datagrid.columns(1).caption="表头名"


为何呢?


  • 打赏
  • 举报
回复
88391788 2004-01-13
注意 adodc的属性 中recordser 的内容
  • 打赏
  • 举报
回复
mi6236 2004-01-13
您好象没明白我的意思,现象是这样的
用set datagrid.datasource=mrc
datagrid.refresh
原来的data grid控件能显示记录但没有内容
我的代码一点没变,把原来的Data grid控件删掉了,又建了一个同名的data grid控件
便能够显示记录中的文本了
应该是data grid 的属性设置有问题吧,是那一个呢?


急求高手解答

  • 打赏
  • 举报
回复
daisy8675 2004-01-12
請注意dim mrc as adodb.recordset
和dim mrc as As New ADODb.Recordset
雖然就是一個new的區別﹐結果是.....
  • 打赏
  • 举报
回复
daisy8675 2004-01-12
Option Explicit
Dim rs1 As New ADODb.Recordset
Dim conn As New ADODb.Connection
Dim strconn As String

Private Sub Form_Load()

strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb; Persist Security Info=False"
conn.Open strconn
conn.CursorLocation = adUseClient

rs1.Open "select * from test", conn, 3, 3
Set DataGrid1.DataSource = rs1
End Sub
  • 打赏
  • 举报
回复
mi6236 2004-01-12
我把原来的Data grid删掉了,又建了一个同名的data grid
用set datagrid.datasource=mrc
datagrid.refresh
没有问题
是data grid 的属性设置有问题吗?那一个呢
  • 打赏
  • 举报
回复
mi6236 2004-01-11
to 809982(Royal) :
您的代码我已经试过,我已查看mrc中有六条记录,可是datagrid控件中只有6个空行并没有实际
文字,是何原因呢?

  • 打赏
  • 举报
回复
809982 2004-01-11
set datagrid.datasource=mrc
datagrid.refresh
  • 打赏
  • 举报
回复
相关推荐
发帖
VB基础类
加入

7595

社区成员

VB 基础类
社区管理员
  • VB基础类社区
申请成为版主
帖子事件
创建了帖子
2004-01-11 10:07
社区公告
暂无公告