A. a+b=5 B. a=True C. 5=a+b D. -a=-5*2
45.在VB中，若x=5，y=2，执行语句x=x+y : y=x-y : x=x-y后，x、y的值分别是 ( ) A. 5、2
B. 5、5
C. 2、5
D. 2、2
46.在VB中，正确的赋值语句是 ( ) A. x-y=8
B. 8=x-y
C. x=8+y
D. -y=8-x
47.在VB中，下列程序段执行后，变量b和变量c的值分别是 ( ) a=23:b=18:c=0 a=a+b b=a+b c=a+b A. 41 41
B. 41 64
C. 59 59
D. 59 100
48.在VB中，若a=10，b=15，则语句print a；\；b；\，a+b的结果为（ ） A. a+b=25
B. 10+15=25
C. a+b= 25
D. 10+15= 25
49.在VB中，若i=3，j=4，则执行下列语句的结果是 ( ) Print “i*j=”; i*j A. i*j=12
B. 3*4=12
C. i*j=i*j
D. 12= i*j
50.在VB中，循环结构 For i = 1 To 10 的步长是（ ）。 A. 0
B. -1
C. 1
D. 10
51.有如下VB程序段：
该程序段运行后，变量y的值是（ ）。 A. 4
B. 6
C. 9
D. 12
52.下列四个流程图中，S1、S2、S3表示执行的语句，C表示判断条件。则其中表示顺序结构的是 ( 6
)
A. B.
C. D.
。 53.在面向对象的程序设计中，能被对象所识别的“动作”称为对象的（ ）A. 方法
B. 事件
C. 属性
D. 过程
54.结构化程序设计方法主要通过（ ）现。 A. 递归算法和递归程序 C. 程序的循环结构
B. 过程和函数的定义和调用 D. 对象
55.小明在VB可视化开发环境中，做出了如图所示的窗口界面，由图中我们知道他在该窗口中没有使用到的控件对象是（
A. B. C. D.
56.一玻璃球从高空做自由落体运动，在到达地面时速度为98m/s，请问：该玻璃球从高空开始下落到地面用了多少时间？编程求此问题最佳算法是（ ） A. 穷举法
B. 顺序查找算法
C. 递归算法
D. 解析法
57.列出所有可能的情况，逐个判断有哪些符合问题所要求的条件，从而解决问题，这是（ ）思路 A. 递归算法
B. 顺序查找算法
C. 穷举法
D. 解析法
7
58.找出表示问题的前提条件与结果之间关系的数学表达式，并通过表达式的计算来时限问题求解，这种方法叫做（ ） A. 解析法
B. 顺序查找算法
C. 递归算法
D. 穷举法
59.穷举法的适用范围是（ ） A. 一切问题
C. 解的个数有限且可以一一列举
B. 解的个数极多的问题 D. 不适合设计算法
60.VB的三种工作模式包括设计模式、中断模式和( ) A. 运行模式
B. 对象模式
C. 代码模式
D. 属性模式
二、多项选择题（每小题2分，10小题，共20分，错选、多选不得分。）
61.在VB中，下列函数式的值为5的是 ( ) A. Sqr(25)
B. Abs(-5)
C. Len(“five”)
D. Int(5.8)
62.下列For/Next循环语句中,循环体语句可以被多次执行的是( )。
A. B. C. D.
。 63.在VB 中，用来实现循环结构的语句是 （ ）A. For…Next C. If…Then…
B. Do While…Loop D. Do…Loop Until
64.在VB中，对象的属性是用来描述对象的外部特征。下列选项中属于对象属性的是( ) A. Caption
B. Click
C. BackColor
D. Text
。 65.下列运算结果中，哪个值是2（ ）A. 7/3
B. 7\\3
C. 5 mod 2
D. 2 mod 5
三、简答题（每空2分，共24分）
66.已知一个算法， 程序段和流程图如下图，把程序段补充完整。 s=0
for i=1 to ①_________ s= ②_________
8
next ③________ print “s=”; s
67.如图，若输入框中m=4，n=3，则m= ①_____ a= ②_____，i= ③_____
9
68.分析并完善程序。 计算1+3+5+……+99的值。 Dim i As Integer s=0
for i=1 to ①________ step 2 s= ②__________ next i
print “s=”③_____ ; 69.将以下程序段补充完整。
问题：计算旅客的行李费，收费标准为：20千克以下（包括20千克）不收费，超过20千克的部分每千克收20元。X表示行李重量，Y表示行李费。 程序段：
Dim X As Single
10
Dim Y As Single
X=InputBox(\输入行李重量\ If ①_________Then Y=0 Else
Y= ②_______ End If
Print \行李费= \③___________
四、程序设计题（每空3分，共6 分）
70.将以下程序段补充完整。
问题：输入一个正整数n，判断n是否为素数。要判断n是否为素数，最简单的方法是：统计2到n-1之间能整除n的整数个数s，若s大于0，则n不是素数，否则就是素数。根据以上方法，完善以下程序代码。 Dim n, s As Integer n = Val(InputBox(“n=”)) s=0
For i=2 to ①_________ If n Mod i = 0 then
s=s+1统计因数个数 End If Next i
If ②__________Then Print n & “是素数” Else
Print n & “不是素数” End If
11
精品解析：广西宾阳县宾阳中学2018-2019学年高一4月段考信息技术试题（原卷版）
