浙江省乐清市芙蓉中学学年高二下学期期末考试信息技术试题 Word版含答案.docx

资源描述

浙江省乐清市芙蓉中学学年高二下学期期末考试信息技术试题 Word版含答案.docx

《浙江省乐清市芙蓉中学学年高二下学期期末考试信息技术试题 Word版含答案.docx》由会员分享，可在线阅读，更多相关《浙江省乐清市芙蓉中学学年高二下学期期末考试信息技术试题 Word版含答案.docx（12页珍藏版）》请在冰豆网上搜索。

浙江省乐清市芙蓉中学学年高二下学期期末考试信息技术试题 Word版含答案.docx

浙江省乐清市芙蓉中学学年高二下学期期末考试信息技术试题Word版含答案

2017-2018学年信息技术VB期末测试试卷

一、选择题（每题3分）

1.在求解“一元二次方程实数根”的算法中，如果方程不存在实数解，也要求输出结果“无实数根”。

此要求主要体现了算法特征中的（　　）

（A）有穷性（B）有输出（C）确定性（D）唯一性

2．某超市在晚上19：

30－20：

30期间，对于在货架上已超过2天的带叶蔬菜，收银机自动将价格下降50%。

用来描述某种蔬菜是否降价的处理过程，合适的算法流程是（　　）

（A）循环模式

（B）重复模式

（C）选择模式

（D）顺序模式

3.在VisualBasic程序中要用到存储范围为-40000～40000的某一整数变量，则该变量的类型应该定义为（　　）

（A）Integer（B）Long（C）Single（D）Boolean

4.在VisualBasic中，要定义一个一维数组a，用于存储15名铅球运动员的成绩数据（以米为单位，精确到0.01米），则正确的数组定义语句是（　　）

（A）Dima（1,15）AsInteger（B）Dima（1,15）AsSingle

（C）Dima（1To15）AsSingle（D）Dima（1To15）AsInteger

5．在VisualBasic中，用变量y存储“ABC”，变量y的数据类型应定义为（　　）

（A）String

（B）Long

（C）Boolean

（D）Integer

6.下列运算结果中，值为3的是（　　）

（A）5/3（B）5\3（C）3mod5（D）5mod3

7.产生[1，40]范围内某一随机整数的表达式是（　　）

（A）Rnd*40

（B）Int（Rnd*40）

（C）Int（Rnd*40）+1

（D）Int（Rnd*39）+1

8.下列VisualBasic表达式的值等于56的是（　　）

（A）Mid（"1234567",5,3）（B）Len（"55"）+1

（C）Sqr（56）（D）Abs（-55）+1

9.在VisualBasic中，语句abc.Text="hello"中的“Text”是（　　）

（A）对象名（B）方法名（C）属性值（D）属性名

10.下列属于正确的VisualBasic赋值语句的是（　　）

（A）a+b=2（B）a=2+b（C）2=a+b（D）a*b=2

11.在VisualBasic中，下列能作为变量名的是（　　）

（A）3_Click

（B）Name

（C）Integer

（D）a+y

12.在VisualBasic中，Hello.frm文件属于（　　）

（A）工程文件（B）窗体文件（C）代码文件（D）类文件

13.在VisualBasic中，语句tel="ipad3"中的"iPad3"是（　　）

（A）逻辑常量（B）数值常量（C）字符串常量（D）实数常量

14.下列表达式中，符合VisualBasic表达式书写规范的是（　　）

（A）3+|k-1| （B）2k-1 （C）a·k/2 （D）k2-1

15.在VisualBasic中，要在标签对象Label3上显示文字“正确”，下列语句正确的是（　　）

（A）Label3="正确"（B）Lable3.Caption="正确"

（C）Label3.Caption="正确"（D）Caption.Label3="正确"

16.对于VisualBasic语句Ifb=2Thens=s*2Elses=s/2，下列说法正确的是（　　）

（A）b=2为赋值语句（B）s=s*2和s=s/2均为赋值语句

（C）s=s*2和s=s/2均为关系表达式

（D）s=s*2为关系表达式，s=s/2为赋值语句

17．长方体侧面积计算公式是s=2h（a+b），a、b为长和宽，h为高，计算s的VisualBasic表达式是（　　）

（A）2h（a+b）

（B）2h*（a+b）

（C）2*h（a+b）

（D）2*h*（a+b）

18.将整数型变量n的值显示在文本框Text1中，正确的语句是（　　）

（A）Text=n（B）Val（Text1）=n

（C）Text1.Text=Str（n）（D）Str（Text1.Text）=n

19．下列语句用于计算s=1+4+7+10+…+25：

①Fori=1To25Step3②Nexti③s=0④s=s+i

正确的语句顺序是（　　）

（A）①②③④

（B）①③④②

（C）③①④②

（D）④③①②

