一、选择题（每小题2分,共60分)

1．年三十晚上很
多人喜欢放鞭炮，小明看到不远处有户人家着火了，马上拨打119电话，消防队员及时赶到，避免了
大规模的火灾事故。这体现了信息的

A．共享性 B．时效性 C．载体依附性 D．可处理加工性

2．下列将二进制数110100转换成十进制数的算式中，正确的是（ ）

A．1×26+1×25+0×24+1×23+0×22+0×21

B．1×25+1×24+1×23+0×22+0×21+0×20

C．1×25+1×24+0×23+1×22+0×21+0×2
0

D．1×25+0×24+0×23+0×22+0×21+1×20

3．用UltraEdit软件观察“信息技术2012”这几个字，显示的十六进制内码如图所示，从中可以看出汉字“术”在计算机内真正的存储形式为

A．BCBCH B．F5H C．1100101011110101B D．11110101B

4．下列有关信息的编码说法正确的是

A．ASCII码编码表中A的编码比a的编码要大32

B．信息在任何时候都是以二进制的编码方式出现的

C．目前我国常用的汉字编码方案是GB2312

D．ASCII码使用了8位的二进制数对字符进行编码

5．小明的电脑上装有360安全卫士软件，该软件经常跳出提醒，说系统有漏洞，尽快修补，下列说法中正确的是

A．已经安装的360安全卫士，无需担心漏洞

B．有漏洞时需要重装操作系统

C．小明的操作系统是正版的，不可能会有漏洞

D．小明应该根据提示及时打上补丁程序

6．下列网络行为中，违反我国法律法规的是

A．将自己参加学校活动的照片上传到QQ空间相册供他人浏览

B．查找并删除电脑中的病毒文件

C．在QQ群里共享淘宝网上的打折信息

D．在百度帖吧上发布诋毁他人的言论

7．小明用OCR软件对下图所示的图片进行文字识别，在识别之前，应先对图片进行

A．反转 B．倾斜校正 C．旋转 D．剪切

