VB理论6Word格式文档下载.docx

VB理论6Word格式文档下载.docx

《VB理论6Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《VB理论6Word格式文档下载.docx（17页珍藏版）》请在冰豆网上搜索。

B）12345ABCDE

C）54321EDCBA

D）EDCBA54321

6）下列排序方法中，最坏情况下比较次数最少的是

A）直接插人排序

B）冒泡排序

C）简单选择排序

D）堆排序

7）软件设计中模块划分应遵循的准则是

A）高内聚低耦台

B）高内聚高耦台

C）低内聚高耦台

D）低内聚低耦台

A

8）将E-R转换为关系模式时，实体和联系都可以表示为

A）键

B）域

c）关系

D）属性

9）算法的空间复杂度是指

A）算法在执行过程中所需要的计算机存储空间

B）算法在执行过程中所需要的临时工作单元数

C）算法程序中的语句或指令条数

D）算法所处理的数据量

10）有三个关系R、S和T如下：

则由关系T由关系R和S通过某种操作得到，该操作为

A）交

B）并

C）投影

D）选择

B

11）产生100以内（不含100）2位随机整数的VisualBasic表达式是

A）Int（Rnd

（1）*91）+11

B）Int（Rnd

（1）*90）+10

C）Int（Rnd

（1）*90）+11

D）Int（Rnd

（1）*91）+10

VB程序设计

12）在VisualBasic中，不能关闭的窗口是

A）立即窗口

B）属性窗口

C）工程窗口

D）窗体设计器窗口

13）为了保存数据，需打开顺序文件"

E:

\UserData.txt"

，以下正确的命令是

A）Open"

ForInputAs#1

B）Open"

ForOutputAs#1

C）Open"

ForOutputAs#2

D）Open"

ForInputAs#2

14）下列运算符中，优先级别最低的是

A）Mod

B）And

C）+

D）Not

15）输入VisualBasic源程序时，若一个命令行中包含两个语句，则两个语句之间的分隔符应使用

A）分号（;

）

B）下划线（_）

C）连字符（-）

D）冒号（：

16）长整型常数的娄型说明符为

A）&

B）@

C）#

D）%

17）对于含有多个窗体的工程而言，以下叙述中正确的是

A）Load方法兼有装入和显示窗体两种功能

B）Hide方法可以将指定的窗体从自存中清除

C）没有指定启动窗体时，系统自动将最后一个添加的窗体设置为启动窗体

D）启动窗体可以通过“工程属性”对话框指定

18）在标准模块中，将a定义为全局整型变量的语句是

A）PrivateaAsInteger

B）PublicaAsInteger

C）StaticaAsInteger

D）DimaAsInteger

19）下列关于菜单项的描述中，错误的是

A）通过Enabled属性设置菜单项的有效性

B）菜单项的索引号必颂从1开始

c）菜单项的索引号可以不连续

D）通过自缩符号（……）设置菜单项的层次

20）下列说法中，错误的是

A）变量名只能由字母、数字和下划线组成

B）变量名长度不能超过255个字符

C）变量名的第一个字符可以是字母或数字

D）变量名不能使用保留宇

21）窗体上有1个名称为Label1的标签，1个名称为List1，且含有若干表项的列表框。

为了使得单击List1中某个表项时，在Label1中相应地显示该表项，应使用的程序代码为

A）PrivateSubList1_Click（）

Label1.Caption=List1.Index

EndSub

B）PrivateSubList1_Click（）

Label1.Caption=List1.Selected

C）PrivateSubList1_Click（）

Label1.Caption=List1.Text

D）PrivateSubList1_Click（）

Label1.Caption=List1.ListCount

22）如果将命令按钮的访问键设置为“D”，以下不会触发命令按钮C1ick事件的操作是

A）按组合键“Ait+D”

B）将焦点移至命令按钮上，并按Enter键

C）在命令按钮上单击鼠标右键

D）在命令按钮上单击鼠标左键

23）以下可以作为“容器”的控件是

A）框架

B）命令按钮

C）标签

D）图像框

24）下列描述中，错误的是

A）图片框控件和图像框控件都支持Print方法

B）运行期间，可以用LoadPicture函数删除图片框中的图形

C）设计阶转，可以通过Picture属性把图形文件装人图片框

D）运行期间，可以用LoadPicture_函数把图形文件装人图片框

25）下列关于滚动条的叙述中，错误的是

A）单击滚动条两端的箭头时，会触发Change事件

B）在滚动条内拖动滚动框时，会触发Scro11事件

C）在滚动条内拖动滚动框后，会触发Change事件

D）在滚动条内单击滚动框前面或后面的部位时，会触发Scro11事件

26）对于某些控件，只要将其Style属性设置为1，则可以在该控件上使用Picture属性显示图片。

以下不具备这一使用规则的控件是

C）复选按钮

D）单选按钮

27）下列不属于计时器控件属性的是

A）Name

B）Enabled

C）Timer

D）Interval

28）以下关于控件的叙述中，正确的是

A）列表框包含了组合框的全部功能

B）列表框兼有组合框和文本框的功能

C）组合框兼有列表框和文本框的功能

