برای اینکه در ستونی از یک جدول داده های تکراری وارد نشوند می توانید بر روی آن ایندکس No Duplicate تعریف کنید. ولی در فایل پیوست این مقاله کنترل تکراری بودن شماره پرسنلی در فرم انجام شده (در رویداد Before Update مربوط به کادر شماره پرسنلی) و در صورت تکراری بودن شماره پرسنلی با پیغام خطا کاربر را مطلع می کند و رویداد کنسل می شود. کد نوشه شده در رویداد Before Update :
Private Sub pCode_BeforeUpdate(Cancel As Integer)
               Dim temp
               temp = DLookup("pCode", "tblPersonel", "pCode=" & [pCode])
               If Not (IsNull(temp)) Then
               MsgBox "Duplicate Value !", vbCritical, "Error"
               Cancel = True
               End If
               End Sub