育才学习网vb里面for循环语句怎么写
1.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
2.VB中的循环语句中的for
For循环的格式：
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 语句，代码如下：
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 时都将被执行。
参考资料：搜狗百科——循环语句
3.vb中的循环语句怎么写
循环语句包括For-Next、While-Wend、Do-Loop语句比较常用的是for和whileFor-Next语句：For 变量 = 初值 To 终值 [Step 步长] 循环体NextWhile Wend 语句：While 条件 循环体Wend但满足条件时，（如当i>5时），便退出循环，否则执行循环体。
Do-Loop语句：Do循环体。[Exit Do]Loop循环体会在Do 与 Loop 之间不停循环。
Exit Do 语句可有可无，是为了设定当满足一定条件后，运行Exit Do 语句，即退出循环。for应该是最简单的，因为不用自己去控制自增或自减，只要设置初始值，循环条件，和步阶就行了~。
4.vb 循环语句怎么写
循环语句包括For-Next、While-Wend、Do-Loop语句比较常用的是for和whileFor-Next语句：
For 变量 = 初值 To 终值 [Step 步长]
循环体
Next
While Wend 语句：
While 条件
循环体
Wend
但满足条件时，（如当i>5时），便退出循环，否则执行循环体。Do-Loop语句：
Do
循环体
[Exit Do]
Loop
循环体会在Do 与 Loop 之间不停循环。Exit Do 语句可有可无，是为了设定当满足一定条件后，运行Exit Do 语句，即退出循环。for应该是最简单的，因为不用自己去控制自增或自减，只要设置初始值，循环条件，和步阶就行了~
5.要求编写一个VB的FOR循环语句
Private Sub Command1_Click()
Dim a(7, 3) As Integer, i As Integer, j As Integer
Dim Sum As Single, Pjf As Single
Dim s As String
For i = 0 To 7
Sum = 0
Pjf = 0
For j = 0 To 3
a(i, j) = Val(InputBox（"请输入第" & j + 1 & "门成绩（-1 退出）"， "学生" & i + 1 & "各科成绩录入"））
If a(i, j) = -1 Then Exit Sub
Sum = Sum + a(i, j)
Next
s = s & "学生" & i + 1 & "总分：" & Sum & "分，平均分：" & Format(Sum / 4, "0.00") & vbNewLine
Next
MsgBox s, vbInformation， "成绩统计结果"
End Sub
6.关于vb for循环语句
循环结构是程序中一种很重要的结构。在给定条件成立时，可反复执行某程序段，直到条件不成立为止。给定的条件称为循环条件，反复执行的程序段称为循环体。在VB中提供了多种循环语句供用户使用循环，下面介绍两种常用的形式：For语句和Do语句。
一、For语句
For循环（For……Next）语句的基本格式为：
For 循环变量=初值 To 终值 Step 增量，循环体，Next 变量
循环变量为数值型变量，初值、终值、增量均为数值型表达式。“Step 增量”部分可以省略，缺省时默认为1。在循环体中使用Exit
For语句可直接中止循环，执行next后面的语句。当增量值为正数时，For循环的执行过程如下：
(1) 将循环变量赋初值；
(2)比较循环变量是否小于等于终值，小于等于时循环条件成立，运行一次循环体中的语句；如果循环条件不成立时，循环结束，执行Next后面的语句；
(3)遇到Next语句，循环变量增加增量值，转到（2）继续循环；
增量值为负数时，For循环的执行过程第（2）步不同。比较循环变量是否大于等于终值，大于等于时循环条件成立，运行一次循环体中的语句；如果循环条件不成立时，循环结束，执行Next后面的语句结束。
7.VB语句中的for循环语句这么运用
for i=3 to 10000 '查找质数
for j=2 to i-1
x=i mod j
if i<>0 then
exit for '如果除了1和本身，还能被任意小于本身的一个数整除，那么此数不是指数，并跳出循环，进行下一个数的判断
esle '如果一个数不能被所有小于它的数整除，那么这个数就是质数
pds=1 '质数累加的判断数，等于1时，质数个数累加1
end if
next j
if pds=1 then
y=y+1 '质数个数累加1
end if
next i '指数查找结束
for i 1 to 10000 '打印
print i， '打印数
if i<>10000 then
print space(5) '打印5个空格
else
print y 在最末尾打印质数的个数
end if
if i mod =20 then print 一行打印20个数
next i
8.要求编写一个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）就说到这了，要是你还不会，只能证明你没诚心了。
vb里的for循环语句怎么写
1.VB中的循环语句中的for
For循环的格式：
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 语句，代码如下：
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
For语句可直接中止循环，执行next后面的语句。当增量值为正数时，For循环的执行过程如下：
(1) 将循环变量赋初值；
(2)比较循环变量是否小于等于终值，小于等于时循环条件成立，运行一次循环体中的语句；如果循环条件不成立时，循环结束，执行Next后面的语句；
(3)遇到Next语句，循环变量增加增量值，转到（2）继续循环；
增量值为负数时，For循环的执行过程第（2）步不同。比较循环变量是否大于等于终值，大于等于时循环条件成立，运行一次循环体中的语句；如果循环条件不成立时，循环结束，执行Next后面的语句结束。
5.VB语句中的for循环语句这么运用
for i=3 to 10000 '查找质数
for j=2 to i-1
x=i mod j
if i<>0 then
exit for '如果除了1和本身，还能被任意小于本身的一个数整除，那么此数不是指数，并跳出循环，进行下一个数的判断
esle '如果一个数不能被所有小于它的数整除，那么这个数就是质数
pds=1 '质数累加的判断数，等于1时，质数个数累加1
end if
next j
if pds=1 then
y=y+1 '质数个数累加1
end if
next i '指数查找结束
for i 1 to 10000 '打印
print i， '打印数
if i<>10000 then
print space(5) '打印5个空格
else
print y 在最末尾打印质数的个数
end if
if i mod =20 then print 一行打印20个数
next i
6.vb中的循环语句怎么写
循环语句包括For-Next、While-Wend、Do-Loop语句比较常用的是for和whileFor-Next语句：For 变量 = 初值 To 终值 [Step 步长] 循环体NextWhile Wend 语句：While 条件 循环体Wend但满足条件时，（如当i>5时），便退出循环，否则执行循环体。
Do-Loop语句：Do循环体。[Exit Do]Loop循环体会在Do 与 Loop 之间不停循环。
Exit Do 语句可有可无，是为了设定当满足一定条件后，运行Exit Do 语句，即退出循环。for应该是最简单的，因为不用自己去控制自增或自减，只要设置初始值，循环条件，和步阶就行了~。
7.要求编写一个VB的FOR循环语句
Private Sub Command1_Click()
Dim a(7, 3) As Integer, i As Integer, j As Integer
Dim Sum As Single, Pjf As Single
Dim s As String
For i = 0 To 7
Sum = 0
Pjf = 0
For j = 0 To 3
a(i, j) = Val(InputBox（"请输入第" & j + 1 & "门成绩（-1 退出）"， "学生" & i + 1 & "各科成绩录入"））
If a(i, j) = -1 Then Exit Sub
Sum = Sum + a(i, j)
Next
s = s & "学生" & i + 1 & "总分：" & Sum & "分，平均分：" & Format(Sum / 4, "0.00") & vbNewLine
Next
MsgBox s, vbInformation， "成绩统计结果"
End Sub
8.vb中的循环语句怎么写
循环语句包括For-Next、While-Wend、Do-Loop语句比较常用的是for和whileFor-Next语句：
For 变量 = 初值 To 终值 [Step 步长]
循环体
Next
While Wend 语句：
While 条件
循环体
Wend
但满足条件时，（如当i>5时），便退出循环，否则执行循环体。Do-Loop语句：
Do
循环体
[Exit Do]
Loop
循环体会在Do 与 Loop 之间不停循环。Exit Do 语句可有可无，是为了设定当满足一定条件后，运行Exit Do 语句，即退出循环。for应该是最简单的，因为不用自己去控制自增或自减，只要设置初始值，循环条件，和步阶就行了~
转载请注明出处育才学习网 » vb中for循环语句例子