一、条件控制IF

if  逻辑表达式 then
语句块
end if

  带else的if语句:

 If  逻辑表达式1 Then
语句块1
ElseIf 逻辑表达式2 Then
语句块2
ElseIf 逻辑表达式3 Then
语句块3

Else
语句块n
End If

二、条件判断Select/Case

Select Case 测试表达式
   Case 条件表达式1
   语句块1
   Case 条件表达式2
   语句块2
  Case 条件表达式3
   语句块3
   ......
   Case 条件表达式n
   语句块n
   Case Else
   语句块Else
End Select.

  示例:

Sub test()
  If [a1].Value = "" Then
      MsgBox "A1单元格没有输入数字。"
      Exit Sub '     退出程序
  End If
  Select Case [a1].Value
      Case To
          MsgBox "差"
      Case To
          MsgBox "不及格"
      Case To
          MsgBox "及格"
      Case To
          MsgBox "良好"
      Case Else
          MsgBox "优秀"
  End Select
End Sub

三、循环控制For/Next

 For 循环变量=初值 to 终值 step 步长
循环体1
[exit for]
循环体2
next 循环变量

  示例:(步长默认为1,next后的循环变量可以省略 )

Sub mysum()
  Dim Lsum As Long, i As Long
  For i = To
      Lsum = Lsum + i
  Next
  MsgBox "1到1000的自然数和为:" & Lsum
End Sub

  //更多实例,参考开篇链接

四、循环控制For/Each

For Eacn 元素变量 In 对象集合或数组名称
语句块1
[Exit For]
语句块2
next 元素变量

  //与上一个循环类似,这里采用元素变量从对象集合中取得方式

五、循环控制Do/While

 Do Wihle 循环条件
语句块1
[Exit Do]
语句块2
Loop Do
语句块1
[Exit Do]
语句块2
Loop Wihle 循环条件

  //示例暂略

六、循环控制Do/Until

Do Until 循环条件
语句块1
[Exit Do]
语句块2
Loop Do
语句块1
[Exit Do]
语句块2
Loop Until 循环条件

  //与Do/While相反的是为真时退出

七、循环控制GoTo

Sub mysum()
Dim Lsum As Long, i As Long
i =
x: '为go to 语句设置的标签,必须以英文状态下的冒号结尾
   Lsum = Lsum + i
   i = i +
If i <= Then GoTo x '如果i<=1000,则程序跳到标签X处
MsgBox "1到1000的自然数和为:" & Lsum
End Sub

excel的宏与VBA入门(三)——流程控制的更多相关文章

  1. excel的宏与VBA入门(一)——基础概念

    一.概述 "记录宏"其实就是将工作的一系列操作结果录制下来,并命名存储(相当于VB中一个子程序). 宏其实就是VBA写的,但是可以通过录制的方法制作宏,做好的宏你可以查看相应的VB ...

  2. excel的宏与VBA入门(二)——数据类型与变量

    一.属性与方法 1.属性 上面单击对象,下面即显示对应的属性: 2.方法 双击左上的对象,即可看到相应的方法: 二.数据类型 到 Boolean True 或 False , 到 , ,,, 到 ,, ...

  3. excel的宏与VBA入门——代码调试

    直接介绍重点: 常用的操作是导航栏的逐句与断点: 添加断点:调试->切换断点 单步运行:调试->逐句 查看变量的窗口:视图->本地窗口

  4. python语法入门之流程控制

    python语法入门之流程控制 流程控制是指控制流程,具体指控制程序执行的流程. 流程控制分为三种: 1.顺序结构 程序从上而下的正常执行(正常执行的代码就是顺序结构) 2.分支结构 赋予程序人的思维 ...

  5. Swift中文教程(三)--流程控制

    原文:Swift中文教程(三)--流程控制 Swift用if和switch编写条件控制语句,用for-in,for,while和do-while编写循环.条件控制语句和循环语句中,小括号是可选的,但花 ...

  6. 04 Python入门学习-流程控制(if else elif while for)

    一:流程控制if 语法一: if 条件: code1 code2 code3 ... age = 20 height = 170 weight = 60 sex = 'female' is_beaut ...

  7. Python3.7.4入门-2流程控制工具

    2 流程控制工具 记得在语句后加冒号 2.1 while # Fibonacci series: # the sum of two elements defines the next a, b = 0 ...

  8. 04-Python入门学习-流程控制

    一.流程控制if 语法1: if 条件:  code1  code2  code3  .... age=180 height=163 weight=75 sex='female' is_beautif ...

  9. 数据类型(三) + 流程控制(一) day05

    目录 昨日回顾 (三) 花式赋值 链式赋值 交叉赋值 (四) 列表list (五) 字典dict (六) 布尔值 (七) 解压缩 (八) python与用户交互的方式 (九) 三种格式化输出的方式 f ...

随机推荐

  1. 浅谈http协议六种请求方法,get、head、put、delete、post、options区别

    标准Http协议支持六种请求方法,即: 1.GET 2.POST 3.PUT 4.Delete 5.HEAD 6.Options 但其实我们大部分情况下只用到了GET和POST.如果想设计一个符合RE ...

  2. ActiveReports 报表控件V12新特性 -- 页面报表新增子报表

    ActiveReports是一款专注于 .NET 平台的报表控件,全面满足 HTML5 / WinForms / ASP.NET / ASP.NET MVC / WPF 等平台下报表设计和开发工作需求 ...

  3. HCTF2018 pwn题复现

    相关文件位置 https://gitee.com/hac425/blog_data/tree/master/hctf2018 the_end 程序功能为,首先 打印出 libc 的地址, 然后可以允许 ...

  4. JUnit手动设计测试方法以及与Randoop的自动生成测试的比较

    手动设计测试 在已有的web project本地目录lib文件夹里导入两个jar文件(版本可不一样):junit-4.12.jar和hamcrest.jar 打开eclipse,导入项目,右击项目选择 ...

  5. React Native常用第三方组件汇总--史上最全 之一

    React Native 项目常用第三方组件汇总: react-native-animatable 动画 react-native-carousel 轮播 react-native-countdown ...

  6. Mongodb的入门(4)mongodb3.6的索引

    Mongodb的索引: 在介绍索引之前,再强调一下nosql数据库和sql数据库的区别: sql数据库:结构化数据,定好了表格后,每一行的内容都是结构化的 mongo:文档数据,表下的数据都可以有自己 ...

  7. 6.1 函数的返回值、匿名函数lambda、filter函数、map函数、reduce函数

      函数的返回值: 函数一旦执行到   return,函数就会结束,并会返回return 后面的值,如果不使用显式使用return返回,会默认返回None . return None可以简写为   r ...

  8. AWS CSAA -- 04 AWS Object Storage and CDN - S3 Glacier and CloudFront(四)

    026 S3 Summary

  9. win Server 2008 笔记

    1.开启tsmmc 远程登录连接 需要在入站规则中启用一下规则 远程管理(RPC-EPMAP) 远程管理(RPC) 远程管理(RPCNP-IN) 远程管理(TCP-IN) 远程管理 - RemoteF ...

  10. Windows用命令打开常用的设置页面和常用快捷键

    Win+R输入以下内容来快捷打开常用设置 compmgmt.msc # 计算机管理 diskmgmt.msc # 磁盘管理 devmgmt.msc # 设备管理 services.msc # 服务管理 ...