资源简介

平阳二中2015学年第一学期期中考试
高二信息技术试卷
一、选择题（本题共15小题，每题2分，共30分）
1、1、下列是用VB编程解决问题时的三个步骤
①在VB编程环境中设计界面，编写程序代码
②分析问题，确定解决问题的算法
③调试，运行程序
正确的顺序是（ ）
A．①②③ B．①③② C．③②① D．②①③
2、算法中的输入，是指算法在执行时需要从外界（如：键盘）取得数据信息，其目的是为算法的某些阶段建立初始状态，一个算法的输入可以0个，是因为（ ）
A．建立初始状态所需要的数据信息已经包含在算法中
B．该算法不需要初始状态的数据信息?
C．该算法的运算不涉及任何数据信息 ?D．以上说法都正确?
3、温州地区居民生活用电 从2012年7月1日开始执行阶梯电价。具体实施方案是：将居民每月用电量划分为三档，电价实行分档递增。第一档为每月不超过220度的电量，电价保持每度0.49元不变；第二档为每月221至400度之间的电量，电价每度0.54元，比第一档提高0.05元；第三档为每月超过400度的电量，电价每度0.79元，比第一档提高0.3元；居民阶梯电价以年度为周期结算。该问题算法的结构属于 （ ）
A. 顺序结构 B. 树形结构 C. 选择结构 D. 循环结构
4、要使窗体Form1的标题栏中显示“计算”，以下语句正确的是 （ ）?A．Form1.Caption=“计算” B．Form1.title=“计算”?C．Form1.Text=“计算” D．Form1.名称=“正计算”
5、下列关于“控件”属性的说法正确的是 （ ）A．单击窗体中的某控件，在属性窗口中的属性列表框中找到所要设置的属性，即可设置其属性值。B．所有对象都具有同样的属性C．控件的属性只能在设计时设置，不能在运行时修改D．控件的每一个属性都具有同样的默认值
6、在VB中，下列能作为变量名的是 （ ）
A.5a?? B.If?? C.Abs?? D.Tea
7、下列属于Visual Basic数值常量的是 （ ）
A.1+2 B.1/2 C.1÷2 D. 0.5
8、银行给用户计算利息时，结果中会产生很多位小数，但在支付时，是以“元”为单位，按“分”结算的，即结果保留二位小数，并对第三位小数进行四舍五入。假设结算的利息是x元，在Visual Basic中，上述算术问题的表达式应是 （ ）
A. Int(x*10+0.5)/10 B. Int(x*100+0.5)/100
C. Int(x*100)/100 D. Int(x*100+0.5)/10
9、 如果上右程序框图运行的结果，那么判断框中应填入（ ）

