Немодальная форма, которая все еще приостанавливает выполнение кода
Есть ли в любом случае пользовательская форма, которая действует немодально, но в то же время приостанавливает выполнение кода, как модальная форма?
Я бы хотел, чтобы пользовательская форма показывалась, но все же позволяла взаимодействовать с родительской программой. Модальные формы блокируют взаимодействие с родительской программой. Будет работать немодальная форма, но я бы хотел, чтобы выполнение кода приостанавливалось, пока форма работает.
Я работал над этим, создавая бесконечный цикл, который проверяет, видна ли форма, но это выглядит немного странно.
Public Sub GetFormInfoAndDoStuff
ufForm.show vbModeless
Do while ufForm.Visible
DoEvents
Loop
' Do other stuff dependent on form
End Sub
ИЗМЕНЕНО для уточнения того, что существует код после .show, который должен выполняться после заполнения пользовательской формы.