Drop Down List will not let me click Item

  • Thread starter mattc66 via AccessMonster.com
  • Start date
M

mattc66 via AccessMonster.com

I have a drop down list that when I click on an item in the list it doesn't
add it to my form. The only way to add an item in the DropDownList is to
manually type it in to the box.

Does anyone have any suggestions as to why this doesn't work. I do have a
MouseDown Event See below: This is just to set the Drop Downlist RowSource.

Private Sub Item_MouseDown(Button As Integer, Shift As Integer, X As Single,
Y As Single)
Dim stFilter As String
Dim stCoNum As String

stCoNum = Forms![frmQuotes].Form.COMPANY

If stCoNum = "C1" Then
stFilter = "qryLookUpItem_C1"
ElseIf stCoNum = "C2" Then
stFilter = "qryLookUpItem_C2"
End If

Me.Item.RowSource = stFilter

End Sub
 
Top