高中信息技术VB程序的创建浏览题阅览题会考复习题.docx

高中信息技术VB程序的创建浏览题阅览题会考复习题.docx

《高中信息技术VB程序的创建浏览题阅览题会考复习题.docx》由会员分享，可在线阅读，更多相关《高中信息技术VB程序的创建浏览题阅览题会考复习题.docx（17页珍藏版）》请在冰豆网上搜索。

高中信息技术VB程序的创建浏览题阅览题会考复习题

高中信息技术VB程序的创建会考复习题

学校:

___________姓名：

___________班级：

___________考号：

___________

一、选择题

1．能正确表达“a≤1或a≥5”的VB逻辑表达式是_______。

A、a<=1或a>=5B、a<=1,a>=5C、a<=1ora>=5D、a<=1anda>=5

【答案】C

【解析】

2．在VisualBasic的代码窗口中，语句List1.Clear中的Clear是（　　）

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

【答案】D

【解析】

3．以下属于操作系统的是（）

WindowsB．JAVAC．C++D．VisualBasic

【答案】A

【解析】

4．VB中窗体文件的扩展名为（）

A．.vbpB．.frmC．.basD．.ds

【答案】B

【解析】

5．在VB中，下列正确的变量名是（）

A、forB、aa_1C、2aD、a*b

【答案】B

【解析】

6．如果想在程序中反复使用一个数值3.14，为了避免在编写程序时反复输入这个数据，也为了一次能够修改程序中所有用到的这个数据的语句，可以采用（）。

A、将这个数据声明为字符串型常量，用一个常量标识符代表它

B、将这个数据声明为字符串型变量，用一个变量标识符代表它

C、将这个数据声明为单精度型常量，用一个常量标识符代表它

D、将这个数据声明为单精度型变量，用一个变量标识符代表它

【答案】C

【解析】

7．在VisualBasic代码中，将多个语句合并在一行上的并行符是（）

A．撇号（'）B．冒号（:

）C．感叹号（!

）D．问号（?

）

【答案】B

【解析】

8．下列表达式值最大的是（）

A．10Mod5B．5Mod10C．10/5D．5/10

【答案】B

【解析】

9．ualBasic中窗体文件的扩展名为（）

A．exeB．frmC．vbpD．vbw

【答案】B

【解析】

10．在VisualBasic中，下列能产生一个[1，100]之间随机正整数的表达式是（）

A．Rnd*100B．1+Rnd*99

C．Int（Rnd*100）D．1+Int（Rnd*100）

【答案】D

【解析】

11．VB中窗体文件的扩展名是（）

A．VBPB．FRMC．VBWD．PDM

【答案】B

【解析】

12．下列多媒体创作工具中，属于以程序设计语言为基础的是（）

A．AuthorwareIconAuthorB．DirectorFlash

C．PowerPointActionD．VisualC++VisualBasic

【答案】D

【解析】

13．如下图所示，在VisualBasic工程设计中，要在命令按钮command1中显示“确定”，则下列操作正确的是（）

A．在Text属性值中输入“确定”

B．在Caption属性值中输入“确定”

C．在Font属性值中输入“确定”

D．在Name属性值中输入“确定”

【答案】B

【解析】

14．在VisualBasic中，语句command1.caption="高一"中的caption是（）

A．属性名B．属性值C．对象名D．窗体名

【答案】A

【解析】

15．在VisualBasic中，执行语句x=Asc（Chr（Abs（-70））），则变量x的数据类型是（）

A．实数型B．字符型C．整数型D．逻辑型

【答案】C

【解析】

16．在日常生活中，我们常常会碰到各种各样的问题，以下描述中最适合我们用计算机编程方法来处理的是（）。

A．去新华书店买书

B．计算某个同学期中考试各科成绩总分

C．计算10000以内的奇数平方和

D．在因特网上查找自己喜欢的歌曲

【答案】C

【解析】

17．关于计算机的指令、程序和软件，以下表述错误的是（）

A．为解决某问题组织起来的有序的指令集合称为程序

B．计算机软件包括程序和与该程序相关的文档资料

C．给计算机发出一条指令就是运行一个程序

D．计算机指令由操作码和操作数两部分组成

【答案】C

【解析】

18．VisualBasic6.0中编程时，当双击窗体上的某个控件时，所打开的窗口是（）

A．工程资源管理器窗口

B．代码窗口

C．工具箱窗口

D．属性窗口

【答案】B

【解析】

19．以下哪个是函数_____。

A．ENDB．SQRC．ANDD．MOD

【答案】B

【解析】

20．赋值语句y=x的功能是________。

A.x的值赋给y，x的值变为0

B.y的值赋给x，y的值变为0

C.y的值赋给x，y保留原来的值

D.x的值赋给y，x保留原来的值

