combo box sort order

[Guest]

Hello All,

Anyone know how to sort a cascading combo box. The second combo box does
not have a control source so I am unsure how to sort the data in the combo
box.

Here is the code on the first combo box:

Dim strSQL As String

strSQL = "Select numSecondaryOccurrenceID, strOccurrenceSecondaryType
from tblSecondaryOccurrenceFileKey " & _
"WHERE numPrimaryOccurrenceID = " & Me.lboPrimOccToInclude
Me!lboSecOccToInclude.RowSourceType = "Table/Query"
Me!lboSecOccToInclude.RowSource = strSQL

Any help would be appreciated!

Regards,
George

 

[Douglas J. Steele]

Dim strSQL As String

strSQL = "Select numSecondaryOccurrenceID, strOccurrenceSecondaryType
from tblSecondaryOccurrenceFileKey " & _
"WHERE numPrimaryOccurrenceID = " & Me.lboPrimOccToInclude & _
" ORDER BY strOccurrenceSecondaryType"
Me!lboSecOccToInclude.RowSourceType = "Table/Query"
Me!lboSecOccToInclude.RowSource = strSQL

 

[Guest]

Once again Doug, you're the man. Works nicely. Thank you for your help.