Works for me. Thank you, Sir!!

On Wednesday, May 4, 2011 5:08:35 PM UTC-6, GS wrote:
It happens that Steve formulated :
Hey Garry,

One last quick one if I may...can I replace a "blank" entry in my textbox
(upon clicking the ok button) with a timestamp (or something unique)?

Something like...?

Private Sub cmdOK_Click()
Dim sTemp
If Me.TextBox1.Text = "" Then
' sTemp = Now() '//date and time
sTemp = TimeValue(Now()) '//time only
Else
sTemp = Me.TextBox1.Text
End If
End Sub

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc