外星人的BLOG

机密★2008 年 6 月 14 日
2008 年福建省普通高中学生学业基础会考
信息技术试题 （信息技术基础）
（考试时间：60 分钟；满分：50 分）
注意事项：
1．本卷共 8 页，答卷前考生务必将自己的姓名、准考证号、考试科目涂写在答题卡上。
2．每小题选出答案后，用 2B 铅笔把答题卡上对应题目的答案标号涂黑。如需改动，用橡
皮擦擦干净后，再选涂其它答案。答案不能答在试题上。

选择题（共 50 题，每题 1 分，每题只有一个正确答案）
1．北京时间 5 月 12 日 14 时 28 分，四川汶川县发生 8.0 级地震。在党中央、国务院的领导下，全国上下迅速动员，团结一心、众志成城，开展了紧急有序的救灾工作，使灾害损失降到最低。

本学期，本人除担负全校的网络管理工作和中心机房的管理工作以外，还担任了初中部和小学部两个多媒体教室的管理工作。由于我校是一所新办的全省规模最大的九年一贯制公办学校，学校的各种活动非常多，大多数都在初中部的多媒体教室举行，因此，多媒体教室的管理工作非常繁重。现制订如下管理工作计划：

一．制定制度，加强管理

①本学期接手管理初中多媒体教室以后，本人结合市装备所及区装备站的规章制度制定了我校的《多媒体教室管理制度》，严格按制度管理和使用多媒体教室。②做到使用先申请，使用后有记载。

二．加强多媒体硬件设备的维护

由于初中多媒体教室整套设备都是从原天台中学拆过来的，在拆卸、搬运以及安装的过程中，设备损坏严重。重新安装以后，总是出现这样或那样的故障，效果大不如前。计划新添置一套胸麦及无线接收机。功放机及调音台及时联系家电维修人员来校修理。保证学校多媒体教室的正常使用。

三．加强多媒体电

1. 每天告诉自己一次，『我真的很不错』 2. 生气是拿别人做错的事来惩罚自己 3. 生活中若没有朋友，就像生活中没有阳光一样 4. 明天的希望，让我们忘了今天的痛苦 5. 生活若剥去了理想、梦想、幻想，那生命便只是一堆空架子 6. 发光并非太阳的专利，你也可以发光 7. 愚者用肉体监视心灵，智者用心灵监视肉体 8. 获致幸福的不二法门是珍视你所拥有的、遗忘你所没有的 9. 贪婪是最真实的贫穷，满足是最真实的财富 10. 你可以用爱得到全世界，你也可以用恨失去全世界 11. 人的价值，在遭受诱惑的一瞬间被决定 12. 年轻是我们唯一拥有权利去编织梦想的时光 13. 青春一经典当即永不再赎 14. 没有了爱的语言，所有的文字都是乏味的 15. 真正的爱，应该超越生命的长度、心灵的宽度、灵魂的深度 16. 爱的力量大到可以使人忘记一切，却又小到连一粒嫉妒的沙石也不能容纳 17. 当一个人真正觉悟的一刻，他放弃追寻外在世界的财富，而开始追寻他内心世界的真正 18. 只要有信心，人永远不会挫败 19. 不论你在什么时候开始，重要的是开始之後就不要停止 20. 不论你在什么时候结束，重要的是

机密★2007年6月17日
2007年福建省普通高中学生学业基础会考
信息技术试题
（信息技术基础）
（考试时间：60分钟；满分：50分）

注意事项：
1．本卷共8页，答卷前考生务必将自己的姓名、准考证号、考试科目涂写在答题卡上。
2．每小题选出答案后，用2B铅笔把答题卡上对应题目的答案标号涂黑。如需改动，用橡皮擦擦干净后，再选涂其它答案。答案不能答在试题上。
选择题（共50题，每题1分，每题只有一个正确答案）
1．小王和小李就“信息”的范畴展开了讨论。小王说：“报纸上刊登的广告是信息”；小李说：“期中考试的各科成绩是信息”。你认为他们说的对吗？
 A．小王说的对，小李说的不对 B．小李说的对，小王说的不对
 C．小王和小李说的都对 D．小王和小李说的都不对

2．南方中学要组织义务植树活动。同学们通过网上搜索，获得“3月12日是植

第11题:

打开“Z:\VB\135”文件夹中的文件：“k5.vbp” 进行以下操作后并保存。（编程在字符串相连接时不应使用'+'要使用运算符'&'）

