能否在表单中显示表中记录的数据 也就是在表中每增加一条数据都能在表单中显示出总条数来  谢谢

当然可以!
用recc()函数，不清楚的就查帮助文件。

如果记录中有delete标志，而楼主的统计要求又不需要计及被删除记录时，用reccount()就不行。甚至，如果表已被设置为filter状态，也不行。

对于发贴者目前的程度，用不着考虑这些如果，这是下一步学习时才要考虑的，所以我才建议其看帮助文件。

[ 本帖最后由 hu9jj 于 2014-6-19 07:16 编辑 ]

按记忆和查案楼主的历史记录，他并不在入门阶段。

对于该问题，我一般都是为表单添加一个方法程序，如：RecTotal，通过调用该方法来统计和显示记录。下面是一段 RecTotal 的示例：

Local nSelect,nRec,nRecNum,nCnt,nAmt
* 保存环境
nSelect = Select()
Select 表1
nRec = IIF(EOF(),0,RECN())

* 统计记录数、数量、金额
Calculate CNT(),SUM(数量),SUM(金额) TO nRecNum,nCnt,nAmt 

* 显示统计结果
WITH THISFORM
    .txtRecNum.Value = nRecNum
    .txtCount.Value = nCnt
    .txtAmount.Value = nAmt
ENDWITH 

* 恢复环境
IF nRec # 0
    GO nRec
ENDIF
Select (nSelect)

比如，在添加、修改或删除记录后，执行一下 THISFORM.RecTotal()即可。



[ 本帖最后由 liuxingang28 于 2014-6-19 08:24 编辑 ]

写个通用的子程序（函数）确实是有必要，具体实现可以是遍历计数或带FOR的COUNT指令。封装到函数中，比把实现代码直接嵌入到流程中强，何况那是通用的代码，只需写一次。我不明白现在的人为什么总不爱代码重用，^C^V大法再熟练，手指也会痛的啊。函数的代码再短，哪怕只有一行两行，只要调用两次以上，就应该果断提取封装，这在程序设计课程中都有教的——独立的一段代码行数原则上不应超过一屏。

[ 本帖最后由 TonyDeng 于 2014-6-19 09:20 编辑 ]

好办法一定要顶起！！