【答案】D

【解析】

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

A5aBa5CifDdim

【答案】B

【解析】

22．在VB中，要定义一个存储整型数值的变量，其适合的数据类型是（）。

A．BooleanB．StringC．DateD．Integer

【答案】D

【解析】

23．在VB集成环境下编制了含一个窗体的VB应用程序并保存在磁盘上，运行测试后编译成可执行程序，整个过程中肯定会产生的文件类型是（）

A．．vbp、．frm、．exe

B．．vbp、．exe、．txt

C．．txt、．exe、．frm

D．．frm、．txt、．vbp

【答案】A

【解析】

24．若a=2,b=8,c=1，表达式amod10\3>=b+corb>aandnota

4B．3C．falseD．true

【答案】D

【解析】

25．在VisualBasic中，下列属于正确变量名的是（）

A．a1B．3yC．x-yD．then

【答案】A

【解析】

26．VB中工程文件的扩展名为（）

A．.vbpB．.frmC．.basD．.ds

【答案】A

【解析】

27．在VisualBasic中，下列属于字符串的是（）。

A．Val（"100"）B．"int（100）"C．sqr（100）D．1/2^3

【答案】B

【解析】

28．在VB中，下列选项属于字符串型数据的是

A．2356B．"BX277"C．BX277D．2014-5-28

【答案】B

【解析】

二、填空题

29．

（1）所谓算法是。

（2）VB界面设计一般包括、、。

（3）描述算法的方法有3种，分别是、、。

（4）VB是一种程序设计语言。

（5）abs（－3.8）＝sqr（49）＝int（－7.8）＝

（6）int（10*Rnd）表示

【答案】

（1）解决问题的方法和步骤；

（2）设计程序界面编写程序代码调试、运行程序（3）自然语言主伪代码流程图（4）可视化（面向对象或高级语言都算对）（5）3.8；7；－8；（6）0－9这十个整数

【解析】

30．将数学表达式

写成VB表达式，正确的是____________。

【答案】（2-sqr（x））/x^2

【解析】

31．VisualBasic表达式x^2+k/（1+a*x-b））对应的数学式子为______。

【答案】

【解析】

32．声明一个长度为10个字符的字符串变量mstr，应使用_____________语句。

【答案】Dimmstrasstring=10

【解析】

33．某学校开设多样化选修课程，学生可以根据个人兴趣和特长选择选修课。

假设每门选修课的选课人数不超过40，学生选课的相关信息存放在数据库文件“student.accdb”的data表中，选课查询程序运行时界面如图所示。

程序功能：

在文本框Text1中输入课程号，单击“查询”按钮Command1,在列表框List1中显示选修本课程的名学生信息。

如果没有找到，在列表框中显示“该课程当前无人报名”。

按此要求将程序补充完整。

PrivateSubcommand1_click（）

Dimxh（1to40）,xm（1to40）AsString'学号和姓名的数组

Dimi,numasinteger

DimconnAsNewADODB．Connection,rsAsNewADODB．Recordset

DimstrSQLAsString

conn.ConnectionString="Provider=Microsoft.ACE.OLEDB．12.0;DataSource="+App.Path+"\student.accdb"'打开到数据库的链接

conn.Open

strSQL="selectxh,xmfromdatawhere'课程=&（Text1.Text）&'"'设置查询的SQL语句

Setrs.ActiveConnection=conn'设置rs的ActiveConnection属性，指定与其关联的数据库链接

rs.OpenstrSQL'打开记录集，将从表student中读取的结果集保存到记录集rs中

List1.Clear

num=0

Dowhilenotrs.EOF

①

xh（num）=rs.Fields（"xh"）

xm（num）=rs.Fields（"xm"）

rs.MoveNext

loop

rs.Close

conn.close

setrs=nothing

setconn=nothing

Fori=1tonum

②

Nexti

ifnum=0thenlist1.additem（"该课程当前无人报名"）

EndSub

（1）程序中①划线处应填入___________________。

（2）程序中②划线处应填入___________________。

【答案】

（1）num=num+1

（2）List1.additemxh（i）+""+xm（i）

【解析】本题主要考核考生应用VB访问数据库的相关知识，考核学生是否理解通过ADO对象连接数据库，通过Recordset对象获取表中的数据。

34．【加试题】小王模拟超市收银机扫描商品条形码后计算总价的过程制作了一个VB程序。

功能如下：

在文本框Text1中输入商品条形码，按回车键后会将已经输入的条形码显示在列表框List1中，同时将商品明细显示在列表框List2中。

点击按钮“计算商品总价”后，会将所有商品的总价显示在文本框Text2中。

程序界面如图所示：

实现上述功能的部分VB程序如下，请在三个划线处填入合适代码。

'定义全局数组变量

Dima（1To10）AsLong

