Question

VB的一个IF循环语句语句问题Private Sub KEY_Click()Static CI,CL As Intege

Answer 1

把If和Msgbox写在 统一行,是默认为没有EndIf的条件句,把换行Msgbox写入If和EndIf中间即可

ElseIf方式：

If CI = 1 Then

MsgBox "第五位数字是" & PcE

ElseIf CI = 2 Then

MsgBox "第三位数字是" & PcC

ElseIf CI = 3 Then

MsgBox "第二位数字是" & PcB

ElseIf CI = 4 Then

MsgBox "第一位数字是" & PcA

ElseIf CI >= 5 Then

MsgBox "这还提示啊."

End If