SSN Input Mask

[BMaerhofer]

I need some assistance with the following code. I need to be able to use
input mask for SSN numbers when selected from a list. The search/find
function is currently set up with a list displaying all of the options for
searching (SSN/FirstName/LastName/etc...) What I need is that when you click
on SSN it will automatically input the dashes in the search text box.

Currently two boxes: One to pick the search type, and the box below to type
in the search information. (###-##-####)


Private Sub cmdUFind_Click()
On Error GoTo Err_cmdUFind_Click

intFind = 2
lstFields.RowSource = "Social Security Number;Last Name;First Name;Check
Number;Check Date;Check Amount,Voucher Number"
TabFind.Visible = True




Exit_cmdUFind_Click:
Exit Sub

Err_cmdUFind_Click:
ERROR_TRACK "cmdUFind"
MsgBox Err.Description
Resume Exit_cmdUFind_Click

End Sub




Thanks!

 

[mscertified]

I would strongly advise against storing any SSN in an Access database. Access
databases are not secure and you could leave yourself open to legal action if
they fall into the wrong hands. Employees should have employee id's unrelated
to their SSN.