Populate Text Box With Selected Value From List Box

[chalupabatman]

I have a single select list box where the user will select the manager assigned to the project. I want the selected value from this list box called lbxManager to populate the text box called txtManager. I tried to set the DefaultValue of txtManager as = lbxManager.Value and =lbxManager.ItemsSelected but neither one will populate this textbox with the selected value.

What must I do to get the selected value from lbxManager into txtManager?

[Bulzie]

OnClick on lbxManager:
me.txtManager = me.lbxManager

[chalupabatman]

OnClick on lbxManager:
me.txtManager = me.lbxManager

This gives me an invalid use of null error. However, I have selected an item from me.lbxManager

[chalupabatman]

If it changes how you would view this, I set the values by using the row source of the field. It is only 1 column, non multi-select and 5 values to choose from.

[Bulzie]

umm, works in my tests. put in breakpoint on that line and see what me.lbxManager is when you hover mouse over it once code is stopped.

[chalupabatman]

umm, works in my tests. put in breakpoint on that line and see what me.lbxManager is when you hover mouse over it once code is stopped.

If I add just Me.lbxManager in the VBA editor it gives errors
Compile Error:
Invalid use of property.

[Bulzie]

Is the list box bound or unbound? Maybe try me.lbxManager.Column(0), but if single column you shouldn't have to.

[chalupabatman]

It is bound

If I use
Debug.Print Me.lbxManager it shows Null

What is even more interesting is I did this

    If Me.lbxManager.ItemsSelected.Count = 0 Then
        DoCmd.SetWarnings True
        Exit Sub
    Else
        Debug.Print Me.lbxManager
    End If

And it shows that the count is > 0 as it goes to the else block, BUT it prints NULL

[Bulzie]

What are the datatypes and values in the list box and the destination field? Can you give example data.

[Missinglinq]

Are you absolutely positive that the Listbox has its MultiSelect Property set to None?

Me.lbxManager

is the same as

Me.lbxManager.Value.

And when the MultiSelect Property is set to set to anything other than None...the Listbox no longer has a Value...and you'll see the errors you're seeing.

Linq ;0)>

[chalupabatman]

What are the datatypes and values in the list box and the destination field? Can you give example data.

DataType is short text. Actual options to choose from are:

Robertson
Jones
Jackson
Menendez
Juevos
Jackson

[chalupabatman]

Are you absolutely positive that the Listbox has its MultiSelect Property set to None?

Me.lbxManager

is the same as

Me.lbxManager.Value.

And when the MultiSelect Property is set to set to anything other than None...the Listbox no longer has a Value...and you'll see the errors you're seeing.

Linq ;0)>

Yes, just confirmed that the Multi Select property of this field is set to none

[Bulzie]

Create another list box, manually enter the values, then try to move it to the text field. See if that works.

[chalupabatman]

Create another list box, manually enter the values, then try to move it to the text field. See if that works.

What do you mean by manually enter the values?

[Missinglinq]

With the MultiSelect Property set to None, it makes no sense for Me.lbxManager in the VBA editor to pop the error

Compile Error:
Invalid use of property.

And when things simply make no sense, I always wonder about corruption!

Although we usually think of Forms, and even entire Databases, when we speak of corruption, Controls, such as Listboxes, can and do become corrupted, and seem particularly susceptible to this during app development. The test/cure for this is short and simple...delete the Control and then re-create it.

Linq ;0)>