20．有流程图结构如下，其算法结构属于（　　）

（A）顺序结构

（B）选择结构

（C）分支结构

（D）循环结构

21．下列描述算法的流程图符号中属于输入.输出框符号的是（　　）

（A）

（B）

（C）

（D）

22.某VisualBasic程序的一个事件过程如下：

PrivateSubCommand1_Click（）

DimchAsString

ch="abcd"

Label1.Caption=ch

EndSub

窗体中标签对象的属性设置如图所示。

运行程序，单击命令按钮Command1，出现“要求对象”的出错信息提示。

引起该错误的语句是（　　）

（A）DimchAsString

（B）ch="abcd"

（C）Label1.Caption=ch

（D）EndSub

二、填空题

1.（每空3分）有如下VisualBasic程序段：

i=6

i=i+2

j=2*i+1

j=i

该程序段运行后，变量j的值为。

2.（每空3分）

PrivateSubCommand1_Click（）

DimaAsString

a=Text1.Text+Text2.Text

Printa

EndSub

程序运行后,在第一个文本框（Text1）和第二个文本框（Text2）中分别输入58和42,然后单击命令按钮,则在窗体上打印出来的结果为_______________

3.（每空3分）某算法的流程图如下所示：

若输入a、b的值分别为3、9，则该算法的输出结果为_______________

4.（每空3分）某快递公司快递货物按照货物的重量，按下列标准收费：

若不超过5千克，统一收取费用15元，若超过5千克，在基本费用15元的基础上，超过部分则按每千克2.5元收费，若超过20千克,在基本费用50元的基础上，超过部分则按每千克2元收费。

设x表示货物重量，y表示快递费用。

该问题的数学表达式为：

解决上述问题的VisualBasic程序如下，在①和②划线处，填入合适的语句或表达式，把程序补充完整。

PrivateSubCommand1_Click（）

DimxasDouble

x=Val（Text1.Text）

Ifx>20Then

①

Else

If②Then

y=15+（x-5）*2.5

Else

y=15

EndIf

Text2.Text=Str（y）

EndIf

EndSub

5、（每空3分）有如下VisualBasic程序段：

s=0

Fori=1To6step2

s=s+i

Nexti

该程序段运行后，s=________

6.（每空4分）以下VisualBasic程序的功能是：

计算表达式1×3＋2×3＋3×3＋…100×3的值，并在文本框abc中输出计算结果。

PrivateSubCommand1_Click（）

DimiAsInteger,sAsInteger

s=0

i=1

DoWhilei<=100

s=s+i*3

i=i+1

Loop

_____①______=Str（s）

EndSub

问：

（1）为了实现上述表达式的计算，②处划线处应填入_____①_____。

（2）退出循环时，变量i的值是____②_____。

7.（每空4分）如下图为冒泡排序的案例：

lstUnsorted，lstSorted为左右两个列表框。

OptionExplicit

ConstMAXSIZE=1000

Dimd（MAXSIZE+1）AsInteger,nAsInteger

PrivateSubCommand1_Click（）

DimiAsInteger,jAsInteger

n=Val（txtSize.Text）

Ifn<=0Orn>MAXSIZEThen

txtSize="数据个数必须大于0！

ExitSub

EndIf

Randomize

lstUnsorted.Clear

Fori=1Ton

j=Int（32768*Rnd）

lstUnsorted.AddItemStr$（j）

d（i）=j

Command2.Enabled=True

EndSub

PrivateSubCommand2_Click（）'冒泡

Dimi,j,TEMP,NextElement

lstSorted.Clear

Fori=1ton-1

For_____①_______Step-1

Ifd（j）

TEMP=d（j）

________②_______

d（j-1）=TEMP

EndIf

Fori=1Ton

lstSorted.AddItemd（i）

EndSub

问：

为了实现上述冒泡算法的实现，划线处应填入_____①_____。

____②_____。

2016年6月信息技术VB期末测试试卷答题卷

一、选择题（本大题22小题，每小题3分，共66分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

）

线

密

题次

答案

题次

答案

题次

封

答案

2、填空题（1-4题每空3分，6-7题每空4分）

（1）_____________

（2）_____________

（3）_____________

（4）__________________________

（5）_____________

（6）__________________________

（7）__________________________

2016年6月信息技术VB期末测试试卷答案

一、选择题（本大题22小题，每小题3分，共66分。

在每小题给出的四个选项中，只有一个是符合题目要求的。

）

线

密

题次

答案

题次

答案

题次

封

答案

3、填空题（1-4题每空3分，6-7题每空4分）

（3）_____17________

（4）_____5846________

（3）_______2______

（4）_y=50+（x-20）*2x>5或x>5andx<=20

（5）_______9______

（6）__abc.text_________101_____

（7）j=ntoi+1d（j）=d（j-1）___

展开阅读全文