一运行就报说else没有if  我仔细检查过 不缺啊,还望高手赐教 急!
Private Sub Command1_Click()
    If Text1 = "1,2,3,6,11,12" Then
    
        If Text3 >= "30" Then
           Label6 = "您订票的优惠率为: 25%"
        Else
           Label6 = "您订票的优惠率为: 10%"
    ElseIf Text1 = "4,9" Then
    
            If Text2 = "28,29,30" Then
                If Text3 >= "30" Then
                    Label6 = "您订票的优惠率为: 35%"
                Else
                    Label6 = "您订票的优惠率为: 15%"
            Else
                If Text3 >= "30" Then
                    Label6 = "您订票的优惠率为: 25%"
                Else
                    Label6 = "您订票的优惠率为: 10%"
    
    
    ElseIf Text1 = "5,10" Then
    
            If Text2 = "1 to 8" Then
                If Text3 >= "30" Then
                    Label6 = "您订票的优惠率为: 35%"
                Else
                    Label6 = "您订票的优惠率为: 15%"
            Else
                If Text3 >= "30" Then
                    Label6 = "您订票的优惠率为: 25%"
                Else
                    Label6 = "您订票的优惠率为: 10%"
    
    
    Else
    
            If Text3 >= "30" Then
    
                Label6 = "您订票的优惠率为: 30%"
            Else
                Label6 = "您订票的优惠率为: 20%"
    End If
End Sub