2012-07-05 84 views
0

我試圖爲我的表單輸入錯誤檢查。我讓用戶輸入名稱,我想提示他們是否嘗試使用記錄中已有的名稱。Access 2010試圖通過表單輸入唯一記錄

示例:Person表中有3條記錄,其中FNames爲:Jeff,Kyle,Darren。

如果在Fname Box中添加人員窗體中輸入了Kyle,after update事件將通知用戶該名稱已被聲明並且爲空。如果Greg被輸入,則不會發生通知。

我只是不知道如何將文本字段值與過濾後的查詢列表中的值進行比較,Google搜索還有其他鬆散相關的鏈接。

謝謝你的幫忙!

回答

2

如果所有fname必須是唯一的,請在表中添加唯一索引。這將防止重複輸入。表單錯誤屬性將允許您提供自定義錯誤。

您還可以檢查名稱是否存在於控件的Before Update事件中。

在這個例子中,控件和字段都被稱爲AText。一般來說,您應該重新命名控件,以使它們與字段不同。

Private Sub AText_BeforeUpdate(Cancel As Integer) 
Dim IsOk As Boolean 

''One of the very few places where the .Text property is used 
sLookUp = Me.AText.Text 

IsOk = IsNull(DLookup("Atext", "Table1", "Atext='" & sLookUp & "'")) 

If Not IsOk Then 
    MsgBox "Found!" 
    Cancel = True 
End If 
End Sub 
相關問題