Приостановление выполнения функции - VB

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

Создал для теста 2 формы на первой форме label1 и Command1 на второй Command1 и Text1 На первую форме нажимаем на кнопку открывается вторая форма и должна ждать 1 форма пока не закроется вторая то есть дальше не идти выполнение программы в 1 форме пока 2 не закроется. форма 1

Private Sub Command1_Click()
Form2.Show
Label1.Caption = Form2!Text1.Text
End Sub
 
Private Sub Form_Unload(Cancel As Integer)
End
End Sub

Форма 2

Private Sub Command1_Click()
Form2.Hide
End Sub
 
Private Sub Command2_Click()
Form2.Hide
End Sub

И как можно закрыть полностью одну форму чтобы другая не закрылась Form2.Hide это только прятать form2.Visible =False это делать невидимой и тогда приходится в чтобы завершить все ну в 1 форме писать end если не напишешь то тогда формы пропадут но в диспетчере задач останится что эта программа работает

Решение задачи: «Приостановление выполнения функции»

textual
                            Листинг программы 
                        
                            Dim s As String