您的位置：程序门 -> vb -> 基础类

datagrid控件不能分页,急！！

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

datagrid控件不能分页,急！！

发表于：2007-05-17 08:47:50 楼主

dim cnn as adodb.connection
dim rs as adodb.recordset

private sub command1_click（index as integer)
rs.absolutepage = index + 1
end sub

private sub form_load（)
dim str as string
dim cnn as new adodb.connection
dim rs as new adodb.recordset
str = "provider=microsoft.jet.oledb.4.0;data source=d:\vb_pages_2000.mdb "
cnn.connectionstring = str
cnn.open
mysql = "select * from t_cur "
rs.activeconnection = cnn
rs.cursorlocation = aduseclient
rs.open mysql, cnn, adopendynamic, adlockoptimistic
set datagrid1.datasource = rs
rs.pagesize = 10
label1.caption = "总页数： " & rs.pagecount
end sub
这个程序为什么不能分页，请各位多多指教！

发表于：2007-05-17 14:00:571楼得分:0

是我提的问题太简单，大家不屑一顾还是都不懂，兄弟们，发个话行不？？

下一篇：如何在vb中嵌入excl文件？100块悬赏！
上一篇：数据采集仪和vb的问题

其他资讯