首页 > 其他分享 >vba 其他循环语句 (goto语句等…)

vba 其他循环语句 (goto语句等…)

时间:2023-03-07 12:13:17浏览次数:38  
标签:语句 Gosub vba Return goto num line

(1)Goto line 该语句为跳转到line语句行 (2) On expression gosub destinatioinlist 或者 on expression goto destinationlist 语句为根据 exprssion表达式值来跳转到所要的行号或行标记 (3)Gosub line…line…Return语句,  Return 返回到 Gosub line行,如下例:

Sub gosubtry()
      Dim num
      Num=inputbox(“输入一个数字,此值将会被判断循环”)
      If num>0 then Gosub Routine1 :Debug.print num:Exit  sub
      Routine1:
      Num=num/5
      Return
End sub
(4)while…wend语句,只要条件为TRUE,循环就执行,这是以前VB老语法保留下来的,如下 例:
while condition      ‘while I<50
[statements]        ‘I=I+1
wend                  ‘Wend

 

标签:语句,Gosub,vba,Return,goto,num,line
From: https://www.cnblogs.com/shizunatsu/p/17187584.html

相关文章

  • vba 错误语句处理
    执行阶段有时会有错误的情况发生,利用OnError语句来处理错误,启动一个错误的处理程序。语法如下:OnErrorGotoLine‘当错误发生时,会立刻转移到line行去OnError......
  • 使用反射简化批量保存sql语句
    写批量保存的时候遇到实体类字段比较多的时候写起来非常的头疼,所以我想能不能通过程序自动获取拼接思路:1.通过反射获取实体类的所有字段2.把字段拼接为id,user_name,us......
  • Java中如何解析SQL语句、格式化SQL语句、生成SQL语句?
    昨天在群里看到有小伙伴问,Java里如何解析SQL语句然后格式化SQL,是否有现成类库可以使用?之前TJ没有做过这类需求,所以去研究了一下,并找到了一个不过的解决方案,今天推荐给大家......
  • SQL语句
    MySQL是c/s架构第三方(图形化)工具:workbenchNavicatSQlyogphpmyadmin连接服务器配置信息:地址,端口号,用户名,密码常见的数据库:mysqloraclesql_server行:row   列:column......
  • 3. 循环语句
    3.循环语句while循环引入不知道大家是否喜欢下象棋,反正楼下大爷还是挺喜欢的~如果这盘棋下完了,可以收拾一下接着重来一局,这重来一局说到底就是重复软件中也是需要这......
  • vba 数据类型
    VBA共有12种数据类型,具体见下表,此外用户还可以根据以下类型用Type自定义数据类型。数据类型类型标识符 字节  字符串型String$ 字符长度(0-65400)  字......
  • 分支语句
    分支语句什么是分支语句?根据条件判断,选择执行方向运算结果为布尔类型,执行方式不再是线性的流程图:开始结束判断程序主体输入/输出子流程数据来源去向相关......
  • 使用IntelliJ IDEA操作Hive时,执行查询语句报错
    问题描述:同样的查询语句在Hive客户端中能够顺利执行,而通过JDBC查询时报如下错误:org.apache.hadoop.security.AccessControlException:Permissiondenied:user=root,ac......
  • java实体类转换为建表语句
    点击查看代码importcn.hutool.core.util.StrUtil;importlombok.Data;importjava.lang.reflect.Field;importjava.util.Collections;importjava.util.List;/*......
  • vba 流程控制语句 if
    if判断有三种格式 SubTest()Dimthe_valuethe_value=ThisWorkbook.Sheets("Sheet1").Range("A1").ValueEndSub 1.if...endifWithThisWorkbo......