running the list box query after open the form

[kowol]

I have the form which takes too long to open due to the list box in the form
The list box shows the result based on the text box input.
Is there a way to run the list box query after opening the form so that I can open the form quicker?

Thanks

 

[Isskint]

Leave the Listbox Rowsource blank and provide it after the Text box has been populated, something like;

Private Sub Textbox_AfterUpdate()
Dim strSQL as String
StrSQL = "SELECT [FieldX],[FieldY],[FieldZ] FROM tableA WHERE [Field]='" & Textbox & "';"
Listbox.RowSource = strSQL
End Sub