预期语句 End If

我在表单中设置了以下代码，但收到“预期语句”错误。我第一次这样做并认为我的语法正确，我错过了什么？

            <%
            If Trim(oQuote("shipmeth"))="FREIGHT" Then 
                Response.Write "Freight" 
            ElseIf Trim(oQuote("shipmeth"))="THRSHLD" Then 
                Response.Write "Threshold"
            End If
            %>

使用嵌套 2 路条件时，每个条件必须由自己的条件结束End If:

If condition_A Then
  action_A
Else
  If condition_B Then
    action_B
  Else
    If condition_C Then
      action_C
    Else
      action_D
    End If 'condition_C
  End If 'condition_B
End If 'condition_A

只有 n 路条件可以用单个条件关闭End If（因为它只是一个条件）：

If condition_A Then
  action_A
ElseIf condition_B Then
  action_B
ElseIf condition_C Then
  action_C
Else
  action_D
End If

然而，这种 n 路条件仅在您检查不同的条件时才有意义，例如

If IsEmpty(a) Then
  ...
ElseIf b > 23 Then
  ...

当检查同一变量的不同值时，最好使用Select声明为Alex K.建议：

Select Case foo
  Case "a"
    'handle foo="a"
  Case "b", "d"
    'handle foo="b" as well as foo="d"
  Case Else
    'handle non-matches
End Select