例如,要判断是否成绩在80~90之间
If x>=80 And x<=90 Then
Print "成绩在80~90之间"
Else
Print "成绩不是在80~90之间"
End If
如果多个条件中只要满足一个就可以的话,应该这么写:
例如,如果语数外有不及格的同学必须参加补考,已知三门成绩判断是否需要补考:
If x<60 Or y<60 Or z<60 Then
Print "需要补考"
Else
Print "不需要补考"
End IfDim I As Integer, N As Integer
Dim P As Integer
N = InputBox("请随意输入一个大于1的正整数:")
If N = 2 Then MsgBox "2是素数!": Exit Sub
P = 2
Do
If N Mod P = 0 Then
MsgBox N & "不是素数!"
Exit Sub
End If
P = P + 1
Loop Until P = N
MsgBox N & "是素数!"
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)