用vb的ado控件链接的access数据库,怎么计算数据库表中的记录个数并显示在文本框中 15
我们用的是a=selectcount(*)from表名;text1.text=val(a),但是文本框中总是显示0...
我们用的是a=select count(*) from 表名;text1.text=val(a),但是文本框中总是显示0
展开
1个回答
展开全部
参考以下代码写法:
Dim sqlstr As String
sqlstr = "select * from jishijilu"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\wdOld.mdb;Persist Security Info=False"
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
Text1 = Adodc1.Recordset.RecordCount
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询