Подскажите идею, как параллельно подвесить модальную немигающую форму! - VB

Формулировка задачи:

Как сделать так, чтобы параллельно с неким бесконечным циклом на экране непрерывно висела модальная форма, отображающая счетчик этого цикла и позволяющая вводить значения, управляющие циклом - например количество повторений, форма не должна мигать, что происходит при включении-выключении формы.

Решение задачи: «Подскажите идею, как параллельно подвесить модальную немигающую форму!»

textual
                            Листинг программы 
                        

                            While True  
' Некие содержательные операторы цикла
' Запуск модальной формы :
frmCont.Visible = False: frmCont.Enabled = True: frmCont.Show vbModal  , которая через Timer1.Interval(на форме запускаетс таймер на 500 ms ) прекращает работу с установкой :
With frmCont .Visible = False: .Show vbModeless: .Enabled = False End With ' именно эта перерисовка формы позволяет протолкнуть программу дальше, оставляя ее на экране на время выполнения содержательных операторов цикла в недоступном виде
' Продолжение работы программы после выхода из формы
' Анализ переменных формы :
if Form1.Text1.Text='выход' then Exit While '->
Wend
                        