Append character in text box.

[prodtest]

Hi,
I need a text box that when data is placed in it, it adds a * character at the begining and end of the data typed in that text box i.e
1234 would become *1234*

any help gratefully accepted.

Cheers
Ben

 

[smedvid]

Private Sub Text0_AfterUpdate()
Me.Text0.Value = "*" & Me.Text0.Value & "*"
End Sub

htwh,

Steve Medvid
"IT Consultant & Web Master"

http://www.saveourfarm.com

Chester County, PA Residents
Please Show Your Support...