D）列表框和组合框具有完全不同的功能

29）判断单选按钮是否被选中的属性为

A）Value

B）Checked

C）Selected

D）Index

30）下列关于标签的描述中，错误的是

A）标签不能响应Dblclick事件

B）标签上显示的文本就是Caption属性的值

c）为了使标签的Wordwrap属性起作用，必须将AutoSize属性设置为True

D）标签可以响应C1ick事件

31）在窗体上画1个命令按钮和1个文本框，其名称分别为Commandl和Textl，再编写如下程序：

DimssAsString

PrivateSubText1_KeyPress（KeyAsciiAsInteger）

IfChr（KeyAscii）<

>

"

"

Thenss=ss+Chr（KeyAscii）

EndSub

PrivateSubCommand1_Click（）

DimmAsString,iAsInteger

Fori=Len（ss）To1Step-1

m=m+Mid（ss,i,1）

Next

Text1.Text=UCase（m）

程序运行后，在文本框中输人”Number100”，并单击命令按钮，则文本框中显示的是

A）REBMUN100

B）Number100

C）001REBMUN

D）REBMUN

32）已知在4行3列的全局数组score（4，3）中存放了4个学生3门课程的考试成绩（均为整数）。

现需要计算每个学生的总分，某人编写程序如下：

OptionBase1

DimsumAsInteger

sum=0

Fori=1To4

Forj=1To3

sum=sum+score（i,j）

Nextj

Print"

第"

&

i&

个学生的总分是：

sum

Nexti

运行此程序时发现，陈第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。

以下修改方案中正确的是

A）把sum=0移到Fori=1To4和Forj=1To3之间

B）把sum=sum+score（i,j）改为sum=sum+score（j,i）

c）把sum=sum+score（i,j）改为sum=sum+score（j,i）

D）把外层循环语句Fori=1To4改为Fori=1To3

内层循环语句Forj=1To3改为Forj=1To4

33）在窗体上画两个文本框（名称分别为Textl和Text2）和一个命令按钮（名称为Commandl），然后编写如下事件过程：

x=0

DoWhilex<

50

x=（x+2）*（x+3）

n=n+1

Loop

Text1.Text=Str（n）

Text2.Text=Str（x）

程序运行后，单击命令按钮，在两个文本框中显示的值分别为

A）4和168

B）1和0

C）3和50

D）2和72

34）假定有以下程序段

Fori=1To3

Forj=5To1Step-1

Printi*j

则语句Printi*j的执行次数是

A）15

B）18

C）17

D）16

35）设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：

Functionfun（aAsInteger,bAsInteger）

Whilea>

b

a=a-b

Wend

fun=a

EndFunction

在调试时发现函数是错误的。

为使函数能产生正确的返回值，应做的修改是

A）把Whilea>

b改为Whilea<

B）把a=a-b改为a=a\b

C）把Whilea>

b改为Whilea>

=b

D）把a=a-b改为a=b-a

36）在窗体上画一个命令按钮和一个标签，其名称分别为C…andl和…il，然后编写如下事件过程：

Counter=0

Forj=6To1Step-2

Counter=Counter+1

Label1.Caption=Str（Counter）

程序运行后，单击命令按钮，标签中显示的内容是

A）16

B）20

C）12

D）11

37）窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。

窗体文件的程序如下：

PrivateTypex

aAsInteger

bAsInteger

EndType

DimyAsx

y.a=InputBox（"

Ify.a\2=y.a/2Then

y.b=y.a*y.a

Else

y.b=Fix（y.a/2）

EndIf

text1.Text=y.b

对以上程序，下列叙述中错误的是

A）Fix（y.a/2）把y.a／2的小数部分四舍五入，转换为整数返回

B）InputBox函数弹出的对话框中没有提示信息

C）若输人的是偶数，y.b的值为该偶数的平方

D）x是用户自定义的类型

38）在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序

PublicSubfunc（LAsLabel）

L.Caption="

1234"

PrivateSubForm_Load（）

Label1.Caption="

ABCDE"

Label2.Caption=10

a=Val（Label2.Caption）

Callfunc（Label1）

Label2.Caption=a

程序运行后，单击命令按钮，则在两个标签中显示的内容分别为

A）ABCD和10

B）1234和10

C）ABCD和100

D）1234和100

39）在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：

DimA1（4）AsInteger,A2（4）AsInteger

Fork=0To2

A1（k+1）=InputBox（"

请输入一个整数"

A2（3-k）=A1（k+1）

Nextk

PrintA2（k）

程序运行后，单击命令按钮，在输人对话框中依次输人2、4、6，则输出结果为

A）0

B）1

C）2

D）3

40）窗体上有一个名为Command1的命令按钮，并有下面的程序：

Dimarr（5）AsInteger

Fork=1To5

arr（k）=k

progarr（）

Printarr（k）;

Subprog（a（）AsInteger）

n=UBound（a）

Fori=nTo2Step-1

Forj=1Ton-1

Ifa（j）<

a（j+1）Then

t=a（j）

a（j）=a（j+1）

a（j+1）=t

程序运行时，单击命令按钮后显示的是

A）01234

B）43210

C）12345

D）54321