VBA:For Each循环（vba for循环语句）
liebian365 2024-11-16 23:12 44 浏览 0 评论
本文内容
- 语法
- 备注
- 示例
- 另请参阅
对数组或集合中的每个元素重复一组语句。
语法
对于组中的每个元素
[ 语句 ]
[ Exit for ]
[ 语句 ]
下一个 [ 元素 ]
“For...Each...Next”语句语法包含以下部分：
Part | 说明 |
元素 | 必填。 用于循环访问集合或数组的变量。 对于集合， 元素 只能是 Variant 变量、泛型对象变量或任何特定对象变量。 对于数组，元素 仅可是 Variant 变量。 |
组 | 必填。 对象集合或数组（用户定义类型的数组除外）的名称。 |
statements | 可选。 在组 中的每个项目上执行的一个或多个语句。 |
备注
如果组 中有至少一个元素，则进入“For…Each”块。 输入循环后，将针对 组中的第一个元素执行循环中的所有语句。 如果组 中有多个元素，则继续为每个元素执行循环中的语句。 组 中不再有元素时，退出循环并继续执行“Next”语句后的语句。
任意数量的 Exit For 语句可以放置在循环中的任意位置，作为退出的替代方法。 计算某些条件后，通常使用 Exit For，例如 If...然后，在“下一步”之后立即将控制权转移到 语句。
可通过将“For...Each...Next”循环放置在另一个该循环内来嵌套“For...Each...Next”循环。 但是，每个，每个循环元素 必须是唯一的。
备注
如果忽略“Next”语句中的元素，则像包括了元素 一样继续执行。 如果先遇到“Next”语句再遇到其相应的“For”语句，则将发生错误。
不可随用户定义类型的数组一起使用“For...Each...Next”语句，因为“变量”不可包含用户定义类型。
示例
此示例使用“For Each...Next”语句搜索集合中所有元素的“文本”属性，以搜索是否存在字符串“Hello”。 在该示例中，MyObject 是文本相关对象并且使集合 MyCollection的元素。 二者皆是仅用于说明目的的通用名称。
VB复制
Dim Found, MyObject, MyCollection
Found = False ' Initialize variable.
For Each MyObject In MyCollection ' Iterate through each element.
If MyObject.Text = "Hello" Then ' If Text equals "Hello".
Found = True ' Set Found to True.
Exit For ' Exit loop.
End If
Next相关推荐
- 深度解密epoll 如何工作的?（epoll基本处理流程）
-
epoll...
- 大乐透第19082期:头奖开出7注1000万分落六地 奖池41亿元
-
2019年7月17日晚开奖的体彩超级大乐透第19082期开奖号码为：前区06、18、20、21、31，后区03、04。本期大乐透前区号码五区比为1:0:3:0:1，二区和四区号码没有给出。当期前区和值...
- 【开奖】4月27日周六:福彩、体彩（2021年4月27日体彩开奖结果）
-
4月27日开奖福彩3D第2019110期：61222选5第2019110期：0812202122排列3第19110期：303排列5第19110期：30305大乐透第19047期：0304...
- “红狒狒”落户哈尔滨铁路局（哈尔滨铁路红肠）
-
这几天，“红人”“红狒狒”在牡丹江机务段可引起了不小的轰动，众粉丝争相与其拍照留念，在该段人气爆棚！“红狒狒”到底何许人也？“红狒狒”，中文名：和谐3D型电力机车；绰号：红狒狒、番茄；制造商：大连机...
- 2D、3D、2.5D，做游戏还是搞噱头?玩家都晕了
-
前言游戏类型就像某种潮流，一种流行罢，另一种接棒成为主流。前两年的新作大多以“开放世界”为标签，在追求纯沙盒的过程中打造出一些细致的分类，比如说“类GTA沙盒”。诚然，纯碎的沙盒游戏并不多见，业内只有...
- 《战神4》PC版宣传片发布 GTX 1070即可60帧畅玩
-
在今年10月的时候索尼PlayStation官方正式宣布圣莫尼卡2018年的《战神4》将于2022年1月14日推出PC版本，官方在今天公布了一段PC版宣传片，并且公开了游戏的配置需求。下面让我们一起来...
- 男星深情好丈夫形象崩塌，半夜搂美女坐大腿，举止亲密
-
近日，于晓光被拍到深夜在酒吧玩，结束后与一名女子一起上车离开。上车后，女子直接坐在了他腿上，他也顺势搂着美女，美女满脸笑容地坐在他腿上玩手机离开。可能有人会好奇，于晓光是谁呢？于晓光是韩国艺人秋瓷炫的...
- d3d12dll丢失怎么修复?d3d12dll加载失败怎么解决?
-
d3d12.dll丢失怎么修复？d3d12.dll加载失败怎么解决？很多朋友想要运行游戏的时候都会遇到这个问题，这种情况该怎么办呢？今天系统之家小编给朋友们讲讲具体的解决方法，操作其实还蛮简单的。...
- 许多玩家反馈《生化4RE》PC一直崩溃 无法进入游戏
-
今日（3月24日），卡普空《生化危机4：重制版》正式发售，然而有部分PC玩家遇到了游戏崩溃等问题。很多玩家在贴吧发帖称游戏遇到了严重的崩溃问题，且经常反复，报错代码普遍为FatalD3Derror...
- 微软正式推出适用于WSL Linux的D3D12 GPU视频加速技术
-
今天，微软正式向WindowsSubsystemforLinux(WSL)用户发布了Direct3D12GPU视频加速支持。在微软通过WSL允许在Linux下使用Open...
- 《怪物猎人:崛起》曙光系统报错“Fatal d3d error”的解决办法
-
《怪物猎人：崛起》曙光系统报错“Fatald3derror”的解决办法不少小伙伴反应《怪物猎人：崛起》DLC曙光预载以后打不开游戏，出现了Fatald3derror类似的错误代码，这类问题的解...
- Mac+双屏，前端程序员的专业配置 - Loctek 乐歌 D3D 双屏电脑显示器支架
-
做FE也有一段日子了，电脑屏幕每天在设计稿、浏览器、IDE、即时通讯工具、Terminal、邮箱之间切换。虽然mac的工作区带来了很多灵活，但是依然略显不足。于是入手支架，把公司配的电脑和显示器发挥起...
- RPC 的原理和简单使用（rpc详解）
-
RPC的概念RPC，RemoteProcedureCall，翻译成中文就是远程过程调用，是一种进程间通信方式。它允许程序调用另一个地址空间（通常是共享网络的另一台机器上）的过程或函数。在调用的...
- 大厂开源的golang微服务rpc框架 — kitex
-
提前rpc估计所有的开发同学都知道，不知道的也无所谓，毕竟我也好几年没用了，今天带大家在复习一下。RPC(RemoteProcedureCall)：远程过程调用，...
- 干货!一文掌握Protobuf所有语言所有用法，快收藏
-
说实话，Protobuf这个库，让人相见时难别亦难，东风无力百花残，每次等到要用它的时候，总感觉还没有完全掌握它的用法，而实际上等去百度或者谷歌的时候，教程都是多么的凌乱不堪。学会它，最直接关系到的，...
欢迎 你 发表评论:
- 一周热门
- 最近发表
- 标签列表
-
- wireshark怎么抓包 (75)
- qt sleep (64)
- cs1.6指令代码大全 (55)
- factory-method (60)
- sqlite3_bind_blob (52)
- hibernate update (63)
- c++ base64 (70)
- nc 命令 (52)
- wm_close (51)
- epollin (51)
- sqlca.sqlcode (57)
- lua ipairs (60)
- tv_usec (64)
- 命令行进入文件夹 (53)
- postgresql array (57)
- statfs函数 (57)
- .project文件 (54)
- lua require (56)
- for_each (67)
- c#工厂模式 (57)
- wxsqlite3 (66)
- dmesg -c (58)
- fopen参数 (53)
- tar -zxvf -c (55)
- 速递查询 (52)