Populate List Box & Read Value From VBA

[Juan4412]

I want to only do this with VBA as the values are going to be static and never change. I am going to add a listbox and name it listbox1 - I need to use vba to add a NULL value - default selection, and add the values Joe, John. And also in VBA read the selected value from the listbox. pseudocode would be

'populatelistbox
listbox1.Values = Array(NULL, "Joe", "John")

'read listbox values
if listbox1.Value = NULL Then 
   MessageBox.Show("You must select a name")
Else
   pickedvalue = listbox1.Selection
endif

'process depending
if pickedvalue = "Joe" Then
    MessageBox.Show "You Picked Joe"
Else if pickedvalue = "John" Then
    MessageBox.Show "You Picked John"
End if

[pbaldy]

If the values are static, why not set them in design view and be done with it? To do it in code you'd use AddItem I think, but I've never bothered.

[Juan4412]

@pbadly - setting in design works perfectly. How would I read the value selected?

[pbaldy]

If the list box is single select and the code is on the same form:

Msgbox Me.ListboxName