Question

有什么方法可以让用户知道当前记录中的字段与另一条记录中的字段是否相同？因为99％的时间它们会有所不同，但是1％的时间必须有两个具有相同字段的记录，所以我想要一种提醒用户的方法，并确保他们知道这一点，以防万一并不意味着这样做。

Answer 1

编写一个函数并根据需要调用它。在你的情况下，控件的AfterUpdate为@Andre，如上所述。

Public Function IsDuplicate(ByVal Value As String) As Boolean
    IsDuplicate = (DCount("*", "TableName", "FieldName='" & Value & "'") > 1)
End Function

您可以这样称呼它：

Private Sub Text0_AfterUpdate()
    If IsDuplicate(Me.Text0.Value) Then
        MsgBox "Value exists..."
    End If
End Sub

提醒用户两个字段相同

1 个答案: