Double Data Entry Forms

[huongdl1987]

Hi,

I'm trying to make a double data entry form in ACCESS. From my internet research, I know that I can create 2 different forms, with the 2nd one unbound to the table, and then write codes to compare. But that's where I'm stucked.

I have the
1. Phlebotomy_Lab_Data_Entry table, where the information is located


2. Phlebotomy_Lab_1st_Data_Entry, which is linked to Phlebotomy_Lab_Data_Entry table
3. Phlebotomy_Lab_2nd_Data_Entry, in which all textboxes are the same as Phlebotomy_Lab_1st_Data_Entry, but unbound

I tried to write a code in the BeforeUpdate event on each of the textbox in the 2nd data entry form to compare with the table. Here is an example for the WBC textbox

Private Sub WBC_BeforeUpdate(Cancel As Integer)
If Forms![Phlebotomy_Lab_2nd_Data_Entry]![WBC].Value = Phlebotomy_Lab_Data_Entry.WBC Then
Exit Sub
Else
MsgBox "Unmatched, please check entry.", vbOKOnly
Cancel = True
Me!WBC.Undo
End If
End Sub


But it kept not working! Do you have any idea what i was doing wrong in the code?

Thank you so much,
Meo

[June7]

Why doesn't it work, what happens - error message, wrong results, nothing?

Maybe:

If Forms![Phlebotomy_Lab_2nd_Data_Entry]![WBC].Value = Me.WBC Then

[vincent-leeway]

Well instead of comparing text boxes directly, you must collect the values into the variables properly applying the TRIM functions to remove any preceding and succeeding blank spaces and then compare the variables.

[June7]

Not following that, vincent. I frequently compare values from textboxes and I've never needed TRIM. Access drops trailing spaces. However, might not hurt to use it in case spaces accidentally typed at beginning but not mandatory to use a VBA declared variable.