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