vb选择语句怎么写

vbfor语句怎么写

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

vb的循环语句怎么写

1. 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应该是最简单的，因为不用自己去控制自增或自减，只要设置初始值，循环条件，和步阶就行了~。

2. vb中的循环语句怎么写

下面提供多种方法：

第一种：

For i = 0 To 100

If (i Mod 2 = 0) And (i Mod 3 = 0) And (i Mod 5 0) Then

MsgBox i

End If

Next i

第二种：

Private Sub Command1_Click()

Text1 = ""

Dim a()

k = InputBox（"请输入上限"）

For i = 1 To k

If i Mod 2 = 0 And i Mod 3 = 0 And i Mod 5 0 Then

j = j + 1

ReDim Preserve a(j)

a(j) = i

End If

Next i

For i = 1 To j

Text1 = Text1 & a(i) & " "

Next i

End Sub

Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。

“Visual” 指的是开发图形用户界面 （GUI） 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。

Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

3. VB循环语句

For <循环变量>=<初赋值> To <终值> [Step <步长>]…………Next <循环变量>在默认情况下，Step被设为“1”，可以省略，Step也可以设为负值，例如：Dim a=0For I=1 To 10 a=a+INext I这是一个最简单的累加器的例子，把1到10累加在一起，然后赋值给“a”这样的效果和上面是一样的，只不过是倒着加罢了，请看：Dim a=0For I=10 To 1 Step –1a=a+INext IWhile语句也是一个很常用的循环语句，它的形式很多。

Do While …… Loop语句 While …… Wend 语句 Do …… Loop While While后面都跟逻辑条件判断，“Do While …… Loop语句”和“While …… Wend 语句”作用相似，都是先判断While后面的条件是否为“真”，如果为“真”则执行里面的语句，如果为“假”，则退出循环，循环直至条件为“假”终止。“Do …… Loop While ”与前两者的区别在于，它不管条件的真假，都会先执行“Do”后面的语句，也就是说，它至少执行语句一次。

与While用法相似的还有Until语句，它是直至条件为真则终止循环，句式把While上述三个语句的While换成Until即可，但是因为容易记混，所以我建议只用While即可。Until <条件>可以相当于While Not <条件>。

For循环和Whlie循环应当根据适当的环境使用，它们有时也可替换。-------------------------------------------------------------最好找点资料看看，像VB神童教程，新手还是很容易看懂的。

希望对你有帮助。

4. VB的循环语句该怎么编

Private Sub Command1_Click()

Dim i As Integer

Dim j As Integer

j = 0

For i = 1 To 100 'i从1到100执行循环

j = j + i

Next

MsgBox Str(j)

End Sub

Private Sub Command1_Click()

Dim i As Integer

Dim j As Integer

i = 1

j = 0

While i <= 100 '当i小于等于100时执行循环

j = j + i

i = i + 1

Wend

MsgBox Str(j)

End Sub

Private Sub Command1_Click()

Dim i As Integer

Dim j As Integer

i = 1

j = 0

Do Until i > 100 '执行循环直到i大于100

j = j + i

i = i + 1

Loop

MsgBox Str(j)

End Sub

上面3个程序用3种不同的循环实现相同的功能

5. Vb的循环语句

这是一个前测型的循环

Loop Until 是直到条件为真时，跳出循环

I的初始值为1

每次加3

第一次进入循环，I的值变为4

第二次进入循环，I的值变为7

第三次进入循环，I的值变为10

第四次进入循环，I的值变为13

因为要求循环执行三次，所以，只要满足第二次完后，条件为假，第三次完后，条件为真即可

7>X = False 得到 X>=7

又因为只循环三次，所以第三次的条件要变成真，退出时I=10

所以 10>X=True 得到 X

6. VB中的循环语句有哪些

1、do while。loop：当条件为True时循环，，在进入循环之前检查条件。

2、do。loop while：当条件为True循环，在循环至少运行一次后检查条件。

3、do until。loop：当条件为false循环，在进入循环之前检查条件。

4、do.. loop until：当条件为false循环，在循环至少运行一次后检查条件。

5、While。Wend： 当条件为Ture时循环。

6、for。.next：指定循环次数，使用计数器重复运行语句。

7、for Each。next：对于集合中的每项或数组中的元素，重复执行每个语句。

8、for Each。in：从一个集合中取出每一个元素。

