国家二级（VB）机试模拟试卷10.pdfVIP

家二级(VB)机试模拟试卷第1套

一、选择题(本题共40题，每题1.0分，共40分。)

1、为把圆周率的近似值3.14159放在变量pi中，应该把变量pi定义为()。

A^DimpiAsInteger

B、Dimpi(7)AsInteger

C、DimpiAsSingle

D^DimpiAsLong

标准答案：C

知识点解析：单精度Single或双精度Double型的变量能够保浮点型小数，整型

Integer和长整型Long的变量只能保整型数据。本题中圆周率为3.14159,小

数，可用定义一个Single或Double型变量来保。故选C。

、窗体上有1个名为Listl的列表框，其中已经输入了若干个项目(如图3所示);

还有个文本框，名称分别为TextKText,1个名称为Commandl的命令按钮,

并有以下程序。图3PrivateSubCommand1Click()Dim

strAsString,SAsString,kAsIntegers=Textl：str=Fork=Listl.ListCount.1

To0Step—1IfInStr(List1.List(k),s)0Thenstr=strList1.List(k)EndIf

o，

NextkIfstr=ThenText=没有匹配项目ElseText=strEndIfEndSub程序运行

时，在Textl中输入“京”，单击命令按钮，则在Text中显示的内容是()。

A、京

B、北京南京

C、南京北京

D、没有匹配的项目

标准答案：C

知识点解析：本题考查循环程序的分析以及列表框属性的应用。函数

InStr(IAstl.List(k),s)的作用是在Listl.IAst(k)中从头开始寻找s,找不到就返回

0,否则返回s在Listl.IAst(k)中的位置。整个循环的功能是，从列表框中最后一

个列表项开始寻找含有与Textl中字符串相同的子串，如果在相同的子串，把

Listl.List(k)全部连接至］str中,并显示在Text中。

3、已知AS=Welcome，下列语句操作能够正确执行的是()。

A、Label1.Height=AS

Labell.Caption=AS

C、Label1.Enabled—AS

D、Label1.Visible=AS

标准答案：B

知识点解析：本题考查标签的各种属性。标签的Height属性值为数值型，不能赋

字符串型值，而Enabled和Visible为布尔型，只有Caplion属性值为字符串型。

4、在窗体上有一个文本框Textl和一个标签Labell,要求运行程序时，在文本框

中输入的内容立即显示在标签中如（图1所示），则空白处应填入的内容是（）。

图1PrivateSubTextI）（Label1.Caption=Textl.TextEnd

Sub

A、GetFocus

B、Click

C、Change

D、LostFOCBS

标准答案：C

知识点解析：本题考查文本框的事件。文本框的GetFocus事件为文本框获得俵点

时触发一次，而单击文本框时触发一次Click事件，Change事件是每次文本框中的

文本发生改变时触发的事件，而LostFocus事件是文本框失去焦点时触发的事件。

5、软件设计中划分模块的一个准则是（）。

A、低内聚低耦合

B、高内聚低耦合