码迷,mamicode.com
首页 > 编程语言 > 详细

VBA if...elseif...else语句

时间:2019-08-13 21:07:44      阅读:770      评论:0      收藏:0      [点我收藏+]

标签:oct   一个   目的   else   excel   boolean   cti   bool   col   

一个If语句,后面可以跟一个或多个由布尔表达式组成的elseif语句,然后是一个默认的else语句,当所有条件变为false时执行else语句块。

语法

以下是VBScript中If...Elseif...Else语句的语法。

If(boolean_expression) Then
   Statement 1
   .....
   .....
   Statement n
ElseIf (boolean_expression) Then
   Statement 1
   .....
   ....
   Statement n
ElseIf (boolean_expression) Then
   Statement 1
   .....
   ....
   Statement n
Else
   Statement 1
   .....
   ....
   Statement n
End If

流程图

技术图片

示例

为了演示目的,这里借助一个函数找出两个Excel中最大的数字。如下图示 -

技术图片

参考实现代码

Private Sub if_demo_Click()
   Dim x As Integer
   Dim y As Integer

   x = 10
   y = 10

   If x > y Then
      MsgBox ("X 大于 Y 的值")
   ElseIf y > x Then
      MsgBox ("Y 大于 X 的值")
   Else
      MsgBox ("X 和 Y 的值相等")
   End If
End Sub

执行上面示例代码,得到以下结果

 技术图片

 

 

VBA if...elseif...else语句

标签:oct   一个   目的   else   excel   boolean   cti   bool   col   

原文地址:https://www.cnblogs.com/sunyllove/p/11348151.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!