在嵌套if语句不工作时退出子版

Question

我正在尝试编写一些VBA代码，并且几乎所有工作都很好。我只需要一点点帮助。

这里是我的代码：

'input if supervisor=fill in supervisor missing 
If UserForm1.superbox.Text = "Fill In Supervisor" Then 
    If UserForm1.fillbox.Text = "(Fill In Supervisor)" or UserForm1.fillbox.Text = "" Then 
     MsgBox ("Please Enter a Fill In Supervisor.") 
     Exit Sub 
    End If 
End If 

我与那些条件下运行它之后，Exit Sub失败。

Answer 1

我搞砸与它周围了一段时间，我想出了：

 'input if supervisor=fill in supervisor missing 
    Dim fis As Boolean 
     fis = False 

     If UserForm1.superbox.Text = "Fill In Supervisor" Then 
      While Not fis 
       If UserForm1.fillbox.Text = "(Fill In Supervisor)" Or UserForm1.fillbox.Text = "" Then 
        MsgBox ("Please Enter a Fill In Supervisor.") 
        Exit Sub 
       ElseIf UserForm1.fillbox.Text <> "(Fill In Supervisor)" Or UserForm1.fillbox.Text <> "" Then 
        fis = True 
       End If 
      Wend 
    End If 

代码的伟大工程为止！