1

如果数据发出错误信号，我DCount用来帮助显示错误消息。我让它使用一个数字等于另一个数字的标准。现在我想在其中添加另一个条件，其中另一个字段ReturnDate（此字段是文本而不是日期/时间）等于连字符 (-)。我只是不确定如何格式化它。我有这个：

If DCount("*", "CrewTable", "KitNumber=" & _
  Me.AssignKit.Value And "ReturnDate=" & _
  "-") > 0 Then
  Cancel = True
  MsgBox "Kit is already assigned!"
  AssignKit = ""
  AssignKit.SetFocus
Else
...

错误弹出“类型不匹配”，调试器突出显示“If -> Then”中的整个语句，并有一个错误指向引号中带有连字符的行。

4

3 回答 3

4 
If DCount("*", "CrewTable", "ReturnDate='-' AND KitNumber=" & _
          Me.AssignKit.Value) > 0 Then
于 2013-07-24T16:44:29.053 回答
2

将其Criteria选项存储在字符串变量中DCount时，更容易排除错误。

Dim strCriteria As String
strCriteria = "ReturnDate='-' AND KitNumber=" & Me.AssignKit.Value
Debug.Print strCriteria
If DCount("*", "CrewTable", strCriteria) > 0 Then

如果您使用了这种方法，Access 会提醒您构建Criteria字符串的原始代码是无效的。这应该更清楚地表明问题不是由于If条件造成的，而且也不完全是DCount问题……这是字符串连接的问题。

于 2013-07-24T16:58:11.340 回答
0 
Me.AssignKit.Value & " And ReturnDate=" & _
于 2013-07-24T16:26:18.263 回答