Clear Button

[Beany]

i have a form that allows to add details to the table "tab_main".

ive got a clear button, it clears all textboxes apart from the textbox "date_issued". i get the following error message:

'Run-time error '2113':

The value you entered isn't valid for this field.'

Why am i getting this?

ive checked the table field and im inputting the right value!

in the command button under EVENT PROCEDURE, im using following code:


Private Sub Command25_Click()

Dim intResponse As Integer

intResponse = MsgBox("Are you sure you want to clear the text Boxs", vbYesNo, Change)

If intResponse = 6 Then
Me.number.Value = " "
Me.username.Value = " "
Me.cost_centre.Value = " "
Me.phone_model.Value = " "
Me.imei.Value = " "
Me.sim_no.Value = " "
Me.puk_code.Value = " "
Me.date_issued.Value = " "

Else

End If

End Sub

Help me!!!! thanks

 

[BarryMK]

Looks to me that your problem is the use of parenthesis " " with a date field. Do a search on date parameters or criteria you should find the answer.

 

[jeremypaule]

try

username = NULL
cost_centre = NULL

and so on

 

[boblarson]

First of all, to be clearing the textboxes, you want to use an empty string and not a space. So, you want

Me.number.Value = ""

instead of

Me.number.Value = " "

And to do dates, you can't set it to an empty string (nor with a space) so you have to set it to null

Me.date_issued.Value = Null

 

[Beany]

thank you buddies........

it works now!