I am scanning a barcode and using a module to convert an ASCII string representing a Base 32 number to binary. The problem I'm having is when I scan the barcode, I have to press enter to complete the process.
Any help would be much appreciated. I have given the VBA for the form below. I have not included the VBA for the module for security purposes, but if I need to expand on it to get this to work, I will.
VBA for Text box on form which barcode is scanned.
Private Sub Text0_AfterUpdate()
Me.Text0 = Format$(CACDeComp(Mid$(Me.Text0, 2, 6), 6), "0000000000")
End Sub
VBA for reset button on form
Private Sub Command0_Click()
Me.Text0.Value = Empty
Me.Text0.SetFocus
End Sub