vba For Each x ln Range()是什么意思

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 18:47:43

vba For Each x ln Range()是什么意思
vba For Each x ln Range()是什么意思

vba For Each x ln Range()是什么意思
for each 语句是遍历数组的一种方式,通常对于一些数组元素个数不确定的数组用for each语句,比如:
dim Range()as ingeger 定义一个动态整形数组
dim n as ingeger ,s as ingteger n为数组元素个数,s计算数组元素的和
n=inputbox("输入数组的个数") 给n赋值
redim Range(n) 重新定义数组为n个元素
for i= 0 to n 用for循环给重新定义的数组赋值
Range(i)=i+1 每个元素的值为下标加1
next i
for each x in Range 用for each 循环遍历range数组,x代表是range数组中的元素
s=s+x 累加求每个元素的和
next x
print s 输出和值s