Next i
Label1.Caption = Str(s) Print Str(i – n) End Sub
(1)运行该程序,单击命令按钮Command1,在标签Label1中显示的是__________(2分) (2)Print语句作用是将值输出在窗体上,则程序运行后窗体上显示的值是______(2分)
24.张某编写了一个随机生成彩票号码的程序,程序运行界面如图(第23题图)。程序功能:文本框TextSet用来录入号码生成数量,单击“设置”按钮(CommandSet)保存需要生成的号码数量;单击“开始生成”按钮(CommandStart)后在列表框ListNum中显示号码;单击“清除”按钮清除生成的号码。 程序代码如下:
Dim setNum As Integer
Dim num(1 To 100) As Integer Private Sub CommandClear_Click()
ListNum.Clear '清除列表框内容 End Sub
Private Sub CommandSet_Click()
第24题图
setNum = Val(_______①_______) End Sub
Private Sub CommandStart_Click() Dim i As Integer
If _____②______ Then
MsgBox (\请先设置号码生成数量\ Else
Randomize
For i = 1 To setNum
num(i) = _______③_______ ListNum.AddItem num(i) Next i End If End Sub
请回答如下问题:
(1)要对窗体标题“Form1”进行更改,则在其属性面板中设置的属性名是___________ (2)补充①处的程序代码_____________________(2分)
(3)在开始生成前,当用户未设置号码生成数量时,需要进行提醒,请补充②处的程序代码_____________________(2分)
(4)若要产生的号码范围为1到9之间的整数(包含1和9),则③处程序代码为 ___________________________________(2分)
(5)程序中出现的AddItem是____________________(选填“属性”或“方法”)
25. 求孪生素数。孪生素数是指两个相邻奇数且都是素数,由于它们是最近的素数,就像孪生兄弟一样。下列Visual Basic程序用于查找100以内的所有孪生素数,其中函数f用于
[来源:Zxxk.Com][来源:Z.xx.k.Com]判断一个数是否是素数,程序运行界面如图(第25题-1图)所示,Command1鼠标单击事件过程的流程图如图(第25题-2图)所示。
第25题-1图
程序代码如下:
Private Sub Command1_Click() Dim i As Integer
List1.Clear '清除列表框内容
For i = 3 To 97 ___①___
If f(i) And ② Then
List1.AddItem Str(i) + \ End If Next i
第25题-2图
End Sub
Private Function f(x As Integer) As Boolean '自定义函数f,返回值为逻辑型 Dim j As Integer f = True
For j = 2 To Int(Sqr(x)) If x Mod j = 0 Then
f = ③ '函数返回值 Exit For '跳出For循环 End If Next j End Function
(1)程序中加框部分的算法是 (选填:解析算法/枚举算法)(2分) (2)在程序①、②、③划线处,填入适当的语句或表达式,把程序补充完整: 程序中①划线处应填入 (2分) 程序中②划线处应填入 (2分) 程序中③划线处应填入 (2分)
(3)将加框部分转换为Do While条件循环结构,部分代码如下:
[来源:Z+xx+k.Com]
Private Sub Command1_Click() Dim i As Integer
i = 3
Do While i <= 97
'循环内语句块与加框处循环内语句块相同 Loop End Sub
上述转换后的程序运行时会产生什么问题,请写出问题与修改方案: 产生的问题是____________________________________ 修改方案是________________________________(2分)
杭州二中2015学年第一学期高一年级期终考试信息技术答卷
一、选择题
选择题答案请在答题卡上填涂 二、非选择题 21.(1)__________
(2)__________________________________(2分)
(3)__________, __________, __________, __________
(4)________________________________________(2分),___________,____________ (5) __________, __________
22.(1)_______________________________ (2分) (2)_________________________________ (2分) 23.(1)_______________ (2分) (2)_______________ (2分) 24.(1)_______________
(2)__________________________ (2分) (3)__________________________ (2分) (4)_________________________________ (2分) (5)_____________
25.(1)________________ (2分)
(2) ①____________________________(2分)
②____________________________(2分) ③____________________________(2分)
(3)产生的问题是_________________________________
修改方案是_________________________________________________________(2分)
2015学年第一学期高一信息技术期末考试客观题答案 1.C 2.B 3.D 4.B 5.A 6.A 7.B 8.D 9.B 10.A 11.C 12.D 13.B 14.A 15.D 16.B 17.D 18.B 19.B 20.A
相关推荐: