《第4章 VB控制结构》习题

《第4章 VB控制结构》习题

一、填空题

1、结构化程序设计语言的三种基本控制结构是。 2、分支结构中的条件通常是 表达式。

1、 Select case 2、 强制性退出Do Loop循环的语句是For Next循环的语句是 。

3、 VB有三种工作模式，它们分别是。 4、 VB可能遇到的错误有 、 和 。 5、 执行下面的程序段后，s

s=5

For i=2.6 To 4.9 Step 0.6 s=s+1

Next i

6、 阅读程序，写出程序的运行结果box 。

Private Sub Form_Click() Dim k，Box as Ivteger For k=1 to 11 Select Case k

Case 1,3,5,7,9,11

Box=Box+Int(k/2) Case 2,4,6,8,10 Box=Box+Int(k/3)

End Select Next k

Print “Box”;Box

End Sub

7、 运行时单击窗体，以下事件发生的次序是 。 8、 执行下列程序段后，x的值是。

n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n 9、 阅读下列程序段：

x = 0

For i = 1 To 4 For j = 1 To i x = x + 1

Next j, i

执行以上循环后，x 的值为 。

执行下列程序段后输出的结果是 s = 1

10、

For i = 1 To 3 For j = 0 To i-1 s = s + s * j Next j ? s;

11、

Next i

阅读下列程序段： m = 0

For i = 1 To 3 For j = 1 To i

m = m + j Next j, i

执行以上的循环后，i和m的值分别为 。

运行下列程序段，其中“n=n+1”语句被执行的次数是。 Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next n

13、

Next m

窗体上有一个命令按钮Command1，编写如下事件过程： Private Sub Command1_Click() Sum = 0

For m = 1 To 3 Select Case m Case 1 a = 1 Case 2 a = 2 Case 3 a = 3 End Select Print a, Sum = Sum + a Next m Print Sum

End Sub

运行时，单击按钮，输出结果是 。

14、

窗体上有一个命令按钮Command1，编写如下事件过程： Private Sub Command1_Click() a = 80: b = 50: c = 30

If a < b Or b > c Then b = c

If b = c And a < c Then a = a - 30

12、

If a = b And b > c Then c = a + b

Print a, b, c End Sub

运行时，单击按钮，窗体输出的结果是 。

二、单项选择题

1、选择和循环结构的作用是（ ）。

A、提高程序运行速度 B、控制程序的运行 C、便于程序的阅读 D、方便程序调试

2、要计算当0<x<10时，将x的值赋给y，应使用语句（ ）。

A、If 0<x<10 then y=x B、If 0<x or x<10 then y=x C、If 0<x and x<10 then y=x D、If 0<x Xor x<10 then y=x 3、多分支选择结构的case语句，写法错误的是（ ）。

A、Case 1，5，7，9 B、Case 8 To 12

C、Case 5 To 2 D、Case Is<”man”

4、For Next循环结构中，循环控制变量的步长为0，则（ ）。

A、形成无限循环 B、循环体执行一次后结束循环 C、语法错误 D、循环体不执行即结束循环 5、要使循环体至少执行一次，应使用（ ）循环。

A、For Next B、While Wend C、Do Loop[While/Until] D、Do[While/Until] Loop 6、为了显示当前过程中局部变量的当前值，应用调试窗口中的（ ）。 A、本地窗口 B、立即窗口 C、监视窗口 D、快速监视窗口 7、标志错误处理程序开始的语句是（ ）。

A、Exit Sub B、行标号 C、On Error语句 D、Resume语句 8、执行下列程序段，x的值为（ ）。 x=5

For i=1 to 20 Step 2

x=x+i\5 Next i

A、21 B、22 C、23 D、24

9、编写程序计算5门课的平均成绩，将除数5误写为4，这属于（ ）。 A、系统错误 B、编译错误 C、逻辑错误 D、运行错误 10、下列命令按钮事件过程执行后，输出结果是（ ）。 Private Sub Command1_Click() For m=1 To 10 Step 2 a=10

