IF语句

Sub 判断()
Dim a%, b%
a = 1
b = 2
If (a > b) Then
MsgBox ("a比b大")
Else
MsgBox ("a比b小")
End If
End Sub

还有一种IFF的用法:

Sub iff判断()
Dim a%, b%, c$
a = 1
b = 2
c = IIf((a > b), "a>b", "a<b")
MsgBox c
End Sub

 

posted @ 2015-09-15 15:29  混混的IT生涯  阅读(132)  评论(0)    收藏  举报