Regarding the following code:

Vb.net Code:
  1. Private Sub bgw_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles bgw.DoWork
  2.         Try
  3.             Dim testEmail As New NetEmail("[email protected]", TextBox4.Text.Trim, TextBox5.Text.Trim, TextBox6.Text.Trim, TextBox7.Text.Trim)
  4.             testEmail.AddEmail("[email protected]")
  5.             testEmail.Timeout = 10000
  6.             testEmail.EnableSSL = CheckBox1.Checked
  7.             testEmail.AddMessage("Test message")
  8.             testEmail.Send("[email protected]", "Test Email")
  9.             btnNext.Enabled = True
  10.             bgw.ReportProgress(100)
  11.         Catch ex As Exception
  12.             bgw.ReportProgress(0, ex)
  13.             btnNext.Enabled = False
  14.         End Try
  15.     End Sub
  16.  
  17.     Private Sub bgw_ProgressChanged(ByVal sender As System.Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles bgw.ProgressChanged
  18.         If e.ProgressPercentage = 0 Then
  19.             Dim CaughtEx As Exception = DirectCast(e.UserState, Exception)
  20.             MessageBox.Show(CaughtEx.Message)
  21.             MessageBox.Show("Your email settings were not configured")
  22.         ElseIf e.ProgressPercentage = 100 Then
  23.             MessageBox.Show("Test Successfull")
  24.         End If
  25.     End Sub
if an exception is thrown, the first messagebox is showing the the Exception message. The second messagebox Is NOT SHOWN.
if it is succesfull THE MESSAGE BOX is still NOT SHOWN?

does anyone know whatsup?