For n=1 To 10 Step 2 a=a+2 Next n

Next m Print a

End sub

A、60 B、50 C、30 D、20 11、编写如下事件过程：

Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single, Y As Single) If Shift = 3 And Button = 2 Then Print "Visual Basic" End If

End Sub

运行时，为了在窗体上输出"Visual Basic"，应执行的操作为（ ）。 A、按下Shift键和鼠标左键 B、同时按下Shift、Alt键和鼠标左键 C、按下Alt键和鼠标右键 D、同时按下Shift、Ctrl键和鼠标右键 12、下列求两数中最小数的程序段不正确的是（ ）。

A、If x < y Then Min = x Else Min = y B、Min = IIf(x < y，x，y)

C、Min = x : If y < = x Then Min = y D、If y < = x Then Min = y : Min = x 13、下列程序段的执行结果是（ ）。

x = 3 : y = 5 : z = 9

x = x + y y = x - y

If x - y > z - x Then z = x + y If x + y > z - y Then x = z + y Print x, y, z

A、3 5 9 B、14 3 11 C、8 3 11 D、8 5 9

14、如果x小于y的平方，则在窗体上输出“OK”。完成该要求的单行条件语句是（ ）。

A、If x < y ^ 2 Then "OK" B、If x < y ^ 2 Then Show "OK" C、If x < y ^ 2 Then Print "OK" D、f x < y ^ 2 Then Put "OK" 15、有如下程序段：

Dim s%, t%, a%, b% s = 1: t = 1

a = Text1.Text b = Text2.Text

If a > 0 Then s = s + 1 If a > b Then t = t + s Else

If a = b Then t = 5 Else t = 2 * s End If End If Print t

End Sub

要使程序输出结果为4，则a和b应满足的条件是（ ）。

A、a>0 And a<b B、a<0 And a<b C、a>0 And a>b D、a<0 And a>b 16、以下条件语句错误的是（ ）。

A、If X Then Y = Y + 1 B、If X = 0 Then Y = 0 C、If X > 0 Then Y = 1: Print Y D、If X > Y Then Print Y End If 三、编程题

1、 编程计算下列函数。

SinX X 20 Y= CosX 0 X 20

e X 0

2

2、 求一元二次方程ax+bx+c=0的根。

2

提示：从初等代数可知，此方程有两个根，它有三种可能（设d=b-4ac）：

（1） 若b-4ac>0，有两个不等的实根：x1,2 （2） 若b2-4ac=0，有两个相等的实根：x1,2 （3） 若b2-4ac<0，有一对共轭复根：x1,2

2X

b

2a b2a

d

d2a

b2a

i

3、 某商品价格随购货数量而定，买100个以上（含100个，下同）的打9折，200个以上的打8.5折，300个以上的打8折，400个以上的打7.5折，500个以上的打7

折。设商品单价为65元，要求从键盘输入购买商品数量后，显示出总货款。

20

4、 求 n!（即求1！+2！+3！+ +20！）。

n 1

5、 输出斐波纳契（fibonacci）数列的前20项。数列的规律是：第一、二个数是1，从

第三个数起，该数是前面两个数之和。 6、 如果我国工农业生产值每年以12%增长率递增，问多少年后产值翻一番？

7、 求出2000 — 2005年之间的所有闰年。闰年的条件是：能被4整除但不能被100整除的年份，或者能被400整除的年份，如2000年、2004年是闰年，而2001年、2100年不是闰年。

8、 找出1~1000之间的全部“水仙花数”。“水仙花数”是这样的一个整数，它的每位数字的立方之和正好等于这个三位数。例如153是水仙花数，因为1+5+3=153。 9、 在窗体上输出如图18所示的图形。

图4-18 编写代码输出图形

10、 输出九九乘法表。

3

3

3

本文来源：https://www.bwwdw.com/article/p1u4.html