DCount函数标准的措辞

Question

我对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

谢谢!

Answer 1

您可以随时尝试：

对于字符串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 = "“结束。

Answer 2

尝尝这个,

DCount("YearMonth", "Table", "[YearMonth]= #" & Format(Me.Txt_entry, "yyyy\/mm\/dd") & "#")