在该工程代码窗口指定的位置中编写代码实现：若 a大于 0,则i的值为'正数'；若 a小于 0，则i的值为'负数'。
注：
1．以下内容的代码已经在程序中给出，考生不要编写。
    ①将变量a定义为整型变量，i定义为字符串型变量；
　　②将从文本框Text1中输入的值赋给a；
　　③输出i。
2．保存工程文件和窗体程序
3．调试运行程序
测试数据
在text1文本框中输入-5，输出“负数”；
在text1文本框中输入11，输出'正数'；

Dim a As Integer
    a = Text1.Text
    Call calculate(a)
    Print ABC
End Sub

Private Sub calculate(a As Integer)
Dim i As String
    '在以下位置编写代码，代码的行数不限

第12题:
打开“Z:\VB\110”文件夹中的文件：“d5.vbp” 进行以下操作后并保存。

在VB代码窗口指定位置修改完善程序代码实现，求1×2×3×4×5的值。
Private Sub Command1_Click()
Dim i As Integer
Dim s As Long
'删除<1>，填入正确的代码
s =<1>
For i = 1 To 5
 '删除<2>，填入正确的代码
   s =<2>
Next i
Print '1×2×3×4×5的值是：'; s
End Sub

第12题:
使用VB打开“Z:\VB\82”文件夹中的文件：“d2.vbp” 进行以下操作后并保存。

在VB代码窗口指定位置修改完善程序代码实现，求1到100之间能被4整除的个数

Private Sub Command1_Click()
Dim i As Integer
Dim s As Integer
'删除<1>，填入正确的代码
s = <1>
For i = 4 To 100 Step 4
'删除<2&

第13题:
新建一个VB工程，工程文件名称为：'工程1.vbp',并添加一个窗体文件：'Form1.frm'，保存在“Z:\VB\137”文件夹下。进行如下操作后并保存。（输入的数字为半角字符）
在窗体中添加下表所示对象并按要求设置对象属性

┌─────────────┬────────┬───────┬──────┐
│　　　对　　　　　象　　　│　　对　象　名　│　　属性名　　│　属性值　　│
├─────────────┼────────┼───────┼──────┤
│Ｌａｂｅｌ　　　　　　　　│Ｌａｂｅｌ１　　│Ｃａｐｔｉｏｎ│用户名　　　│

├─────────────┼────────┼───────┼──────┤
│Ｌａｂｅｌ　　　　　　　　│Ｌａｂｅｌ２　　│Ｃａｐｔｉｏｎ│密码　　　　│

├─────────────┼────────┼───────┼──────┤
│ＴｅｘｔＢｏｘ　　　　　　│Ｔｅｘｔ１　　　│　Ｔｅｘｔ　　│小明　

第12题:

打开Z:\“VB\20”文件夹中的文件：“E2.vbp” 进行以下操作后并保存！（编程在字符串相连接时不应使用要使用运算符）

在-（1）-、-（2）-处添加代码，完善该程序,程序说明如下：
程序是计算1*2+2*3+3*4+4*5+…+N*（N+1）的和(N≤60);当用户输入N后，单击'求1*2+2*3+3*4+4*5+…+N*（N+1）'按钮后，输出正确结果。
①分别删除符号'-（1）-、-（2）-'
②添加适当的事件过程代码，使得该程序实现以上功能
③按原文件名分别保存工程与窗体文件。

Private Sub Command1_Click()
Dim N, P As Integer
Dim S As Long
N = Text1.Text
S = 0
For i = 1 To N
  P = i * ---(1)---
  --(2)--
Next i
Text2.Text = S
End Sub

---(1)---　　　改为：（i+1）

---(2)---      改为：s=s+p

第13题:

打开Z:\“VB\1426”文件夹中的文件：“E1.vbp” 进行以下操作后并保存！（编程在字符串相连接时不应使用要使用运算符）

在窗体e1.frm的代码中编写一个名称为Squares的函数，使函数能接收3 个参数，函数要实现的功能描述如下： “考生文件中的E1.frm编写求三角形面积的程序。程序要求输入三个正整数a、b、c，判断它们能否构成三角形的三边，如果能构成一个三角形，则输出：'该三角形的面积为：    '，否则输出：'不能构成三角形'”

Private Function squares(a As Integer, b As Integer, c As Integer)

Dim d As Integer

d = (a + b + c) / 2

squares = Sqr(d * (d - a) * (d - b) * (d - c))

End Function

第12题:

新建一个ＶＢ工程，工程文件名称为：“E1.vbp”,并添加一个窗体文件：“E1.frm”，保存在Z:\下的VB文件夹下的13文件夹下。 进行如下操作后并保存！（编程在字符串