How to allow only Numeric value in textbox1 of form1....

[pedie]

How can i make users enter numbers only in the textbox1 in form1. this textbox is unbound.
Also how can i enter default value...like (Click here to enter x value)


Thanks for helping.
Pedie

 

[Trevor G]

Try this out.

Open the form in design view > select unbound text box > open properties > select Events > On Exit > select Elipsee and Code Builder add this code

Private Sub Text16_Exit(Cancel As Integer)
If IsNumeric(Me.Text16) = False Then
MsgBox "This isn't numeric"
Me.Text16 = ""

Else
Exit Sub
End If

End Sub

 

[pedie]

Thanks Trevor, the code is perfect!
Thanks!

Try this out.

Open the form in design view > select unbound text box > open properties > select Events > On Exit > select Elipsee and Code Builder add this code

 

[Norie]

Pedie

What data type is the field that's the control source of this textbox?

If it's Numeric Access won't allow the user to enter a number.

You don't really need code to do that - this isn't a userform.

 

[pedie]

Norie, there is no control source, form is not connected to any table...
You right i also check and realise that we can take control of this from the format properties

Thanks again

Pedie

What data type is the field that's the control source of this textbox?

If it's Numeric Access won't allow the user to enter a number.

You don't really need code to do that - this isn't a userform.

 

[Norie]

Pedie

Why is there no control source? What is this textbox for?

Is there a record source for the form itself?