2005年9月第22次全国计算机等级考试二级VB考试真题

　　A）ABCDEB）12345

　　C）abcdeD）出错信息

　　（27）以下关于函数过程的叙述中，正确的是

　　A）如果不指明函数过程参数的类型，则该参数没有数据类型

　　B）函数过程的返回值可以有多个

　　C）当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递

　　D）函数过程形参的类型与函数返回值的类型没有关系

　　（28）函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以下能正确实现上述功能的代码是

　　A）FunctionF1(bAsInteger)

　　IfbMod2=0Then

　　Return0

　　Else

　　Return1

　　EndIf

　　EndFunction

　　B）FunctionF1(bAsInteger)

　　IfbMod2=0Then

　　F1=0

　　Else

　　F1=1

　　EndIf

　　EndFunction

　　C）FunctionF1(bAsInteger)

　　IfbMod2=0Then

　　F1=1

　　Else

　　F1=0

　　EndIf

　　EndFunction

　　D）FunctionF1(bAsInteger)

　　IfbMod2<>0Then

　　Return0

　　Else

　　Return1

　　EndIf

　　EndFunction

　　（29）以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是

　　A）KeyAscii参数是所按键的ASCII码

　　B）KeyAscii参数的数据类型为字符串

　　C）KeyAscii参数可以省略

　　D）KeyAscii参数是所按键上标注的字符

　　（30）设窗体上有一个名为Text1的文本框，并编写如下程序：

　　PrivateSubForm_Load()

　　Show

　　Text1。Text=""

　　Text1。SetFocus

　　EndSub

　　PrivateSubForm_MouseUp(ButtonAsInteger，_

　　ShiftAsInteger，XAsSingle，YAsSingle)

　　Print"程序设计"

　　EndSub

　　PrivateSubText1_KeyDown(KeyCodeAsInteger，ShiftAsInteger)

　　Print"VisualBasic"；

　　EndSub

　　程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是

　　A）VisualBasicB）程序设计

　　C）VisualBasic程序设计D）a程序设计

　　（31）假定有下表所列的菜单结构：

　　━━━━━━━━━━━━━━━━━━━━

　　标题名称层次

　　────────────────────

　　显示appear1（主菜单）

　　大图标bigicon2（子菜单）

　　小图标smallicon2（子菜单）

　　━━━━━━━━━━━━━━━━━━━━

　　要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“？”。以下正确的事件过程是

　　A）PrivateSubbigicon_Click()

　　bigicon。Checked=False

　　EndSub

　　B）PrivateSubbigicon_Click()

　　Me。appear。bigicon。Checked=True

　　EndSub

　　C）PrivateSubbigicon_Click()

　　bigicon。Checked=True

　　EndSub

　　D）PrivateSubbigicon_Click()

　　appear。bigicon。Checked=True

　　EndSub

　　（32）假定通用对话框的名称为CommonDialog1，命令按钮的名称为Command1，则单击命令按钮后，能使打开的对话框的标题为“NewTitle”的事件过程是

　　A）PrivateSubCommand1_Click()

　　CommonDialog1。DialogTitle="NewTitle"

　　CommonDialog1。ShowPrinter

　　EndSub

　　B）PrivateSubCommand1_Click()

　　CommonDialog1。DialogTitle="NewTitle"

　　CommonDialog1。ShowFont

　　EndSub

　　C）PrivateSubCommand1_Click()

　　CommonDialog1。DialogTitle="NewTitle"

　　CommonDialog1。ShowOpen

　　EndSub

　　D）PrivateSubCommand1_Click()

　　CommonDialog1。DialogTitle="NewTitle"

　　CommonDialog1。ShowColor

　　EndSub

　　（33）如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是

　　A）任何时刻最多只有一个窗体是活动窗体

　　B）不能把标准模块设置为启动模块

　　C）用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体

　　D）如果工程中含有SubMain过程，则程序一定首先执行该过程

　　（34）假定在工程文件中有一个标准模块，其中定义了如下记录类型

　　TypeBooks

　　NameAsString*10

　　TelNumAsString*20

　　EndType

　　要求当执行事件过程Command1_Click时，在顺序文件Person。txt中写入一条记录。下列能够完成该操作的事件过程是