最新VB循环结构练习题资料
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB循环结构练习题
一、分析程序的运行结果（每题2分，共60分）
1>以下循环的执行次数是______ O
K=0
Do While k<=10
k=k+1
Loop
2、 _____________________________________ 下列程序段的执行后输出的结果为____________________ o
l=4:A=5
Do
1=1+1 :A=A+2
Loop Until l>=7
Print "A=";A
3、__________________________ 下列程序的执行结果是o
T = O : m = 1 : Sum = 0
Do
t = t + m : Sum = Sum + t: m = m + 2
Loop While m <= 9
Print Sum
4、_________________________________ 下列程序段的执行时，共循环_________________________ 次。
For a=0 To 1
For b=1 To 2
For c=1 To 3
1=1+1 Next c
Next b
next a
5、下列程序段的运行结果是：
Sub sele()
Dim n as Integer
1=21 :n=3
Do While l>n
l=l-n
Loop
Print I
End Sub
打印结果_____ o
6、___________________________________ 执行下面的程序段后，s的值为_________________ o
S=5
For l=2.6 To 4.9 Step 2
s=s+1
Next I
7、
下列程序段的执行后输出的结果为__________
K= 1
For I = 1 To 3
A=I A I A K
Next I
Print A
8、___________________________ 下列程序的执行
结果是_______________________ o M1 = 1:m2 = 1
Do While m2<>6
ml = m1*m2 : m2 = m2+1
Loop
Print ml
9、下列程序的执行结果是_____ o
Private Function P(N As Integer)
For I = I To N
SUM = SUM + 1
Next I
P = SUM
End Function
Private Sub Command 1_Click()
S = P(1) + P(2) + P(3) + P(4)
Print S;
End Sub
10、以下程序用来输出1到100所有奇数的和，请补充完该程序。
Private Sub Command3_Click()
Dim s As Long
Dim x As Integer
s = 0
Forx=1 to 100 step ____
s = s + x
Next x
Print s
End Sub
11>下列程序的执行结果是_________ o
A = 75
If a>60 Then
I = 1
Elself a>70 Then
l = 2
Elself a>80 Then
l = 3
Elself a>90 Then
I = 4
End If
Print I
12、下列程序段的运行后
的值为______ Dim t,k as single
k=5 : t=1
do While k>=-1
t=t*k : K=K-1
loop
13、下面程序段的输出结果.
P=0:s=0
Do
P = P+2
s = s+p
Loop While p<11
Print "s="&s
14、下面程序段的输出结果.
For X=1.5 To 5 Step 5
Print X;
NextX
15、执行下面的程序段后，s的值为o
S=5
For l=2.6 To 4.9 Step 0.6
s=s+1
Next I
16、在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command 1_Click() a=lnputBox("请输入一个整数")
b=lnputBox("请输入一个整数") Print a+b
End Sub
321 和456,
17、程序运行后，单击命令按钮，在输入对话框中分别输入
输出结果为_____ 。
执行下面的程序段后，b的值为 _______ o
A=300:b=20 a=a+b:b=a-b:a=a-b
1 &下列程序段执行后x的值是__________ o
X=100 : y=50
if x>y then x=x-y else x=x+y
19、________________________________________ 有如下程序，该程序的运行结
果是______________________________________ o
A=20 : b=10
print a>b
20、_________________________________________________ 有如
下程序，该程序的运行后输出的结果是__________________