vb里的for循环语句怎么写

1.VB中的循环语句中的forFor循环的格式:
For 循环变量 = 初值 To 终值 [Step 步长] step 2 就是i=i+2
[循环体]
Next [循环变量]
注意:
1) 当步长 > 0 时
循环执行的条件:循环变量 <;= 终值
2) 当步长 < 0 时
循环执行的条件:循环变量 >;= 终值
强行退出 For 循环 , 请使用 Exit For 。
举例1: 单击命令按钮 Command1 后 , 先后弹出很多消息框 , 消息内容一开始是 1 , 最后是 100 , 每弹出一次 , 消息内容加 1 , 也就是 1; 2; 3;。; 98; 99; 100 。
VB 代码如下:
Private Sub Command1_Click()
Dim i As Long
For i = 1 To 100
MsgBox i
Next
End Sub
如果使用 For 语句 , 代码如下:
【vb里的for循环语句怎么写】Private Sub Form_Load()
For i = 1 To 100
MsgBox i, vbInformation /vbInformation 指显示图标 , 下同
Next
MsgBox "Finished", vbCritical
End Sub
扩展资料:
VB的Do循环
Do 。Loop
如果你不知道重复多少次 , 可以使用 Do 。Loop 语句 。
Do 。Loop 语句重复执行某段代码直到条件是 true 或条件变成 true 。
重复执行代码直到条件是 true
您可以使用 While 关键字来检查 Do 。Loop 语句的条件 。
Do While i>10
some code
Loop
如果 i 等于 9 , 上述循环内的代码将终止执行 。
Do
some code
Loop While i>10
这个循环内的代码将被执行至少一次 , 即使 i 小于 10 。
重复执行代码直到条件变成 true
您可以使用 Until 关键字来检查 Do 。Loop 语句的条件 。
Do Until i=10
some code
Loop
如果 i 等于 10 , 上述循环内的代码将终止执行 。
Do
some code
Loop Until i=10
这个循环内的代码将被执行至少一次 , 即使 i 等于 10 。
退出 Do 。Loop
您可以通过 Exit Do 关键词退出 Do 。Loop 语句 。
Do Until i=10
i=i-1
If i<10 Then Exit Do
Loop
这个循环内的代码 , 只要 i 不为 10 且 i 大于 10 时都将被执行 。
参考资料:搜狗百科——循环语句
2.vb怎么写for循环语句for…next循环如下:(在C盘根目录建立一个名字为1的文件夹 , 反复10次)Private Sub Command2_Click()
Dim i As Integer
For i = 1 To 10
Set fso = CreateObject("Scripting.filesystemobject")
fso.CreateFolder ("c:\1")
Next
End Sub
3.要求编写一个VB的FOR循环语句dim str() as doubleredim str(8) for i as integer =0 to 7str(i)=val(inputbox("乱写的 , 自己改了吧!"))nextdim sum as double=0.0for i as integer =0 to 7sum +=str(i)nextdim pinjun as double =sum/8msgbox ("总分数:" & sum & vbcrlf & "平均成绩:" & pinjun)就说到这了 , 要是你还不会 , 只能证明你没诚心了 。
4.关于vb for循环语句循环结构是程序中一种很重要的结构 。在给定条件成立时 , 可反复执行某程序段 , 直到条件不成立为止 。给定的条件称为循环条件 , 反复执行的程序段称为循环体 。在VB中提供了多种循环语句供用户使用循环 , 下面介绍两种常用的形式:For语句和Do语句 。
一、For语句
For循环(For……Next)语句的基本格式为:
For 循环变量=初值 To 终值 Step 增量 , 循环体 , Next 变量
循环变量为数值型变量 , 初值、终值、增量均为数值型表达式 。“Step 增量”部分可以省略 , 缺省时默认为1 。在循环体中使用Exit