Предупреждение о повторяющемся входе выскакивает, даже если не дублируется - PullRequest
0 голосов
/ 09 января 2020

Я создал код VBA в форме ввода MS Access, чтобы ограничить дублирование ввода номера запроса. Выдает предупреждение, когда я ввожу повторяющееся значение. Моя проблема в том, что он продолжает выдавать предупреждение, даже если я ввожу уникальное.

Private Sub Request_Number_AfterUpdate()

Dim Request_Number As String
Dim Answer As Variant

Answer = DLookup("[Request Number]", "GSAPAssets", "[Request Number] ='" & Me.Request_Number & "'")

If Not IsNull(Answer) Then
    MsgBox "Req Number Already in use.", vbInformation, "Duplicate Details."
    Me.Request_Number = ""
    Cancel = True
    Me.Request_Number.SetFocus

Else:
End If

End Sub

1 Ответ

0 голосов
/ 09 января 2020

Ваш код в порядке, я попробовал его, и он работал хорошо, для несуществующих значений в таблице gpassets, он не показывает окно сообщения, если вам нужна другая помощь, дайте мне знать

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...