B
Bob Barnes
Got this from an old Newsgroup Post...
Adding a value to the combo's value list.
If the combo's list is hard-coded in it's RowSource property as a value
list, you have to add the value, as shown below:
Private Sub Combo0_NotInList(NewData As String, Response As Integer)
'Add the value to the RowSource property
Me.Combo0.RowSource = Me.Combo0.RowSource & ";" & NewData
'Tell Access you've added the new value
Response = acDataErrAdded
End Sub
The above works for a Bound Field...but when I tried it for a textbox on an
unbound Form, it didn't work...Is that true, or did I do something incorrect?
TIA - Bob
Adding a value to the combo's value list.
If the combo's list is hard-coded in it's RowSource property as a value
list, you have to add the value, as shown below:
Private Sub Combo0_NotInList(NewData As String, Response As Integer)
'Add the value to the RowSource property
Me.Combo0.RowSource = Me.Combo0.RowSource & ";" & NewData
'Tell Access you've added the new value
Response = acDataErrAdded
End Sub
The above works for a Bound Field...but when I tried it for a textbox on an
unbound Form, it didn't work...Is that true, or did I do something incorrect?
TIA - Bob