Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

问个最弱的问题,请问获得表中的记录数用什么语句?

baiqingrui  发表于:2014-08-01 17:21:18  
复制

请问获得表中的记录数用什么语句?为什么我用rs.recordcount, 返回的值是1? 刚开始学习VBA,有点难度。

 

Top
bjllk 发表于:2014-08-01 21:22:44
记录数=DCount("*", "表名")

baiqingrui 发表于:2014-08-02 07:28:27

那rs.recordcount 是干什么用的? 我把rs.recordcount的值赋给一个变量i, 本想做个循环语句, 从第一条记录到最后一条. 但是不行.

我看了一个例子(如下), 其中循环语句是用rs.EOF = True来结束, 难道不能用rs.recordcount?


    .....

    Set rs = db.OpenRecordset(StrSQL, dbOpenDynaset)
    txt_资料 = ""  
    Do Until rs.EOF = True
        For i = 0 To 2
            txt_资料 = txt_资料 & rs.Fields(i) & "  "
        Next i
        rs.MoveNext '移动至下一条记录
        txt_资料 = txt_资料 + vbCrLf  '换行
    Loop
    .....



宏鹏 发表于:2014-08-02 08:17:10

openrecordset下面加rs.CursorLocation = adUseClient


 



麥田 发表于:2014-08-02 09:56:38

见示例   有统计表中所有记录数  以及指定条件记录数方法

http://www.accessoft.com/article-show.asp?id=9362

 

这句是统计符合条件的记录数代码

dcount("*","表名称",条件)     

 

这句是统计表中所有记录数代码

dcount("*","表名称")

 

 



baiqingrui 发表于:2014-08-03 16:19:55
我其实想问的是rs.recordcount, 这个东西看起来像是计算记录数的嘛, 而实际是干什么的我没搞清楚, 请帮忙指点一下,多谢了!

baiqingrui 发表于:2014-08-03 16:32:47

刚看了一段代码, 其中有rst.RecordCount, 看起来就是返回记录数的嘛

Dim intI As Integer

If rst.RecordCount > 0 Then
    rst.MoveLast
    rst.MoveFirst
    For intI = 1 To rst.RecordCount
        ListBox1.Add rst!字段1
        rst.MoveNext
    Next

End If




bfqba 发表于:2014-08-04 10:35:28

刚看了一段代码, 其中有rst.RecordCount, 看起来就是返回记录数的嘛

Dim intI As Integer

If rst.RecordCount > 0 Then
    rst.MoveLast
    rst.MoveFirst
    For intI = 1 To rst.RecordCount
        ListBox1.Add rst!字段1
        rst.MoveNext
    Next

End If

rst.RecordCount是记录数,你得先给rst定义,比如:

dim t     as  long

Dim rst         as Object

 Set rst = Me.子窗体.Form.RecordsetClone

rst.MoveLast                                
     t = rst.RecordCount             
     rst.MoveFirst 

这里t返回的就是子窗体记录的总数。



cspa 发表于:2014-08-04 16:49:02
总记录:8篇  页次:1/1 9 1 :