不看会后悔的Windows XP之经验谈	简单快捷DIY实用家庭影院

为什么DATAGRID没有任何数据显示？

楼主liu_student_wei（）2002-01-31 10:57:07 在 VB / 基础类提问

rst.Open "select * from units", con, adOpenKeyset, adLockOptimistic, adCmdText

Set Dgrid.DataSource = Nothing

Set Dgrid.DataSource = rst

可程序一运行，表格中没有任何数据显示
问题点数：20、回复次数：9Top

1 楼dbcontrols（泰山__抛砖引玉）回复于 2002-01-31 11:05:10 得分 0

rst.Open "select * from units", con, adOpenKeyset, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = rst
DataGrid1.Refresh
Top

2 楼liu_student_wei（）回复于 2002-01-31 11:07:43 得分 0

不行！Top

3 楼tigerwood12345（tigerwood12345）回复于 2002-01-31 11:09:52 得分 0

有没有ADOC啊Top

4 楼liu_student_wei（）回复于 2002-01-31 11:40:46 得分 0

没有，我只是在写代码，不想用控件绑定Top

5 楼watt（瓦特）回复于 2002-01-31 12:42:09 得分 20

重新添加一个DATAGRID，因为你的DATAGRID经过了编辑，如果经过了编辑，比如增加一列，或者别的操作，你必须在代码绑定前指明DATAGRID中每一列的列名。给分。Top

6 楼y1g1y1（袁飞☆VB诚可贵VB.Net价更高C#心中有二者皆可抛☆）回复于 2002-01-31 12:55:49 得分 0

你的记录集应该使用客户端游标!
rst.CursorLocation=adUseClient
rst.Open "select * from units", con, adOpenKeyset, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = rst
DataGrid1.Refresh
Top

7 楼hzyzx（无情剑）回复于 2002-01-31 12:57:37 得分 0

先把DATAGRID中每一列的列名与rst的字段名绑定好。
rst.Open "select * from units", con, adOpenKeyset, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = rst
DataGrid1.Refresh
应该可以你试一下
Top

8 楼liu_student_wei（）回复于 2002-01-31 14:12:37 得分 0

Dgrid1.AllowAddNew = True
Dgrid1.AllowArrows = True
Dgrid1.AllowDelete = True
Dgrid1.AllowUpdate = True
Dgrid1.AllowRowSizing = True
Dgrid1.Visible = True
rst.CursorLocation = adUseClient
rst.Open "select * from units", con, adOpenKeyset, adLockOptimistic, adCmdText
'add serveral columns
i = 0
Do While i <= 9
dgrid.columns(i).add i
dgrid.Columns(i).Visible = True
dgrid.Columns(i).DataField = rst.Fields(i).Name
dgrid.Columns(i).Caption = rst.Fields(i).Name
i = i + 1
Loop
Set DataGrid1.DataSource = rst
dgrid.Refresh
前面几位兄弟所说的我都试过了，没有通过呀！Top

9 楼liu_student_wei（）回复于 2002-01-31 15:28:36 得分 0

从做了应用程序，又通过了，谢谢各位兄弟了Top