Question

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

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

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

提前感谢您的帮助！

Answer 1

试试这个

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

Access函数计算具有指定条件的记录？

1 个答案: