标准的DCount功能措辞

时间:2015-07-07 22:22:18

标签: access-vba dcount

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

click()我希望得到该字段的出现次数" YearMonth"在一个故事中,根据在名为" Txt_entry"的入站字段中输入的值。

我的代码忽略了给定的标准(并返回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

谢谢!

2 个答案:

答案 0 :(得分: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 =“”没有适当的值。

答案 1 :(得分:0)

试试这个,

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