A． B． C． D．
10、模拟剪刀石头布的游戏，用1~3这3个数分别代表剪刀、石头、布这三种情况，使用RND随机函数可以表示为（ ）
A、 INT（RND（3）+1） B、INT（RND*2+1）
C、 INT（RND（2）+1） D、INT（RND*3+1）
11、若x = False, y = True，执行
If x And y? Then x = 0 Else x = 1 后X的结果为( )。
? ? A.False? ? ? ? B.1? ? ? ? C.编译错误? ? ? ? D.0?
12、表示图中坐标轴上阴影部分的表达式是（ ）。
????
A．(X=b)AND(X<=C)???B．(X=b)OR(X<=C)?
C．(X=b)AND(X<=C)???D．(X=b)OR(X<=C
13、下列Visual Basic程序段运行后，变量s的值等于120的是（ ）
s = 0 : i = 1
Do While i <= 15
s = s + i
i = i + 1
Loop
（A）
s = 0 : i = 1
Do While i <=15
i = i + 1
s = s + i
Loop
（B）
s = 0
For i = 1 To 15
s = i
Next i
（C）
s = 0
For i = 1 To 15
i = i + s
Next i
（D）
14、某VB程序的一个事件过程如下：
Private Sub Command1_Click()
Dim r As Single
Dim pi As Double
r = 50
pi = 3.14
Label1.Caption = "圆面积为：" + Val(pi * r * r)
End Sub
运行程序，单击命令按钮Command1后弹出如图所示的出错信息提示。引起该错误的语句是: （ ）
A. Dim r As Single B. Dim pi As Double
C .pi = 3.14 D.Label1.Caption = "圆面积为：" + Val(pi * r * r)
15、.某VB程序的一个事件过程如下：
Private Sub Command1_Click()
Dim ch As String
ch = "abcd"
Label1.Caption = ch
End Sub
窗体中标签对象的属性设置如图所示。
运行程序，单击命令按钮Command1，出现“要求对象”的出错信息提示。引起该错误的语句是（ ）
A. Dim ch As String B. ch = "abcd"
C . Label1.Caption = ch D. End Sub
二、非选择题（每空2分，共20分）
16、有如下Visual Basic程序段：
x = 2016
y =int（-40.2）
s = x + y
该程序段运行后，变量s的值为_________。
17、有如下Visual Basic程序：在文本框中输入a，运行后在标签label1显示运行结果。
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = Val(Text1.Text)
If a Mod 2 = 0 Then
b = a + 1
ElseIf a Mod 3 = 0 Then
b = a + 2
ElseIf a Mod 5 = 0 Then
b = a + 4
Else
b = a
End If
Label1. ① = Str(b)
End Sub
运行该程序，在文本框Text1中输入25，单击命令按钮Command1，在标签Label1中显示运行结果。
(1)在程序①划线处，填入适当的语句或表达式，把程序补充完整：
程序中①划线处应填入 。
(2)该程序段运行后，标签label1中显示的结果是____________.
18、 有如下Visual Basic程序段：
i=1
Do while i<8
i=i+2
s=2*i+3
loop
该程序段运行后，变量s的值为____________.
19、有如下Visual Basic程序：
Private Sub Command1_Click()
Dim a As String, i As Integer
a = Text1.Text
For i = 1 To Len(a)
If Mid(a, i, 1) = "@" Then
Label1.Caption = Mid(a, 1, i - 1)
End If
Next i
End Sub
运行该程序，在文本框Text1中输入erzhong@163.com，单击命令按钮Command1，在标签Label1中显示的是__________。
20、某企业在第1年初购买一台价值为120万元的设备，该设备的价值在使用过程中逐年减少。从第2年到第6年，每年初的价值比上年初减少10万元；从第7年开始，每年初的价值为上年初的75%。问第n年初该设备的价值是多少？下面的Visual Basic程序用于解决此问题，运行程序，在文本框Text1中输入年数n，单击“计算”按钮Command1，则在标签Label1中显示此年初的价值a。程序运行界面如图1所示，流程图如图2所示。
图1
图2
程序代码如下：
Private Sub Command1_Click()
Dim n As Single, a As Single
n = Val(Text1.Text)
If n = Int(n) And n >= 1 Then
If n <= 6 Then
a = ①
Else
a = 70 * 0.75 ^ (n - 6)
End If
Label2.Caption = "第" + Str(n) + "年初价值：" + ② + "万元"
Else
Label2.Caption = "输入的年数不符合要求！"
End If
End Sub
在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：
程序中①划线处应填入 。程序中②划线处应填入 。
21、求完数（完美数）。一个数恰好等于除它本身外的因子之和，这个数就称为完数。例如28除本身之外的因子是1，2，4，7，14，且1 + 2 + 4 + 7 + 14 = 28，则28是完数。下列Visual Basic程序用于查找2～10000中的所有完数，并将结果显示在列表框List1中，程序运行界面如图1所示。其中方框内程序对应的流程图如图2所示
图1
程序代码如下：
Private Sub Command1_Click()
Dim i As Integer, t As Integer，s as integer
For x = 2 To 10000
s = 0
For i= 1 To x 2
If x Mod i = 0 Then
s = ②
End If
Next i
If s = x Then
List1.AddItem ①
End If
Next x
End sub
（1）该程序的的算法是 。 （选填：解析算法/枚举算法）
（2）在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：
程序中①划线处应填入 。
程序中②划线处应填入 。
平阳二中2015学年第一学期期中考试
高二信息技术答卷
选择题（每题2分，共15题，共30分）
题号
1
2
3
4
5
6
7
8
9
10
答案
D
A
C
A
A
D
D
B
A
D
题号
11
12
13
14
15
答案
B
C
A
D
C
非选择题（每空2分，共20分）
16、____1965_____________
17、
(1)____caption__________ (2)______29____________
18、
______21_______________.
19、
_______erzhong________________
20、
120-10*（n-1）_____ str（a） 。
21、
(1) 枚举算法
（2） s+i str（s）或str（x） 。

展开更多......

收起↑