0

DCount我对函数标准的措辞有疑问。

在click()我想根据在名为“Txt_entry”的入站字段中输入的值来获取故事中字段“YearMonth”的出现次数。

我的代码忽略了给定的标准（并返回 0），因为它的措辞是错误的，但我不知道什么是正确的措辞。

Private Sub Ctl3_Click()
   Dim db As Database
   Dim r As Recordset
   Dim YearMonth As Field
   Dim Txt_entry As String
   Set db = CurrentDb()
   Set r = db.OpenRecordset("Table")
   Set YearMonth = r.Fields("YearMonth")
   MsgBox (DCount("YearMonth", "Table", "[YearMonth]=" & Me.Txt_entry))
   End Sub

谢谢！

4

2 回答 2

0

您可以随时尝试：

对于字符串 DCount("YearMonth", "Table", "[YearMonth]= '" & Me.Txt_entry & "'")

对于日期： DCount("YearMonth", "Table", "[YearMonth]= #" & Me.Txt_entry & "#")

取决于您将其存储在数据库中的方式。您不需要为 Dcount 或 Dlookup 设置这些变量（假设您想要的只是计数）

仅当您想在 dcount 的 Where 子句中输入一些其他条件时，才需要设置变量。

至于 me.Text_Entry ，请尝试 me.Text_entry.value 并查看该框是否具有实际值。

您可以通过将其放入 msgbox(me.txt_entry.value) 来测试它，这可能是没有得到正确计数的原因。因为查询将结束为 YearMonth = "" 没有正确的值。

于 2015-07-08T14:35:26.840 回答
0

尝试这个，

DCount("YearMonth", "Table", "[YearMonth]= #" & Format(Me.Txt_entry, "yyyy\/mm\/dd") & "#")
于 2017-10-10T16:14:38.317 回答