Display SelectForm as a modal dialog with "vbModal" and then grab the info from it back in CallingForm:
Private Sub cmdCompany_Click()
Dim sf As New SelectForm
sf.Show vbModal ' <--- code in CallingForm STOPS here until "sf" is hidden
' ...grab some info directly from the HIDDEN "sf" instance...
Me.txtCompany.Text = sf.txtSomething.Text
End Sub
Private Sub cmdState_Click()
Dim sf As New SelectForm
sf.Show vbModal ' <--- code in CallingForm STOPS here until "sf" is hidden
' ...grab some info from "sf"...
Me.txtState.Text = sf.txtSomething.Text
End Sub
In SelectForm, you simpy HIDE the form in response to the "OK" button being clicked:
Private Sub cmdOK_Click()
Me.Hide ' <-- this causes the "modal" form to HIDE and execution to RETURN to CallingForm AFTER the .Show vbModal call line
End Sub