VB循环语句For-Next如何使用,最好举例子
1个回答
展开全部
LS你那个是C和VB的结合体啊。。。
求1+2+3+…+100的和
Private
Sub
Command1_Click()
Dim
i
As
Integer
Dim
s
As
Integer
For
i
=
1
To
100
'i的值从1到100，每循环1次i的值加1，直到超过100
s
=
s
+
i
Next
MsgBox
s
End
Sub
求2+4+6+…+100的和
Private
Sub
Command1_Click()
Dim
i
As
Integer
Dim
s
As
Integer
For
i
=
2
To
100
Step
2
'i的值从2到100，每循环1次i的值加2，直到超过100
s
=
s
+
i
'Step表示步长，就是每次循环后i增加的值，可以取负值
Next
'省略Step时，默认是1
MsgBox
s
End
Sub
求1+2+3+…+100的和
Private
Sub
Command1_Click()
Dim
i
As
Integer
Dim
s
As
Integer
For
i
=
1
To
100
'i的值从1到100，每循环1次i的值加1，直到超过100
s
=
s
+
i
Next
MsgBox
s
End
Sub
求2+4+6+…+100的和
Private
Sub
Command1_Click()
Dim
i
As
Integer
Dim
s
As
Integer
For
i
=
2
To
100
Step
2
'i的值从2到100，每循环1次i的值加2，直到超过100
s
=
s
+
i
'Step表示步长，就是每次循环后i增加的值，可以取负值
Next
'省略Step时，默认是1
MsgBox
s
End
Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
TableDI
2024-07-18 广告
VLOOKUP是Excel中用于垂直查找的函数，其基本用法包括四个参数：1. 查找值：即在数据表首列中需要搜索的值。2. 数据表：包含查找值的单元格区域或数组。3. 返回值所在列数：指定返回查询区域中第几列的值。4. 查找方式：选择精确匹配...
点击进入详情页
本回答由TableDI提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
