How to make dropdown default to 0

[cdoyle]

Hi,

I have a form, with some dropdowns that are bound to some table fields.

In the table I have the fields defaulted to 0, and on the form I have the dropdowns defaulted to 0 too.

But here is the problem I'm facing, if a user is making an entry and accidently enters something into a dropdown, and then changes their mind and erases what they put in the field.

When they save the record, it's saving this field as a null instead of 0.

Is there a way to make it so, if they erase the field that defaults to 0 too?

 

[dkinley]

You could put a conditional statement prior to save either through the button or possibly on the BeforeUpdate event of the control.

If Len(Nz(Me!ThisControl, "")) = 0

-dK

 

[boblarson]

You could put this in the control's after update event:

If IsNull(Me.YourControlNameHere) Then Me.YourControlNameHere = 0

 

[cdoyle]

You could put this in the control's after update event:

If IsNull(Me.YourControlNameHere) Then Me.YourControlNameHere = 0

I just tried this, and when I try and make a selection I get an error
can't find the macro 'If isNull(Me.'

 

[boblarson]

I just tried this, and when I try and make a selection I get an error
can't find the macro 'If isNull(Me.'

That means you aren't putting the code in the right place. You apparently put it into the property instead of the event in the VBA window. See here on where to put it:
http://www.btabdevelopment.com/main/QuickTutorials/Wheretoputcodeforevents/tabid/56/Default.aspx

 

[KenHigg]

I prefer this:

If Me.YourControlNameHere & "" = "" Then Me.YourControlNameHere = 0

 

[cdoyle]

That means you aren't putting the code in the right place. You apparently put it into the property instead of the event in the VBA window. See here on where to put it:
http://www.btabdevelopment.com/main/QuickTutorials/Wheretoputcodeforevents/tabid/56/Default.aspx

Yep that was it, I should have known that.

Thanks for your help.