Am I trapped?

[Guest]

I use a popup form for two operations. I need to show different items in
EndowLstBx, depending on which operation I'm running. In a single-purpose
form, I would put code in the listbox RowSource. But when I do that here, it
is apparently too late to have an effect. What is the best strategy for
working around this? Thank you for any help!

Public Sub BreakDelPop(strAction As String)
If strAction = "Delete" Then
DoCmd.OpenForm "SWBBreakDelPopup"
With Forms!SWBBreakDelPopup
!EndowLstBx.RowSource = "SELECT ..."
End With
End If
End If
End Sub

 

[Guest]

Why don't you just populate the listbox dynamically via ADO or DAO table
queries in VB?