立即注册 找回密码

QQ登录

只需一步,快速开始

查看: 4514|回复: 0

[Excel VBA 2013视频教程] 09-程序流程控制—>if语句的介绍

[复制链接]

46

主题

0

回帖

982

积分

大学三年级

Rank: 4

积分
982
发表于 2017-9-20 01:33:04 | 显示全部楼层 |阅读模式
道勤网-数据www.daoqin.net
本帖最后由 excel交流 于 2017-9-20 01:34 编辑

1、if—then语句
  这个句式相当于中文里面的“如果.......那么”。
  格式:
    if  逻辑表达式 then
                              语句块
             end if
    解释:如果逻辑表达式的结果为true,则执行语句块里的所有语句,否则执行end if后面的语句。语句块可以是一句指令或多条指令,也可以调用一个或多个过程,当然,也可以为空,就是没有语句。
  如:要判断A1单元格是否已输入内容,设计程序:

  1. Sub test1()
  2.   If [a1] = "" Then
  3.       MsgBox "A1单元格没有输入任何内容!"
  4.   End If
  5. End Sub
复制代码
 2、 if—then—else语句  
  这个语句相当于中文里面的“如果......那么......否则......”句式。
  格式:

    if  逻辑表达式 then
                              语句块1
    else
                              语句块2
              end if


       解释:如果逻辑表达式的结果为true,则执行语句块1里的所有语句,如果逻辑表达式的结果为Flase则执行语句块2里的所有语句。
  如:要判断A1单元格是否已输入内容,设计程序:

  1. Sub test2()
  2.   If [a1] = "" Then
  3.         MsgBox "A1单元格没有输入任何内容!"
  4.   Else
  5.         MsgBox "A1单元格已经输入了内容!"
  6.   End If
  7. End Sub
复制代码
 3、if—then—elseif语句
  这就相当于中文里面的若“如果…那么…否则如果…那么…否则”语句,当然,可以有多句“否则如果.......”
  格式:
    If  逻辑表达式1 Then  
                              语句块1
                  ElseIf  逻辑表达式2  Then
                              语句块2
                  ElseIf  逻辑表达式3Then
                              语句块3
                   …
                 Else
                             语句块n
                 Eed If
  解释:若逻辑表达式1的结果为True,则执行语句块1,接着继续执行EndIf后面的语句;若逻辑表达式1的结果为False,则检查逻辑表达式2的结果,若为True则执行语句块2,接着继续执行EndIf后面的语句.......一直到所有结果的条件都不满足时,才执行Else后面的语句块n。
  如:要判断A1单元格的数是否能被2、3、5其中之一整除,设计程序:

  1. Sub test3()
  2.    If [a1] = "" Then
  3.        MsgBox "A1单元格没有输入任何内容!"
  4.    ElseIf [a1] Mod 2 = 0 Then
  5.        MsgBox "A1单元格的数能被2整除!"
  6.    ElseIf [a1] Mod 3 = 0 Then
  7.        MsgBox "A1单元格的数能被3整除!"
  8.    ElseIf [a1] Mod 5 = 0 Then
  9.        MsgBox "A1单元格的数能被5整除!"
  10.    Else
  11.        MsgBox "A1单元格的数不能被2、3、5其中之一整除!"
  12.    End If
  13. End Sub
复制代码


道勤主机提供365天*24小时全年全天无休、实时在线、零等待的售后技术支持。竭力为您免费处理您在使用道勤主机过程中所遇到的一切问题! 如果您是道勤主机用户,那么您可以通过QQ【792472177】、售后QQ【59133755】、旺旺【诠释意念】、微信:q792472177免费电话、后台提交工单这些方式联系道勤主机客服! 如果您不是我们的客户也没问题,点击页面最右边的企业QQ在线咨询图标联系我们并购买后,我们为您免费进行无缝搬家服务,让您享受网站零访问延迟的迁移到道勤主机的服务!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?立即注册

x
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

道勤网- 推荐内容!上一条 /2 下一条

!jz_fbzt! !jz_sgzt! !jz_xgzt! 快速回复 !jz_fhlb! !jz_lxwm! !jz_gfqqq!

关于我们|手机版|小黑屋|地图|【道勤网】-www.daoqin.net 软件视频自学教程|免费教程|自学电脑|3D教程|平面教程|影视动画教程|办公教程|机械设计教程|网站设计教程 ( 皖ICP备15000319号-1 )

GMT+8, 2024-12-23 22:08

Powered by DaoQin! X3.4 © 2016-2063 Dao Qin & 道勤科技

快速回复 返回顶部 返回列表