First value in listbox as default

  • Thread starter Thread starter Guest
  • Start date Start date
Igor G. said:
How to set first value in listbox as default value?
Thanks!
Click to expand...

Here's untested "air code":

'----- start of example code -----
Dim lngFirstRow As Long

With Me.lstMyListBox
lngFirstRow = Abs(.ColumnHeads)
If .ListCount > lngFirstRow Then
.DefaultValue = _
Chr(34) & .ItemData(lngFirstRow) & Chr(34)
Else
.DefaultValue = ""
End If
End With
'----- end of example code -----

You'd run the code in the form's Load event, probably, and then any time
the list box is requeried.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

listbox select first value as default - though listbox could be em 1
Access Cannot select items in listbox 1
Listbox Counting (not .listcount) 0
Start out with blank fields in listboxes 4
Windows XP Listbox with 3 columns, cutting formatted value 0
Listbox Double Vision 6
Cannot Get ListBox .ItemsSelected, help! 1
The check box list control in MS Access 2010 3

Back
Top