EXECUCAO DE SUB FORM... USA-SE THREADS?

Public Class Backup

   Public Shared Sub DispararBackup()
      [ô][código do backup]
   End Sub

End Class

Public Class PrincipalForm
   Private Sub EventoMenu_Click(ByVal sender As Object, ByVal e As System.EventArgs)
      [ô][códdigos...]
      LoadingForm.sub = [Ô]backup[Ô]
      LoadingForm.ShowDialog()
   End Sub
End Class

Public Class LoadingForm 
   Private Sub LoadingForm _Load(sender As Object, e As EventArgs) Handles MyBase.Load
      [ô][códdigos...]
      If sub = [Ô]backup[Ô] then
         Backup.DispararBackup()
         Me.Hide()
      End If
   End Sub
End Class

            AtivaLoading();
                this.Refresh();
                try
                {   //-> testa a conexão com SQL se der erro evita abrir o formulário                    

                    //Codigo Foxman VBMaia
                    BackgroundWorker bw = new BackgroundWorker();
                    bw.WorkerSupportsCancellation = true;
                    bw.WorkerReportsProgress = true;
                    bw.DoWork += new DoWorkEventHandler(backgroundWorker_DoWork);
                    bw.ProgressChanged += new ProgressChangedEventHandler(backgroundWorker_ProgressChanged);
                    bw.RunWorkerCompleted += new RunWorkerCompletedEventHandler(backgroundWorker_RunWorkerCompleted);

                    bw.RunWorkerAsync();
                    while (bw.IsBusy)
                    {
                        Application.DoEvents();
                    }

                    if (resultado != true)  //-> Aqui checo se final do teste de serviço SQL e Banco está ativos vindos do evento da thread.
                    {
                        MessageBox.Show([Ô]ErroAbrirForm[Ô], [Ô]TituloAvisoMSG[Ô], MessageBoxButtons.OK, MessageBoxIcon.Stop);
                        DesativaLoading();
                        return;
                    }
                }
                catch (Exception)
                {
                    MessageBox.Show([Ô]ErroAbrirForm[Ô], [Ô]TituloAvisoMSG[Ô], MessageBoxButtons.OK, MessageBoxIcon.Stop);
                    DesativaLoading();
                    return; //-> cancela abertura
                }   

 private void backgroundWorker_DoWork(object sender, DoWorkEventArgs e)
        {   //-> Dispara teste de verificação se serviço SQL e Banco está acessíveis
            IniciaTesteBanco(); [txt-color=#e80000]//inclua aqui seu backup[/txt-color]        }

        //-> Método executado durante execução do thread
        private void backgroundWorker_ProgressChanged(object sender, ProgressChangedEventArgs e)
        {
             //não precisei utilizar, mas se tiver necessidade....
        }

        //-> Método executado ao fim do thread
        private void backgroundWorker_RunWorkerCompleted(object sender, RunWorkerCompletedEventArgs e)
        {
            DesativaLoading();
        }  

  Private Sub EventoMenu_Click(ByVal sender As Object, ByVal e As System.EventArgs)

[ô]...
            Case [Ô]28_disparar_backup[Ô]

                AguardeForm.Show()

                Try
                    Me.BackgroundWorker.RunWorkerAsync()
                Catch generatedExceptionName As Exception
                    MessageBox.Show([Ô]ErroAbrirForm[Ô], [Ô]TituloAvisoMSG[Ô], MessageBoxButtons.OK, MessageBoxIcon.[Stop])
                    AguardeForm.Hide()
                    Return
                End Try

        [ô]...  
End Sub

Private Sub BackgroundWorker_DoWork(sender As Object, e As DoWorkEventArgs) Handles BackgroundWorker.DoWork

        Try
            Backup.DispararBackup()
        Catch ex As Exception
            MessageBox.Show(ex.Message, [Ô]Alerta de Erro[Ô], MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try

End Sub

    Private Sub BackgroundWorker_RunWorkerCompleted1(sender As Object, e As RunWorkerCompletedEventArgs) Handles BackgroundWorker.RunWorkerCompleted

        System.Threading.Thread.Sleep(3000)
        AguardeForm.Hide()
        MsgBox([Ô]Completo[Ô])

      End Sub