Solved

Set default Combobox value to Select Item...

Posted on 2015-02-23
8
364 Views
Last Modified: 2015-02-23
This may be a simple question but for the life of me I cant get it to work. I have a bound combox and I want the combobox to display "Select Model..." when opening the form or a new record is added. Is there a way to do that without having to add  Select Model... to the table, I tried setting the controls default value property to that but it didn't work. I would like to do it in VBA.
0
Comment
Question by:skull52
  • 3
  • 3
  • 2
8 Comments
 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40626436
assuming the row source of your combo is only a single field, use a union query

select "<Select Model..> as field1 from tableX
Union
Select Field1 from tablex

in the load event and new record condition of the form, place

me.comboName.value=me.comboName.itemdata(0)
0
 
LVL 36

Accepted Solution

by:
PatHartman earned 500 total points
ID: 40626443
There is no built in way to do this and I don't recommend adding "Select Model ..." as an option.  And it won't display automatically anyway unless you set it as the default.

If you are using a single record form or a continuous form (this will NOT work on a form in datasheet view), you can try adding a label with a caption of "Select Model ...".  Then on top of the label place the combo.  Set its background to transparent.  The label shouldn't get the focus so it shouldn't interfere with the combo and once something is selected in the combo, it should hide the label.

PS, if you do elect to use Rey's suggestion, you'll need code in the Form's BeforeUpdate event to ensure that the dummy value has been replaced by a valid value because you don't want to actually save a record with that value in it.
0
 

Author Comment

by:skull52
ID: 40626459
Rey, it is not it has 2 columns an ID which is actually stored and the model name  which is displayed in the dropdown. I dont mind adding the "Select Model..."  in the table but i am concerned that the user will not select the model and end up storing that value.
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40626510
try something like this

select 0, as id "<Select Model..> as field1 from tableX
Union
Select Id, Field1 from tablex
0
 
LVL 120

Expert Comment

by:Rey Obrero (Capricorn1)
ID: 40626512
but you need to check in the before update event of the combo if they have selected value other than 0
0
 

Author Comment

by:skull52
ID: 40626517
Pat, That seemed to work.
0
 

Author Comment

by:skull52
ID: 40626906
Pat the label does interfere with the content of the combo box, but I think I can set the visible property on the label to NO if the Combo Box contains data.
0
 
LVL 36

Expert Comment

by:PatHartman
ID: 40627010
That should work.  I didn't try it and I've never used the technique.  I just leave controls empty.  

You'll need to run the code from the form's Current event and also from the AfterUpdate event of the combo.
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Access custom database properties are useful for storing miscellaneous bits of information in a format that persists through database closing and reopening.  This article shows how to create and use them.
This article describes a method of delivering Word templates for use in merging Access data to Word documents, that requires no computer knowledge on the part of the recipient -- the templates are saved in table fields, and are extracted and install…
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.
In Microsoft Access, when working with VBA, learn some techniques for writing readable and easily maintained code.

749 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question