友情提示：如果本网页打开太慢或显示不完整，请尝试鼠标右键“刷新”本网页！
excel_vba_编程教程(完整版)-第34部分
快捷操作: 按键盘上方向键 ← 或 → 可快速上下翻页 按键盘上的 Enter 键可回到本书目录页 按键盘上方向键 ↑ 可回到本页顶部! 如果本书没有阅读完，想下次继续接着阅读，可使用上方 "收藏到我的浏览器" 功能 和 "加入书签" 功能！
达式时，它将评估该表达式是对还是错。
表5…1 VBA中的关系运算符
运算符 描述
= 等于
不等于
》 大于
102
… 页面 119…
《 小于
》= 大于等于
50 Then
MsgBox 〃The exact value is 〃 & ActiveCell。Value
Debug。Print ActiveCell。Adress & 〃： 〃 & ActiveCell。Value
End If
在上面的例子中，如果当前单元格数值小于等于50的话，那么在关键字Then和End If之间的语句就
不会执行。注意，If…Then语句必须以关键字End If结束。VB如何作决定呢？它评估在关键字If
和Then中间找到的条件。我们来评估一下下面的条件：ActiveCell。Value 》50
1。 在一个空白工作表上选择任意一个单元格并输入50
2。 切换到VB编辑器窗口
3。 激活立即窗口
4。 输入下述语句，并且按下回车键
？ ActiveCell。Value 》50
回车后，VB写下测试结果——false。当测试结果为假时，VB将不会读代码中关键字Then之后的语
句，它将直接跳过去读下行代码，但是，如果没有其它的代码行时，程序就将结束。
5。 现在，将运算符改为小于等于号，并且让VB评估下述条件：
？ ActiveCell。Value 5000 Then Bonus = Sales * 0。05 Else MsgBox “No Bonus”
如果储存在变量Sales的值大于5000的话，那么VB将使用下述公式：Sales * 0。05来计算股红
（bonus）。然而，如果变量Sales不大于5000的话，VB就会显示信息“No Bonus”。If…Then…Else
语句应该用于决定执行两�
快捷操作: 按键盘上方向键 ← 或 → 可快速上下翻页 按键盘上的 Enter 键可回到本书目录页 按键盘上方向键 ↑ 可回到本页顶部!
温馨提示： 温看小说的同时发表评论，说出自己的看法和其它小伙伴们分享也不错哦！发表书评还可以获得积分和经验奖励，认真写原创书评 被采纳为精评可以获得大量金币、积分和经验奖励哦！