vb 循环

vb循环练习题VB循环练习题循环是计算机编程中非常重要的概念之一，它允许我们重复执行一段代码，以达到简化程序逻辑和提高效率的目的。

在VB（Visual Basic）编程语言中，循环也是一项基本技能。

为了帮助大家更好地掌握VB循环，下面将给出一些练习题，供大家进行实践。

1. 打印数字编写一个程序，使用循环打印出1到10的数字。

要求每个数字占一行，并在数字前面加上"Number: "前缀。

例如，输出应该是：Number: 1Number: 2...Number: 102. 计算和编写一个程序，使用循环计算1到100的所有整数的和，并将结果打印出来。

要求使用一个变量来保存累加的结果，并在循环结束后打印出结果。

3. 奇偶数判断编写一个程序，使用循环判断一个给定的整数是奇数还是偶数。

要求用户输入一个整数，然后使用循环判断并打印出结果。

例如，如果用户输入的是5，则程序应该输出"5是奇数"；如果用户输入的是8，则程序应该输出"8是偶数"。

4. 阶乘计算编写一个程序，使用循环计算一个给定的正整数的阶乘。

要求用户输入一个正整数，然后使用循环计算并打印出结果。

阶乘的定义如下：n! = n * (n-1) * (n-2) * ... * 2 * 1。

例如，如果用户输入的是5，则程序应该输出"5的阶乘是120"。

5. 九九乘法表编写一个程序，使用循环打印出九九乘法表。

要求每个乘法式占一行，并且每行的结果按照对齐方式排列。

例如，输出应该是：1 * 1 = 11 *2 = 2 2 * 2 = 4...1 * 9 = 92 * 9 = 18 ... 9 * 9 = 81通过完成以上练习题，你将能够更好地理解和掌握VB循环的使用。

循环是编程中非常常见的一种结构，掌握好循环的使用将使你的代码更加简洁高效。

此外，通过实践练习，你还能够提高自己的编程能力和逻辑思维能力。

Next i
学
For i =1 To 10 课 For j=1 To 20 件 … Next i
Next j
6.5 跳转语句
GoTo语句可以改变程序执行的顺序，跳过程序的某一
教 学 课
件
前后两项之差都 Sum=0
为1，是一个等 差数列
Sum=sum+1i=i+1
Sum=sum+3
… Sum=sum+n
i是从1到n递增 1的数列
一、循环程序设计结构
VB中提供了两种类型的循环语句：一种是计数循环语 句；另一种是条件循环语句。Visual Basic 支持的循环结
先执行循环体，后判断条件值，为假继续，直到为真退出
⑴. Do While … Loop语句
语法格式： Do While 〈条件表达式〉
〈循环体〉 [Exit Do] 〈循环体〉 Loop
(2) Do Until …Loop语句
语法格式：
Do Until〈条件表达式〉
〈循环体〉
教
[Exit Do]
学
说明
① 格式中的参数说明：
循环的初值、终值和步长都是数值表达式，其值不一定是
教 学
整数，可以是实数。
课
增量参数可正可负。如果增量为正，则初值必须小于等于
件
终值，否则不能执行循环体内的语句；如果增量为负，则
初值必须大于等于终值。如果没有设置step，则增量默认
为1。
当初值等于终值时，不管步长是正数还是负数，都执行一次循环体。
学
钱一。百钱买百鸡，问鸡翁、母、雏各几
课
何？
件
• 找出1~999之间所有的同构数
– 同构数：该数出现在它的平方数的右边，如： 5—25，25—625

例：
编写VB程序，计算整数1+2+3……+10的值 Dim s as integer
S=0
SS==s1+1+2+3+4+5+6+7+8+9+10
S=s+2 S=s+3 S=s+4 S=s+5 S=s+6 S=s+7 S=s+8 S=s+9 S=s+10
Print s
Private Sub Command1_Click() Dim s, i As Integer s=0 For i = 1 To 10 Step 1 s=s+i Next i Print s End Sub
米的总粒数S=2^0+2^1+2^2+……+2^63 第N格放的米粒数量k=2^n
1．有如下VB程序段：
s＝0
For i ＝________To 5
s＝s＋i
Next i
该程序段运行后，循环体s ＝ s ＋ i 被执行10次，则循
环变量i的初值是( )
A．14
B．－5
C．1
D．－4
【答案】 D
2．有如下循环结构VB程序段
a(i) ＝ a(i － 1) ＋ a(i － 2) Next i Text1.Text ＝ Str(a(i－1)) End Sub
【答案】 55
a ＝a ＋1
Next y
Print a；
Next x
End sub
该程序的输出结果是( )
A．1 1
B．0 0
C．1 2
D．2 3
【答案】 D

循环变量I不仅用来控制循环过程，而且被引用参与运算 （操作变量）
公共教育学院 计算机教研室
徐州医学院VB教程
【例】编写程序，实现累乘：要求使用For循环求N !（N为 自然数）。
让f = 1、i = 1。使用InputBox函数得到N，重复执行N次
“f = f * i ”，在重复中，让i的值不断加1，即可实现例
公共教育学院 计算机教研室
徐州医学院VB教程
在“累加”问题中，应设置一个用来表示累加和的变
量，变量的初值设为零 。
“累乘求积”的问题，应设置一个表示积的变量，变量 的初始值应设置为1，
公共教育学院 计算机教研室
徐州医学院VB教程
while循环
While循环的格式如下：
While <条件表达式>
[循环体]
公共教育学院 计算机教研室
徐州医学院VB教程
算法说明
[算法分析] 由于输入的数据M和N要求是自然数，所以在
程序中应加入对数据的合法性进行检验的部分；考虑到
程序的应用范围，数据类型可选用长整型。
公共教育学院 计算机教研室
徐州医学院VB教程
[示例] 求两个自然数的最大公约数的算法（欧几里德算 法）
S1.输入两个自然数M、N； S2.求M除以N的余数R； S3.使M=N，即用N代换M； S4.使N=R，即用R代换N； S5.若R≠0,则重复执行S2、S3、S4（循环）,否则转S6； S6.输出M，M即为M和N的最大公约数。
公共教育学院 计算机教研室
徐州医学院VB教程
求二个正整数m和n的最小公倍数
求得最大公约数以后，将原两数相乘并除以最大公约 数，就得到了最小公倍数。
公共教育学院 计算机教研室