育才学习网1. VB中的For语句
private Sub Form_Click（) '当窗体单击时触发此过程
Dim i,j as Integer '声明默认类型变量i（变体型）和长整型变量j
print '在窗体上打印空白的一行
For i=1 To 9 '设置循环 i 每次循环从1到9 默认步长1（每次循环加1）
'完整： for i = 1 to 9 step 1
For j=1 To i '设置循环 j 每次循环从1到i的值 默认步长1（每次循环加1）完整： for i = 1 to i step 1
print left((str(j*j) & space(5),4);
'此语句错误应为：
' Print Left(Str(j * j) & Space(5), 4)
' print 在窗体中打印
' left(str,n) 取str左边的n个字符
' str(n) 将n这个数值型转换为字符串型
' space(n) 返回n个空格
' 翻译出来就是：
' 在窗体中打印出 （j*j 的结果 加上5个空格）的左边4个字符
Next j '执行到这里继续循环j
print '打印一行空白行
next i '执行到这里继续循环i
End Sub '结束过程
2. 关于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后面的语句结束。
3. 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 时都将被执行。
参考资料：搜狗百科——循环语句
4. VB编程,for语句
For 是用来循环执行一系列操作的语句。
语法如下：for 循环变量=起始值 to 终止值 [STEP] 步长<要执行的语句序列> next [循环变量]循环变量要事先定义，循环执行的次数=终止值与起始值的差的绝对值除以步长再取整数部分 比方说要连续输出10个*，就这样写 dim i as integer '这句定义变量 for i=1 to 10print "*"； '连续输出 next i程序运行时要先看循环变量当前值是否超过终止值，如果超过就不执行内容，如果没超过就执行一次，然后让变量值按步长值增加或减少。默认情况下。
步长与step如果省掉的话步长值为1，如果你需要变量不按1增加的话就需要加上step与步长值。例如： dim i as integer for i=1 to 10 step 2print "*"; next i 这段程序运行就只会输出5个*还可以让循环倒着来 例如： dim i as integer for i=10 to 1 step -1print "*"; next i。
5. VB编程,for语句
For 是用来循环执行一系列操作的语句。语法如下：
for 循环变量=起始值 to 终止值 [STEP] 步长
<；要执行的语句序列>
next [循环变量]
循环变量要事先定义，循环执行的次数=终止值与起始值的差的绝对值除以步长再取整数部分
比方说要连续输出10个*，就这样写
dim i as integer '这句定义变量
for i=1 to 10
print "*"； '连续输出
next i
程序运行时要先看循环变量当前值是否超过终止值，如果超过就不执行内容，如果没超过就执行一次，然后让变量值按步长值增加或减少。默认情况下。步长与step如果省掉的话步长值为1，如果你需要变量不按1增加的话就需要加上step与步长值。
例如：
dim i as integer
for i=1 to 10 step 2
print "*";
next i
这段程序运行就只会输出5个*
还可以让循环倒着来
例如：
dim i as integer
for i=10 to 1 step -1
print "*";
next i
6. 要求编写一个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
转载请注明出处育才学习网 » vbfor语句怎么写