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
IF语句
原文：http://www.cnblogs.com/qcl_008/p/4810418.html