Dimb（1To10）AsString

'自动加载条形码信息以及对应的商品信息

PrivateSubForm_Load（）

DimiAsInteger

a

（1）=503741

Fori=2To10

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

Nexti

b

（1）="可乐5.00"

b

（2）="薯片7.50"

b（3）="牛奶5.60"

b（4）="橙汁7.50"

b（5）="面包4.00"

b（6）="蜂蜜28.00"

b（7）="蛋糕12.00"

b（8）="绿箭3.50"

b（9）="饼干6.00"

b（10）="雪碧5.00"

EndSub

'输入条形码，查找条形码，并显示条形码及其对应的商品信息

PrivateSubText1_KeyPress（KeyAsciiAsInteger）

DimtxmAsLong:

DimiAsInteger:

DimjAsInteger

txm=Val（Text1.Text）

IfKeyAscii=13Then

Iftxm>=503741Andtxm<=503750Then

List1.AddItemtxm

Text1.Text=""

i=1:

j=10

DoWhilei<=j

①

Iftxm=a（m）Then

List2.AddItemb（m）

ExitDo

ElseIftxm>a（m）Then

i=m+1

Else

②

EndIf

Loop

Else

MsgBox"条形码输入错误，无此商品"

Text1.Text=""

EndIf

EndIf

EndSub

'计算所购商品的总额

PrivateSubCommand1_Click（）

DimiAsInteger,mxAsString,jgAsString,sumAsSingle

Fori=0To9

IfList2.List（i）<>""Then

mx=List2.List（i）

sum=sum+Mid（mx,4）

EndIf

Nexti

Text2.Text=③

EndSub

【答案】

（1）m=（i+j）\2

（2）j=m-1（3）Str（sum）

【解析】

（1）首先判断这是一个属于对分查找的程序，m是中间数，所以m=（i+j）\2。

（2）查找的顺序要么是m+1，要么是m-1，所以这里的j=m-1.（3）sum的变量用于存储不断增加的总额的值，最终要加上str（）函数。

35．小丁想买几张6+1彩票，选号时，他希望前4位用自己的生日：

11月8日，即1108，特别号码他选了买彩票日子的个位数5，并且他希望前六个数字组成的数能被他的幸运数字9整除。

他的好朋友小杰帮他设计了一个VB程序，可以提供一份符合这些要求的号码清单供他挑选。

相应的界面如图-1所示。

阅读程序并完成后面的问题。

（1）设计应用程序界面时，为添加a所指向的对象，应使用-2图所示的“控件工具箱”中的______（填写相应编号）；在-3图所示的“属性窗口”中，将______属性值设置为“开始”，可使图-2中b所指向的对象显示“开始”。

（2）请根据题意将下列程序补充完整。

PrivateSubCommand1_Click（）

Dimi,j,cAsInteger

DimnAsLong

c=0

Fori=0To99

n=110800+i

If①Then

List1.AddItemStr（n）+""+"5"

c=c+1

EndIf

Nexti

Label2.Caption="满足条件的数有：

"+Str（c）+"组"

EndSub

【答案】

（1）4caption

（2）nMod9=0

【解析】本题主要考核考生VB界面的设计和枚举算法的应用。

三、操作题

36．求两个整数的最大公约数分析：

求最大公约数的算法思想：

（1）对于已知两数m，n，使得m>n；

（2）m除以n得余数r；

（3）若r=0，则n为求得的最大公约数，算法结束；否则执行（4）；

（4）m←n，n←r，再重复执行

（2）。

例如:

求m=14,n=6的最大公约数.

Mnr

1462

620

请根据以上思路补充下面的程序代码：

PrivateSubCommand1_Click（）

m=InputBox（"m="）

n=InputBox（"n="）

Ifm

m=n:

n=t

r=________________

DoWhile（r<>0）

m=n

n=r

r=mModn

Loop

Print"最大公约数=",n

EndSub

【答案】mmodn

【解析】

四、判断题

37．在VB窗口中建立命令按钮对象，改变命令按钮对象名称后，该命令按钮对象上显示改变的名称；（）

【答案】错误

【解析】

38．VB开发的应用程序的两个特征是“对象”和“事件驱动；（）

【答案】错误

【解析】

39．VisualBasic（简称VB）是一种通用的基于对象的程序设计语言；（）

【答案】正确

【解析】

40．运行列表框对象语句：

List1.AddItem="同学们好！

"，会显示：

同学们好！

（）

【答案】错误

【解析】

41．在VB窗口中建立命令按钮对象，双击该对象，建立的程序名称中的对象名和命令按钮对象名称相同；（）

【答案】正确

【解析】

五、简答题

42．求5+10+15+20+……>2015的最少累加项数。

【答案】①S=S+5*I；

②输出i-1；

【解析】