读书人

DataGrid1不能显示,该如何处理

发布时间: 2012-03-30 17:32:10 作者: rapoo

DataGrid1不能显示
小弟我刚刚学习vb,现在一问题,我现在有一个窗体,一个模块。我在窗体中有一个DataGrid.我在模块中写如下代码:
--------------------------------------------------
Option Explicit
Public con As New ADODB.Connection
Public rst As New ADODB.Recordset

Public Sub main()
con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa; password = ****;Initial Catalog=linshi;Data Source=Mycomputer "
con.Open
Form1.Show
End Sub
--------------------
然后在窗体的load 事件中写这样的代码:
------------------------------------------------
Option Explicit

Private Sub Form_Load()
rst.Open "select * from table ", con, adOpenDynamic, adLockOptimistic

Set DataGrid1.DataSource = rst
End Sub
------------------------------------------------------
我的目的就是想让DataGrid1显示数据,可是会出现这样的错误,如下:
---------------------------------
The rowset is not bookmarkable!
------------------------------------
这是为什么?
-----------------------------

[解决办法]
Public Sub main()
con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa; password = ****;Initial Catalog=linshi;Data Source=Mycomputer "
con.CursorLocation = adUseClient
con.Open
Form1.Show
End Sub
加上con.CursorLocation = adUseClient

读书人网 >VB

热点推荐