9、循环嵌套：就是在一个大循环内可以包含一个小循环。

10、强行退出循环就知道这么多，呵呵11

7. 这VB的循环语句怎样理解

循环，可以说是重复做某件事。

Private Sub Command1_Click（) '按钮单击时间

Dim i As Integer, sum As Integer '定义两个循环变量

For i = 1 To 10 'i从1~10开始循环

For sum = 1 To i 'sum从1到i循环（这里下面作解释）

Print sum &； ""； '输出Sum的值。后面的分号表示输出后不换行

Next sum 'sum循环结束标志

Print '换行

Next i 'i循环结束标志

End Sub

1~i那里，

当i=1，则sum=1 to 1（循环一次），输出sum，那就是：1

当i=2，则sum=1 to 2（循环两次），输出sum，那就是：12

当i=3，则sum=1 to 3（循环三次），输出sum，那就是：123

………如此类推………

当i=10，则sum=1 to 10（循环十次），输出sum，那就是：12345678910

8. 谁能介绍一下VB的循环语句 详细点

循环语句

循环结构是计算机语言里一种重要的结构，它的应用广泛，最简单的例子是累加器的作用，还可以用于穷举法，更直观的例子是把某件事重复指定的次数，这样就不用把要重复的语句输入多次，而通过循环结构完成，非常方便。

C语言里有一个“for”循环语句，VB里也有“For”关键字，作用也差不多，只是VB的“For”语句更容易理解。它的格式是：

For <；循环变量>=<；初赋值> To <；终值> [Step <；步长>]

……

……

Next <；循环变量>

在默认情况下，Step被设为“1”，可以省略，Step也可以设为负值，例如：

Dim a=0

For I=1 To 10

a=a+I

Next I

这是一个最简单的累加器的例子，把1到10累加在一起，然后赋值给“a”这样的效果和上面是一样的，只不过是倒着加罢了，请看：

Dim a=0

For I=10 To 1 Step –1

a=a+I

Next I

While语句也是一个很常用的循环语句，它的形式很多。 Do While …… Loop语句

While …… Wend 语句

Do …… Loop While

While后面都跟逻辑条件判断，“Do While …… Loop语句”和“While …… Wend

语句”作用相似，都是先判断While后面的条件是否为“真”，如果为“真”则执行里面的语句，如果为“假”，则退出循环，循环直至条件为“假”终止。“Do

…… Loop While ”与前两者的区别在于，它不管条件的真假，都会先执行“Do”后面的语句，也就是说，它至少执行语句一次。

与While用法相似的还有Until语句，它是直至条件为真则终止循环，句式把While上述三个语句的While换成Until即可，但是因为容易记混，所以我建议只用While即可。Until

<；条件>；可以相当于While Not <；条件>。

For循环和Whlie循环应当根据适当的环境使用，它们有时也可替换。

资料参考：

建议： 去看写VB基础的教程书籍.里面都说的很详细并且有示例

9. VB循环语句

For = To [Step ]

……

……

Next

在默认情况下，Step被设为“1”，可以省略，Step也可以设为负值，例如：

Dim a=0

For I=1 To 10

a=a+I

Next I

这是一个最简单的累加器的例子，把1到10累加在一起，然后赋值给“a”这样的效果和上面是一样的，只不过是倒着加罢了，请看：

Dim a=0

For I=10 To 1 Step –1

a=a+I

Next I

While语句也是一个很常用的循环语句，它的形式很多。

Do While …… Loop语句

While …… Wend 语句

Do …… Loop While

While后面都跟逻辑条件判断，“Do While …… Loop语句”和“While …… Wend 语句”作用相似，都是先判断While后面的条件是否为“真”，如果为“真”则执行里面的语句，如果为“假”，则退出循环，循环直至条件为“假”终止。“Do …… Loop While ”与前两者的区别在于，它不管条件的真假，都会先执行“Do”后面的语句，也就是说，它至少执行语句一次。

与While用法相似的还有Until语句，它是直至条件为真则终止循环，句式把While上述三个语句的While换成Until即可，但是因为容易记混，所以我建议只用While即可。Until 可以相当于While Not 。

For循环和Whlie循环应当根据适当的环境使用，它们有时也可替换。

-------------------------------------------------------------

最好找点资料看看，像VB神童教程，新手还是很容易看懂的。希望对你有帮助。。

转载请注明出处育才学习网 » vb选择语句怎么写