I have a combo box that gets its list items from a query. But in addition to these items, I need one static option that will be there in all cases.
I tried doing this in the naive way:
Private Sub Form_Open(Cancel As Integer)
Set rst = CurrentDb.OpenRecordset("SELECT ESDNodes.Description, ESDNodes.Sort FROM ESDNodes WHERE (((ESDNodes.parentID) =" & parentID & ")) ORDER BY ESDNodes.Sort")
Set nextSiblingSelect.Recordset = rst
nextSiblingSelect.AddItem Item:="Make Last", Index:=0
End Sub
but end up with this run-time error
The RowSourceType property must be set to 'Value List' to use this method.
which I half-expected.
Is there any trick around this? I suppose I could add a dummy record to my table set and change the query but that would be rather ugly and I would not prefer it.
Try a UNION query as the combobox RowSource. Maybe like:
SELECT Description, Sort FROM ESDNodes UNION SELECT "Make Last", 0 FROM ESDNodes ORDER BY Sort;
Collected from the Internet
Please contact [email protected] to delete if infringement.
Comments