8．小明使用word处理论文的开题报告，在输入=>时多输入了一个=号时，自动转换为(，这体现了word软件具有

A．替换功能 B．自动更正功能 C．修订功能 D．批注功能

9．某品牌电脑的宣传资料中有一段文字：“内存4G、硬盘500G”，这是描述计算机的(　　)

A．运算速度 B．准确性 C．存储容量 D．4G移动通讯功能

10．小明经常使用百度MP3来收听音乐，如图1-2-4-01所示，他把该页面保存到收藏夹中，将会发生的事情是（ ）

A．将《伤不起》这首歌下载下来 B．下次可以在收藏夹中找到歌曲播放页面地址

C．歌曲将无法播放 D．直接将歌曲转到千千静听播放器中播放

11．下面关于算法的描述，正确的是（ ）

A．算法不可以用自然语言表示

B．算法只能用框图来表示

C．一个算法必须保证它的执行步骤是有限的

D．算法的框图表示法有0个或多个输入，但只能有一个输出

12．一个漂亮的酒杯被摔碎了，则漂亮、酒杯、摔、酒杯被摔碎了分别代表的是（ ）

A．对象，属性，事件，方法 B．对象，属性，方法，事件

C．属性，
对象，方法，事件 D．属性，对象，事件，方法

13．表达式abs(－3.6)*sqr(100)的值是（ ）

A．－360 B．360 C．－36 D．36

14．以下语句中错误的是（ ）

A．Const var1=123 B．Dim var2 As String

C．x+y=9 D．Dim d(1 to 500) As Double

15．数学表达式｜x-31｜对应的ＶＢ表达式是（ ）

A．Sqr(x-31) 　 　Ｂ．Val(x-31) C．Abs(x-31) D．Str(x-31)

16．控制工具箱中的工具
是（　　）

A．文件列表　　 　B．单选按钮　　 C．图片框　　 　D．标签

17．Len("Friend")的值是（　　　）

A．6 B．7 C．8 D．9

18．能完全正确表示“year是闰年”的逻辑表达式是 （ ）

A． year mod 4=0

B． year mod 400=0[来源:学.科.网Z.X.X.K]

C．(year mod 400=0) or (year mod 4=0) and (ye
ar mod 100<>0)

D．(year mod 400=0) and (year mod 4=0) or (year mod 100<>0)

19．如果x >5，那么y=2x，否则y=x2+1。下面表述正确的语句是（ ）。

A．If x>5 Then y=2x Else y=x2+1 B． If x>5 Then y=x*x+1 Else y=2*x

C．If x>5 Then y=2*x Else y=x*x+1 D． If x<5 Then y=x*x+1 Else y=2*x

20．设a=2，b=3，c=4，d=5，表达式a>b and c<=d or 2*a>c的值是（ ）

A．True B．False C．－1 D．1

21．下列可作为VB变量名的是（ ）

A． 4*D B． A_B C． 4ABC D．A+B

22．将文本框Text2内输入的字符数据"abc"送到字符型变量n中，应使用的语句是（ ）

A．n=text B．n=text2.text C．n=val(text2) D．n=val(text2.text)

23．下图所示的流程图片断，反映某班下课的流程。

它的控制模式属于（ ）

A．循环模式 B．树型模式 C．分支模式 D．顺序模式

24．如下图所示的流程图片断

上述流程图执行过后，A、B的值分别为 （ ）

A．A是20，B是30 B．A
是20，B是20

C．A是30，B是30 D．A是30，B是20

25．下面是一段关于计算变量s的算法：

①变量s的初值是0

②变量i从1起循环到n，此时变量s的值由下面的表达式计算

③s=s+(-1)*i

④输出变量s的值

这个计算s值的算法中，s的代数式表示式 （ ）

A．1－2+3－4+…+(-1)n×(n－1) B．1－2+3－4+…+(-1)n×n

C．1+2+3+4+…+(n－1)+n D．－1－2－3－…－n

26．在VB中，表达式int（18+25/3）Mod 5 的值是（ ）。

（A）0 （B）1 （C）2 （D）3

27．编程求出1+2+3+……+1000的和。该题设计最适合使用的控制结构为（ ）

A．顺序结构　B．分支结构　C．循环结构　D．选择结构

28.VB函数Right ()从字串右端取部分字串：将某一字串从结尾开始取固定长度的字串。Right("Visual Basic6.0",6)的值为（ ）

（A）sic6.0 （B）asic6.0 （C）Visual （D）ic6.0

29．执行下面的程序段后，x 的值为 ( )　　x=5　　For i=1 To 20 Step 2　　x=x+i\5　　Next i　A、21 B、22 C、 23 D、24

30．在程序设计的过程中，有时需要将几个不同的字符串连接起来，这时需要用到字符串运算符号"+"。如："ab"+"bc"的运算结果是"abbc",那么"27"+"73"的运算结果是（? ??）。A．"100"????????????B．False?????????C．"27+73"?????????D．"2773"

二、综合题（31题每空3分，32题7分，共40分）

31．VB程序设计题。

（1）有如下程序段：

Dim A As String

Dim B As String

Dim C As Integer

A="456"

B="123"

C=Val（A+B）

该程序段运行后，C的值为

（2）有如下程度段：

　　X=5

Y=-20

If Not x>0 Then x=y-3 Else y=x+3

该程序段运行后，y的值为：　　　　 　　　　　

（3）有如下程序段:

S=0

For i=1 to 5

S=s+i*i

Next i

该程序段运行后，S的值为

（4）下面程序的功能是：找出10以内的奇数中能被3整除的正整数，并将它们累
加起来。为了实现这一目标，程序中划线处的语句应更正为______ __________

X=0

For i=1 to 10 step 2

If i mod 2=0 then x=x+i

Next i

（5）现需计算1*2*3*……*n=?有如下程序段，在划线处填入合适的语句或表达式，完成程序。

s=1

i=1

Do While i<=n

S = s * i

i = i + 1

（6）火车托运行李，根据行李的重量按下列标准
收费：若不超过50千克，按每千克0.35元收费；若超过50千克，超过部分则按每千克0.5元收费。输入托运行李的重量，计算并输出托运行李的费用。下面程序若用于实现上
述目标，则划线处的语句应更改为____ ________。

Sub command1_click( )

Dim
x
as double[来源:学科网]

X=val(text1.t
ext)

If x<=50 then

Text2.text= str(0.35*x)

Else

Text2.text= str(0.5*x)

Endif

End sub

（7）有道写于纸上的数学
题因雨水问题淋湿，有两个数字已模糊不清：

（3□+42）×6＝46□

某同学为了找出这两个数，编写了下列Visual Basic程序：

Sub command1_click( )

Dim x as integer,y as integer

For x=0 to 9

For y=0 to 8 step 2

If 72*6+x*6=460+y then

List1.additem " (3" & str(x)& "+42)*6=46" & str(y)

Endif

Next ___ ____

Next x

End sub

（8）个位数字是6，且能被3整除的3位数共有多少个？下面程序用于解决这一问题，在划线处填入合适的语句或表达式，完成程序。设共有n个这样的数，Visual Basic程序如下：

Sub command1_click( )

Dim i as integer,n as integer[来源:Zxxk.Com]

m=106:n=0

do while m<=996

if m mod 3=0 then _______ _______

m=m+10

End if

loop

text1.text=______ ____

End sub

（9）编写一个具有下列功能的VB程序：在文本框Text1中输入一串字符，单击“统计”按钮Command1，在标签Label1中输出字符串的长度。运行界面如图所示，在划线处填入合适的语句或表达式，完成程序。

Dim s As Integer

Private Sub Form_Load()

Command1.Caption = " "

End Sub

Private Sub Command1_Click()

s =

Label1.Caption = "共有" + Str(s) + "个字符"

End Sub

32.根据以下流程图写出程序代码。

信息技术考试答题卷

二、综合题（31题每空3分，32题7分，共40分）

31．（1）

（2）　　　　 　　　　　

（3）

（4）____ ________

（5）

（6）

（7）___ ____

（8）______ _______ ______ ____

（9）

32. Private Sub Command1_Click()

[来源:Z|xx|k.Com]

[来源:学科网]

End Sub