Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/wordpress/11.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access 使用指定条件统计记录的访问函数?_Ms Access - Fatal编程技术网

Ms access 使用指定条件统计记录的访问函数?

Ms access 使用指定条件统计记录的访问函数?,ms-access,Ms Access,我有一个Access 2007数据库,它有两个相关的表(我们称它们为[PARENT]和[CHILD])。我创建了一个显示[PARENT]表字段的表单和一个显示相关[CHILD]字段字段的嵌入式子表单 [CHILD]表中的一个文本字段称为“Status”。状态可以包含各种值(例如,“就绪”、“等待”等) 我想在此表单上创建一个未绑定的文本框,显示处于“就绪”状态的记录数。实现这一点的函数语法是什么 提前感谢您的帮助 试试这个 Sub RefreshStatus() Dim rs As Rec

我有一个Access 2007数据库,它有两个相关的表(我们称它们为[PARENT]和[CHILD])。我创建了一个显示[PARENT]表字段的表单和一个显示相关[CHILD]字段字段的嵌入式子表单

[CHILD]表中的一个文本字段称为“Status”。状态可以包含各种值(例如,“就绪”、“等待”等)

我想在此表单上创建一个未绑定的文本框,显示处于“就绪”状态的记录数。实现这一点的函数语法是什么

提前感谢您的帮助

试试这个

Sub RefreshStatus()
   Dim rs As Recordset
   Set rs = CurrentDb.OpenRecordset ("SELECT count(*) AS cnt FROM CHILD WHERE CHILD.Status = 'Ready'", dbOpenSnapshot)
   'tbStatus is your text field on the form
   Me.tbStatus = rs("cnt")
   Set rs = Nothing
End Sub

谢谢是否可以通过函数而不是VBA来解决我的问题?