1.窗体上只有一个data控件,设置好databasename和recordsource属性
2.代码框只有一行代码:
Private Sub Data1_Reposition()
Data1.Caption = "当前记录总数:" & Data1.Recordset.RecordCount
End Sub
按F5运行后,无论数据库中有多少条记录,刚打开时recordcount都是1,我需要怎么修改才能让窗体运行后直接显示正确的数据总量。
2.代码框只有一行代码:
Private Sub Data1_Reposition()
Data1.Caption = "当前记录总数:" & Data1.Recordset.RecordCount
End Sub
按F5运行后,无论数据库中有多少条记录,刚打开时recordcount都是1,我需要怎么修改才能让窗体运行后直接显示正确的数据总量。
.close
.open"select count(*) as jl from table",conn,3,3
end with
set label1.caption=rs.fileds("jl")
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\不要用DATA控件哟,不好用呢。
1、引用microsoft activeX data objects 2.5library
dim conn as new adodb.connection
dim rs as new adodb.recordset
conn.open"**************************"‘英文忘了怎么写,身边没有带源码
rs.open"select * from table",conn,3,3
set text1.text=rs.fileds("字段1")
set text2.text=rs.fileds("字段2")
就OK了,,我的QQ是5658967,欢迎交友,多多交流