用VB统计一个表中的记录数
我现在有一个表,要统计其中的记录数然后把记录数赋值给一个text请问代码怎么写?vb+sql例如学生表要代码!!谢谢...
我现在有一个表,要统计其中的记录数 然后把记录数赋值给一个text 请问代码怎么写?vb+sql 例如 学生表
要代码!!谢谢 展开
要代码!!谢谢 展开
展开全部
联接数据库略
sqlstr="select * from 学生表"
rs.open sqlstr,conn,3,2
text=rs.recordcount
但要注意,如果使用如下语句,
rs.open sqlstr,conn,1,2
将会使recordcount返回值为-1
sqlstr="select * from 学生表"
rs.open sqlstr,conn,3,2
text=rs.recordcount
但要注意,如果使用如下语句,
rs.open sqlstr,conn,1,2
将会使recordcount返回值为-1
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号)
Public cn As New ADODB.Connection
Public rs As New ADODB.Recordset
Private sub form_load()
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.CursorLocation = adUseClient
cn.Open "Provider=sqloledb;Data Source=服务器名;Initial Catalog=数据库名;User Id=用户名;Password=密码;"
sql = "select * from 学生"
text.text = rs.RecordCount
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
end sub
Public cn As New ADODB.Connection
Public rs As New ADODB.Recordset
Private sub form_load()
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.CursorLocation = adUseClient
cn.Open "Provider=sqloledb;Data Source=服务器名;Initial Catalog=数据库名;User Id=用户名;Password=密码;"
sql = "select * from 学生"
text.text = rs.RecordCount
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
end sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |