推荐点击下面图片，通过本站淘宝优惠价购买:
VB中if和elseif的用法是：
if...then...elseif...then...else...endif
切记在then的后面不要加冒号，加了冒号出现else没有if的错误，因为加了冒号表示这个if只是执行then的语句就算执行完了，因此如下
Sub test()
Dim i As Integer
Dim j As Integer
Dim a
For i = To :
Debug.Print ("这是第" & Str(i) & "次循环")
a = InputBox("请输入")
If a = "" Then
MsgBox ("执行1")
Debug.Print ("执行1")
ElseIf a = "" Then
MsgBox ("执行2")
Debug.Print ("执行2")
ElseIf a = "" Then
MsgBox ("执行3")
Debug.Print ("执行3")
ElseIf a = "" Then
MsgBox ("执行4")
Debug.Print ("执行4")
ElseIf a = "" Then
MsgBox ("执行5")
Debug.Print ("执行5")
Else:
MsgBox ("什么都没有执行")
Debug.Print ("什么都没有执行")
End If
Next i
End Sub
如果是加了冒号那么只能是一个if：
Sub test()
Dim i As Integer
Dim j As Integer
Dim a
For i = To :
Debug.Print ("这是第" & Str(i) & "次循环")
a = InputBox("请输入")
If a = "" Then:
MsgBox ("执行1")
Debug.Print ("执行1")
Next i
End Sub
如果是以下这样子就会报错：
Sub test()
Dim i As Integer
Dim j As Integer
Dim a
For i = To :
Debug.Print ("这是第" & Str(i) & "次循环")
a = InputBox("请输入")
If a = "" Then:
MsgBox ("执行1")
Debug.Print ("执行1")
ElseIf a = "" Then:
MsgBox ("执行2")
Next i
End Sub
本文链接：https://hqyman.cn/post/3720.html 非本站原创文章欢迎转载，原创文章需保留本站地址！
休息一下，本站随机推荐观看栏目:
