高二信息技术月考试题1.docx

高二信息技术月考试题1.docx

《高二信息技术月考试题1.docx》由会员分享，可在线阅读，更多相关《高二信息技术月考试题1.docx（8页珍藏版）》请在冰豆网上搜索。

高二信息技术月考试题1

——教学资料参考参考范本——

高二信息技术10月月考试题

（1）

______年______月______日

____________________部门

第一部分信息技术（50分）

一、选择题（共24分，其中1-10题每题2分，11题4分）

1.将数学表达式：

x2＋5x＋3写成VisualBasic表达式，正确的是（　　）

A.2*x＋x＋3B.x^2＋5*x＋3

C.sqr（x）＋5x＋3D.x^2＋5x＋3

2.下列VB表达式的值等于3的是（　　）

A.Sqr（9）B.abs（－1）

C.Len（“－1”）DLen（“－3”）

3.有如下VB程序段：

（　　）

a＝12

b＝54

t＝a

a＝b

b＝t

该程序执行后，变量a，b的值分别是（　　）

A.12，54B.54，12

C.54，54D.12，12

4.如下VB程序段：

a＝3：

b＝6：

c＝5

ifa>＝banda>＝cthen

y＝a

elseifb>＝cthen

y＝b

else

y＝c

endif

该程序运行之后，整数型变量y的值（　　）

A.0B.5C.6D.3

5.在VB中，若用a，b，c分别代表对象名，属性名，属性值，则下列表达形式正确的是（　　）

A.a.b＝cB.a.c＝b

C.b.c＝aD.b.a＝c

6.为使下面左右框内的VB程序段实现相同的功能，则左框内划线处填写的代码应该是（　　）

s＝0：

t＝1

DoWhilet<＝6

s＝s＋t

________

Loop

s=0

Fort=1to6step2

s=s+t

Nextt

A.t＝2B.t＝6

C.t＝t＋1D.t＝t＋2

7.在VB语言中，下列合法的变量名是（　　）

A.PrintB.test@qw

C.6cost_1D.count2s

8.数组a中的数据存放情况如下表，以下关系表达式成立的是（　　）

a

（1）

a

（2）

a（3）

a（4）

a（5）

a（6）

a（7）

a（8）

1

3

4

12

8

6

5

7

A.a（a（3））＝4B.a（a（8））＝8

C.a（6）>a（5）－a（a

（1）＋1）D.a（a

（2）＋a

（1））<>a（4）

.

9.该程序的运行后label1中显示的是（　　）

S＝0

C＝0

DoWhileC<100

　C＝C＋1

　S＝S＋C

Loop

Label1.caption=Str（C）＋Str（S）

A.994950B.1004950

C.1005050D.1015151

10.有如下程序：

PrivateSubCommand1_Click（）

Dima（1to5）AsInteger

DimnAsInteger,iAsInteger

n=Val（Text1.Text）

i=0

a

（1）=1:

a

（2）=1

Fori=3ton

a（i）=a（i-1）+a（i-2）

nexti

Label1.Caption=a（i）

EndSub

若在Text1中输入5，则点击按钮后的运行结果为（）

A.Label1输出5B.Label1中输出10

C.报“下标越界”错误D.Label1中无内容

11.有如下程序：

Dima（1To1000）AsString

Dimb（1To2）AsInteger

n=Len（Text1.Text）

Fori=1Ton

a（i）=Mid（Text1.Text,i,1）

Nexti

DoWhilen>1

IfAsc（a（n））>=Asc（a（n-1））Then

m=1

Else

m=2

EndIf

b（m）=b（m）+1

n=n-1

Loop

数组b各元素的初始值都为0,文本框Textl的内容为“20xx1018”。

执行程序后，变量b

（1）的值为

A．6

B．5

C．4

D．3

二、填空题（共26分，其中第1题每空1分，其余每空2分）

1.VisualBasic程序设计中，某对象的属性窗口和代码窗口如下图所示：

根据图中所给的信息，在下表中填入相应的序号。

对象名

属性值

类

事件过程

2.以下程序运行后，a

（1）值为①，a

（2）值为②

Dima（1to5）AsInteger

DimiAsInteger,tAsInteger

a

（1）=3:

a

（2）=8:

a（3）=4:

a（4）=10:

a（5）=6

Fori=2To5

Ifa

（1）

（1）:

a

（1）=a（i）:

a（i）=t

Nexti

3.小明写了一个程序，输入任意非负整数，输出这个数的位数，并且将这个数倒序输出，界面如图，请填空以完成整个程序。

PrivateSubCommand1_Click（）

DimsAsInteger,iAsInteger

Dims2AsString,cAsString

s=Val（Text1.Text）

i=0

DoWhile①

c=Str（sMod10）

②

s=s\10

i=i+1

Loop

Label1.Caption=“该数字的位数为：

”&Str（i）

Label2.Caption=“该数字的倒序数为：

”&s2

EndSub

4.统计“英文句子单词平均长度”的程序，其实现功能为：

在文本框Text1中输入要统计的英文句子，单击“统计”按钮Command1。

进行统计，求出句子中共有几个单词、句子单词的平均长度，并显示在标签框Label1中。

程序运行界面如第14题图所示。

（1）代码“PrivateSubCommand1_Click（）”中的Command1_Click是（单选，填字母:

A.对象名/B.事件名/C.事件处理过程名）。

（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。

PrivateSubCommand1_Click（）

DimsAsString

DimnAsInteger

DimcntAsInteger

DimiAsInteger

DimnumAsSingle

DimcdAsSingle

DimaveAsSingle

s=Text1.Text

n=Len（s）

num=0

cd=0

cnt=0

Fori=1Ton

①

Ifc>="a"Andc<="z"orc>="A"Andc<="Z"Then

cnt=cnt+1

ElseIfc>="0"Andc<="9"Then‘单词中可能有数字，也进行统计

cnt=cnt+1

Else

Ifcnt>0Then

num=num+1

cd=cd+cnt

②

EndIf

EndIf

Nexti

ave=cd/num

Label1.Caption="总共有"+Str（num）+"个单词，平均长度为"+Str（ave）

EndSub

5.某数字加密算法描述如下：

将某位数字与其位置相加得到num，num除以11的余数即为编号，若余数为0编号为11，从密码表中找出与编号对应的加密字符完成加密。

密码表如下：

编号

1

2

3

4

5

6

7

8

9

10

11

加密字符

V

i

s

u

a

l

B

A

S

I

C

小明按照上述方法，设计了一个数字加密的VB程序，功能如下:

单击“加密”按钮Commandl,程序依次将文本框Text1中每个数字进行加密，并将加密后的密文在文本框Text2中输出。

下表显示了数字“20xx”的加密过程：

数字

2

0

1

8

位置

1

2

3

4

编号

3

2

4

1

加密字符

s

i

u

V

程序运行效果如图所示。

（1）设计如图所示的程序中，至少要使用      个类（填数字）。

（2）实现上述功能的VB程序如下，请在划线处填入合适代码。

PrivateSubCommand1_Click（）

DimsAsString,s1AsString,s2AsString,numAsInteger

s="VisualBASIC"

s1=Text1.Text

s2=""

i=1

DoWhile①

num=Val（Mid（s1,i,1））+i

num=numMod11

Ifnum=0Thennum=11

s2=②

i=i+1

Loop

Text2.Text=s2

EndSub

（3）若密文是“uAV”,则明文是。