Solved

Set default Combobox value to Select Item...

Posted on 2015-02-23
8
361 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 35

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
The Eight Noble Truths of Backup and Recovery

How can IT departments tackle the challenges of a Big Data world? This white paper provides a roadmap to success and helps companies ensure that all their data is safe and secure, no matter if it resides on-premise with physical or virtual machines or in the cloud.

 
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 35

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

Ransomware: The New Cyber Threat & How to Stop It

This infographic explains ransomware, type of malware that blocks access to your files or your systems and holds them hostage until a ransom is paid. It also examines the different types of ransomware and explains what you can do to thwart this sinister online threat.  

Question has a verified solution.

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

The first two articles in this short series — Using a Criteria Form to Filter Records (http://www.experts-exchange.com/A_6069.html) and Building a Custom Filter (http://www.experts-exchange.com/A_6070.html) — discuss in some detail how a form can be…
Introduction The Visual Basic for Applications (VBA) language is at the heart of every application that you write. It is your key to taking Access beyond the world of wizards into a world where anything is possible. This article introduces you to…
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…
Learn how to number pages in an Access report over each group. Activate two pass printing by referencing the pages property: Add code to the Page Footers OnFormat event to capture the pages as there occur for each group. Use the pages property to …

809 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