When I try to open the Form I get an error ("Application defined or object error"), can someone help me?
VBA Code:
lb_erro_email.Visible = False
lb_erro_confirmar_email.Visible = False
lb_confirmar_checkboxes.Visible = False
Select Case True
Case Trim(tb_email) = "" And Trim(tb_confirmar_email) = ""
lb_erro_email.Visible = True
lb_erro_confirmar_email.Visible = True
Case Trim(tb_email) = ""
lb_erro_email.Visible = True
Case Trim(tb_confirmar_email) = ""
lb_erro_confirmar_email.Visible = True
Case tb_email <> tb_confirmar_email
lb_erro_confirmar_email.Visible = True
lb_erro_confirmar_email.Caption = "Os E-mails não correspondem"
Case Else
If cb_confirmar_credenciais = False Or cb_receber_email = False Then
lb_confirmar_checkboxes.Visible = True
Else
email = tb_email.Value
Unload Me
Registar_Complete.Show
End If
End Select
End Sub