1、VB 笔试-试卷 46 及答案解析(总分：104.00，做题时间：90 分钟)一、选择题(总题数：36，分数：72.00)1.选择题（）下列各题 A、B、C、D 四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。（分数：2.00）_2.下列特征中不是面向对象方法的主要特征的是( )。（分数：2.00）A.多态性B.标识惟一性C.封装性D.耦合性3.语句 Print Sgn(-5.12)+Abs(Int(-5.12)的输出结果是( )。（分数：2.00）A.52.2B.25.01C.26D.284.以下命令中能够正确地画出矩形的是（ ）。（分数：2.00）A.line-(25
2、00,2500)B.line-(500,500)C.line-(500,500)-(2500,2500)D.line(500,500)-(2500,2500)5.索引属于_。（分数：2.00）A.模式B.内模式C.外模式D.概念模式6.Double 双精度数占 _ 个字节（分数：2.00）A.2B.4C.8D.107.已知二叉树的前序序列为 ABDCEFG，中序序列为 DBCAFEG，则后序序列为_。（分数：2.00）A.DCBAFGEB.DCBFGEAC.DCBFEGAD.DCBGFEA8.关系数据库管理系统能实现的专门关系运算包括 _。（分数：2.00）A.排序、索引、统计B.选择、投影、
3、连接C.关联、更新、排序D.显示、打印、制表9.下列叙述中，不属于软件需求规格说明书作用的是（分数：2.00）A.便于用户、开发人员进行理解和交流B.反映出用户问题的结构，可以作为软件开发工作的基础和依据C.作为确认测试和验收的依据D.便于开发人员进行需求分析10.在数据结构中，与所使用的计算机无关的是数据的( )结构。（分数：2.00）A.存储B.物理C.逻辑D.物理和存储11.下面概念中，不属于面向对象方法的是 _。（分数：2.00）A.对象、消息B.继承、多态C.类、封装D.过程调用12.在窗体上有一个文本框控件，名称为 TextTime；一个计时器控件，名称为 Timer1。要求每一秒
4、在文本框中显示一次当前的时间。程序为：Private Sub Timer1_ _( )TextTime.text=TimeEnd Sub 在下画线上应填入的内容是（分数：2.00）A.EnabledB.VisibleC.IntervalD.Timer13.表示滚动条控件取值范围最大值的属性是( )。（分数：2.00）A.MaxB.LargeChangeC.ValueD.Max-Min14.在用 Open 语句打开文件时，如果省略“For 方式”，则打开的文件的存取方式是( )。（分数：2.00）A.顺序输入方式B.顺序输出方式C.随机存取方式D.二进制方式15.叙述中错误的是（ ）。（分数：2
5、.00）A.一个工程中只能有一个 Sub Main 过程B.窗体的 Show 方法的作用是将指定的窗体装入内存并显示该窗体C.窗体的 Hide 方法和 Unload 方法的作用完全相同D.若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体16.设有如下通用过程： Public Sub Fun(a()As Integer,x As Integer) For i=1 To 4 x=x*a(i) Next End Sub 在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Di
6、m arr(5)As Integer,n As Integer n=1 For i=1 To 4 art(i)=i+i Next Fun alT,n Text1Text=Str(n) End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是( )。（分数：2.00）A.30B.25C.20D.1517.下面循环语句巾在任何情况下都至少执行一次循环体的是（ ）。（分数：2.00）A.Do While 循环体 LoopB.While 循环体 WendC.Do 循环体 LoopD.Do Until 循环体 UntilLoop18.在窗体上画一个名称为 Command1 的命令按钮，然后编写
7、如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do Until num6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是_。（分数：2.00）A.13.45.8B.1 3 5C.1 4 7D.无数据输出19.假定程序中有以下语句： answer=MsgBox(“String1“,“String2“,“String3“,2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则 answer 的值为_。（分数：2.00）A.String1B
8、.String2C.String3D.120.表达式 Right(“Beijing“,4)的值是( )。（分数：2.00）A.BeijB.jingC.eijiD.ijin21.在窗体上画一个命令按钮，名称为 Command1，然后编写如下事件过程； Private Sub Command1_Click() a $=“software and hardware“ b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是_。（分数：2.00）A.software and
9、hardwareB.softwareC.hardwareD.122.在窗体上画一个名称为 Timer1 的计时器控件，要求每隔 0.5 秒发生一次计时器事件，则以下正确的属性设置语句是_。（分数：2.00）A.Timer1. Interval=0.5B.Timer1. Interval=5C.Timer1. Interval=50D.Timer1. Interval=50023.使用 Public Const 语句声明一个全局的符号常量时，该语句应放在_。（分数：2.00）A.过程中B.窗体模块的通用声明段C.标准模块的通用声明段D.窗体模块或标准模块的通用声明段24.为了使图片框的大小可以自
10、动适应图片的尺寸，则应_。（分数：2.00）A.将其 Autosize 属性值设置为 TrueB.将其 Autosize 属性值设置为 FalseC.将其 Strech 属性值设置为 TrueD.将其 Stretch 属性值设置为 False25.ScrollBars 属性用来设置文本框是否含有滚动条，要设置该属性，_属性的值必须设置为True。（分数：2.00）A.LockedB.HideselectionC.MultilineD.Enabled26.在 Visual Basic 中，要使一个窗体从内存中释放，应该使用的语句是 _。（分数：2.00）A.ShowB.HideC.LoadD.U
11、nload27.在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char) Text1.Text=String(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 _。（分数：2.00）A.aB.AC.aaaaaaaD.AAAAAAA28.设 a=6，则执行 x=IIF(a5，-1，0) 后，x 的值为（分数：2.00）A.5B.6C.0
12、D.-129.窗体上有 Text1、Text2 两个文本框及一个命令按钮 Command1，编写下列程序 Dim y As Integer Private Sub Command1_Click() Dim x As Integer X=2 Text1.Text=Fun2(Fun1(x)，y) Text2.Text=Fun1(x) End Sub Private Function Fun1(x As Integer)As Integer x=x+y:y=x+y Fun1=x+y End Function Private Function Fun2(x As Integer，y As Intege
13、r)As Integer Fun2=2*x+y End Function 当单击 1 次和单击 2 次命令按钮后，文本框 Textl 和 Text2 内的值分别是（分数：2.00）A.2 4 2 4B.2 4 4 8C.10 10 58 58D.4 4 8 830.为了使一个窗体从屏幕消失但仍在内存中，所使用的方法或语句为 _。（分数：2.00）A.ShowB.HideC.LoadD.Unload31.文本框控件最多能处理 _个字节。（分数：2.00）A.32KB.64KC.128KD.16K32.在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub
14、Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text=“ “ End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的第四行，则在窗体上输出的结果为（分数：2.00）A.40123B.163C.123D.3012333.用来没置文本框有无滚动条的属性是（分数：2.00）A.ScrollBarsB.MultiLineC.SelTextD.SelLength34.在窗体上画一个名称
15、为 Drive1 的驱动器列表框，一个名称为 Dir1 的目录列表框，一个名称为 File1的文件列表框，两个名称分虽为 Lahel1、Label2，标题分别为空白和 “共有文件“的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签 Label1 中显示当前文件夹中文件的数量。如图所示。 （分数：2.00）A.Private Sub Dir1_Change( ) FiletPath=Dir1Path End Sub Private Sub Dive1_Change( ) Dir1Path=Drive1Drive Label1，Caption=File1 L
16、istCount End SubB.Private Sub Dir1_Change( ) FilePath=Dtr1Path End Sub privage Sub Dive1_Change( ) Dir1path=Drive1Drive Lahel1Caption=File1List End SubC.Private Sub Dir1_Change( ) File1. Path = DirlPath Label1CaptionFile1, ListCount End Sub Private Sub Drive1_Change( ) Dir1Path = Drive1. Drive Label
17、1Captiol1 = File1ListCount End Sub(D.Private Sub Dir1_Change( ) Filel. Path = DirlPath Label1Caption = File1ListCount End Sub Private Sub Dive1_Change( ) Dir1Path = Drive1Drive Label1Caption = File1List End Sub35.下列说法正确的是（分数：2.00）A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器C.只有当某个窗体为
18、当前活动窗体时，才能打开菜单编辑器D.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器36.在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下程序： Private Sub Form_Load() Show Text1.Text=“ Text2.Text=“ Text1.SetFocus End Sub Private Sub Text1_Change() Text2.Text=Mid(Text1.Text，8) End Sub 程序运行后，如果在文本框 Text1 中输入BeijingChina，则在文本框 Text2 显示的内容是 _。（分数：
19、2.00）A.BeijingChinaB.ChimaC.BeijingD.BeijingC二、填空题(总题数：16，分数：32.00)37.填空题（每空）请将每一个空的正确答案写在答题卡上。注意：以命令关键字填空的必须拼写完整。（分数：2.00）_38.在面向对象方法中， 1 描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_39.软件工程研究的内容主要包括 1 技术和软件工程管理。（分数：2.00）填空项 1:_40.表达式 2*42-2*6/3+3/2 的值是 1。（分数：2.00）填空项 1:_41.顺序存储方法是把逻辑上相邻的结点存储在物理位置 1 的存储单元中。（
20、分数：2.00）填空项 1:_42.将 C 盘根目录下的图形文件 moon.jpg 装入图片框 Picture1 的语句是 1。（分数：2.00）填空项 1:_43.为了能自动放大或缩小图像框中的图形与图像框的大小相适应，必须把该图片框的 Stretch 属性设置为 1。（分数：2.00）填空项 1:_44.下面程序运行后,单击命令按钮,输出的结果是 1Private Sub Command1_Click()Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2# For i=1 To 4 a(i) =i Next For i=2 To 6 b(i) =i
21、Next str1=YAG(a) str2=YAG(b) Print “str1=“; str1; “str2=“; str2 End Sub Function YAG(a() As Integer) Dim t#, i% t=1 For i=LBound(a) To UBound(a) t=t * a(i) Next YAG=t End Function（分数：2.00）填空项 1:_45.文件的打开和关闭语句分别是： 1 和 2。（分数：2.00）填空项 1:_填空项 1:_46.滚动条的最小值属性是 1，最大值属性是 Max。（分数：2.00）填空项 1:_47.下列是一个体操评分程序。
22、设满分为 10 分，20 位评委，除去一个最高分和一个最低分，计算平均分。Private Sub Command1_Click()Max=0Min=10For i=1 To 20n=Val(InputBox(“请输入分数“)If nMax Then Max=nIf nMin Then Min=ns=s+n 1s=s-Min-Maxp=s/18Print “最高分“; Max; “最低分“; MinPrint “最后得分: “; pEnd Sub（分数：2.00）填空项 1:_48.在窗体上画一个名称为 Combol 的组合框，画两个名称分别为 Label1 和 Label2 及 Caption
23、，属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII 码为 13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在 Label2 中给出提示“已成功添加输入项”，如图 16-3 所示；如果存在，则在 Label2 中给出提示“输入项已在组合框中”。请在 1、 2 和 3 处将程序补充完整。Private Sub Comhel 4(KeyAscii As Integer)If KeyAseii=13 ThenFor i=0 To Combol. ListCount-1If Combol. Text= 5ThenLabelCapt
24、ion=“输入项已在组合框中“Exit SubEnd IfNext iLabelCaption=“已成功添加输入项“Combol. 6Combol. TextEnd IfEnd Sub （分数：2.00）填空项 1:_填空项 1:_填空项 1:_填空项 1:_49.假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的 15 个属性。请在划线处将程序补充完整。 Private Sub Form_Click() Static x As Integer Cis Print“Mousepointer Property is now:;X Form
25、l 1=x X=K+1 If x=15 Then x=0 End Sub（分数：2.00）填空项 1:_50.下列程序实现的功能是：当在窗体上单击时，将输出 a1txt 文件中的数字字符的个数。Private Sub form_ Click()Dim Ch As String * 1Dim n As IntegerOpen “c:/a1. txt“ for Input As #10do while 1Ch = Input(1, #10)if 2 thenn=n+1End ifLoop 3Close #10End Sub（分数：2.00）填空项 1:_51.如果不指明函数过程参数的类型，则该参数
26、的数据类型为 1。（分数：2.00）填空项 1:_52.表达式 Fix(-465)+Int(-515)的值是 1。（分数：2.00）填空项 1:_VB 笔试-试卷 46 答案解析(总分：104.00，做题时间：90 分钟)一、选择题(总题数：36，分数：72.00)1.选择题（）下列各题 A、B、C、D 四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。（分数：2.00）_解析：2.下列特征中不是面向对象方法的主要特征的是( )。（分数：2.00）A.多态性B.标识惟一性C.封装性D.耦合性 解析：解析：面向对象设计方法与面向过程设计方法有本质的不同，其基本原理是：使用现实
27、世界的概念抽象地思考问题从而自然地解决问题。其特点包括：标识惟一性、多态性、封装性、模块独立性、继承和多态性好。3.语句 Print Sgn(-5.12)+Abs(Int(-5.12)的输出结果是( )。（分数：2.00）A.52.2B.25.01C.26 D.28解析：4.以下命令中能够正确地画出矩形的是（ ）。（分数：2.00）A.line-(2500,2500)B.line-(500,500)C.line-(500,500)-(2500,2500)D.line(500,500)-(2500,2500) 解析：5.索引属于_。（分数：2.00）A.模式B.内模式 C.外模式D.概念模式解析
28、：6.Double 双精度数占 _ 个字节（分数：2.00）A.2B.4C.8 D.10解析：解析：在 Visual Basic 中不同的数据类型占用不同的字节数。如 Integer 型数据占用两个字节，Single 型数据占用 4 个字节，Double 型数据占用 8 个字节。7.已知二叉树的前序序列为 ABDCEFG，中序序列为 DBCAFEG，则后序序列为_。（分数：2.00）A.DCBAFGEB.DCBFGEA C.DCBFEGAD.DCBGFEA解析：8.关系数据库管理系统能实现的专门关系运算包括 _。（分数：2.00）A.排序、索引、统计B.选择、投影、连接 C.关联、更新、排序D
29、.显示、打印、制表解析：解析：关系数据库管理系统能实现的专门关系运算，包括选择运算、投影运算、连接运算。9.下列叙述中，不属于软件需求规格说明书作用的是（分数：2.00）A.便于用户、开发人员进行理解和交流B.反映出用户问题的结构，可以作为软件开发工作的基础和依据C.作为确认测试和验收的依据D.便于开发人员进行需求分析 解析：解析：软件需求规格说明书是需求分析阶段的最后成果，是软件开发中的重要文档之一。它有以下几个方面的作用：便于用户、开发人员进行理解和交流：反映出用户问题的结构，可以作为软件开发工作的基础和依据；作为确认测试和验收的依据。10.在数据结构中，与所使用的计算机无关的是数据的(
30、)结构。（分数：2.00）A.存储B.物理C.逻辑 D.物理和存储解析：解析：数据结构是指数据以及它们之间的相互联系。其中数据的逻辑结构是指数据元素之间的逻辑关系，它与所使用的计算机无关；数据的物理结构又称存储结构，是指数据结构在计算机中的表示，它包括数据元素的表示和元素的表示，其中数据元素之间的关系在计算机中有顺序存储结构和链式存储结构两种。因此选项 C 是正确答案。11.下面概念中，不属于面向对象方法的是 _。（分数：2.00）A.对象、消息B.继承、多态C.类、封装D.过程调用 解析：解析：面向对象方法是一种运用对象、类、封装、继承、多态和消息等概念宋构造、测试、重构软件的方法。面向对象
31、方法从对象出发，发展出对象，类，消息，继承等概念。12.在窗体上有一个文本框控件，名称为 TextTime；一个计时器控件，名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：Private Sub Timer1_ _( )TextTime.text=TimeEnd Sub 在下画线上应填入的内容是（分数：2.00）A.EnabledB.VisibleC.IntervalD.Timer 解析：解析：计时器的唯一事件 Timer 事件是在指定时间段执行一次的程序。13.表示滚动条控件取值范围最大值的属性是( )。（分数：2.00）A.Max B.LargeChangeC.Val
32、ueD.Max-Min解析：14.在用 Open 语句打开文件时，如果省略“For 方式”，则打开的文件的存取方式是( )。（分数：2.00）A.顺序输入方式B.顺序输出方式C.随机存取方式 D.二进制方式解析：解析：打开文件的 Open 语句在省略“For 方式”的情况下默认为随机存取方式(Random)输入输出文件。15.叙述中错误的是（ ）。（分数：2.00）A.一个工程中只能有一个 Sub Main 过程B.窗体的 Show 方法的作用是将指定的窗体装入内存并显示该窗体C.窗体的 Hide 方法和 Unload 方法的作用完全相同 D.若工程文件中有多个窗体，可以根据需要指定一个窗体为
33、启动窗体解析：解析：窗体的 Hide 方法只是将窗体隐藏，并不从内存中释放，而 Unload 则是将窗体从内存中释放，也就是销毁窗体。因此选项 C 错误。16.设有如下通用过程： Public Sub Fun(a()As Integer,x As Integer) For i=1 To 4 x=x*a(i) Next End Sub 在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim arr(5)As Integer,n As Integer n=1 For i=1 To
34、 4 art(i)=i+i Next Fun alT,n Text1Text=Str(n) End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是( )。（分数：2.00）A.30 B.25C.20D.15解析：解析：本题考查函数的参数。数组作为参数进行传递时，VB 中默认的参数传递方式为地址传递。过程 Fun 的功能是计算数组中所有元素的积。数组的元素为 2 4 6 8 10，因此最后文本框中显示的内容为 30。17.下面循环语句巾在任何情况下都至少执行一次循环体的是（ ）。（分数：2.00）A.Do While 循环体 LoopB.While 循环体 WendC.Do 循环体
35、Loop D.Do Until 循环体 UntilLoop解析：解析：选项 A、B、D 当不满足时，循环体不执行。只有选项 C 首先执行循环体，然后根据其中的条件来判断是否终止。所以在任何情况下都至少执行一次。18.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do Until num6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是_。（分数：2.00）A.13.45.8B.1 3 5
36、 C.1 4 7D.无数据输出解析：解析：Do UntilLoop 循环采用的是先判断循环条件后执行循环体的做法。而用 Until 关键字表示当循环条件为 False 时执行循环体，直到条件为 True 时终止循环。代码中，num 是整型数据，循环体共被执行 3 次。循环体第三次被执行后，num 的值为 7，故循环终止。19.假定程序中有以下语句： answer=MsgBox(“String1“,“String2“,“String3“,2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则 answer 的值为_。（分数：2.00）A.String1B.String2C.Strin
37、g3D.1 解析：解析：MsgBox 函数：在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。 返回值 常数 值 描述 vbOK 1 0K vbCancel 2 Cancel vbAbort 3 Abort vbRetry 4 Retry vbIgnore 5 Ignore vbYes 6 Yes vbNo 7 No 本题单击的是“确定”按钮，及 vbOK，所以 MsgBox返回 1。20.表达式 Right(“Beijing“,4)的值是( )。（分数：2.00）A.BeijB.jing C.eijiD.ijin解析：解析：Right(string,l
38、ength)函数是字符中截取函数，功能是返回从字符串 string 右边取出的指定数量“length”个字符。21.在窗体上画一个命令按钮，名称为 Command1，然后编写如下事件过程； Private Sub Command1_Click() a $=“software and hardware“ b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是_。（分数：2.00）A.software and hardwareB.softwareC.hardware D
39、.1解析：解析：MsgBox 语句可以向用户传递信息，它有 5 个参数，其中第三个应该是一个字符串，用来显示对话框的标题，即 b$，Right()函数返回字符串右边指定长度的字符串，所以为“hardware”。22.在窗体上画一个名称为 Timer1 的计时器控件，要求每隔 0.5 秒发生一次计时器事件，则以下正确的属性设置语句是_。（分数：2.00）A.Timer1. Interval=0.5B.Timer1. Interval=5C.Timer1. Interval=50D.Timer1. Interval=500 解析：解析：Interval 属性返回或设置对 Timer(计时器)控件的
40、计时事件各调用间的毫秒数，0.5 秒为500 毫秒。23.使用 Public Const 语句声明一个全局的符号常量时，该语句应放在_。（分数：2.00）A.过程中B.窗体模块的通用声明段C.标准模块的通用声明段 D.窗体模块或标准模块的通用声明段解析：解析：Const 语句格式：作用范围 Const 常量名 As 数据类型=常量值“作用范围”可以便用Private 或 Public 关键字，缺省使用 Private 关键字，表示所声明的常量只在包含该声明的模块内可用；使用 Public 关键字，表示所声明的常量在所有模块中对所有过程都可用。只有在标准模块的通用声明中才可以使用 Public
41、关键字来声明常量。24.为了使图片框的大小可以自动适应图片的尺寸，则应_。（分数：2.00）A.将其 Autosize 属性值设置为 True B.将其 Autosize 属性值设置为 FalseC.将其 Strech 属性值设置为 TrueD.将其 Stretch 属性值设置为 False解析：解析：图片框的 Autosize 属性返回或设置一个值，以决定控件是否自动改变大小以显示其全部内容。该属性的值如果是 True，则控件根据图片的尺寸自动改变大小；该属性的值如果为 False，则控件不改变自身的大小，如果载入的图片尺寸大于控件的尺寸，则将超过控件尺寸的那部分图片剪裁掉。25.Scrol
42、lBars 属性用来设置文本框是否含有滚动条，要设置该属性，_属性的值必须设置为True。（分数：2.00）A.LockedB.HideselectionC.Multiline D.Enabled解析：解析：只有 Multiline 属性为真时，ScrollBars 属性才有意义。26.在 Visual Basic 中，要使一个窗体从内存中释放，应该使用的语句是 _。（分数：2.00）A.ShowB.HideC.LoadD.Unload 解析：解析：有关窗体的语句和方法有 Load 语句、Unload 语句、Show 方法以及 Hide 方法。Load 语句的作用是把一个窗体装入内存，Unlo
43、ad 语句与 Load 语句的功能相反，Unload 语句从内存中删除指定的窗体，所以本题应选择 B。Show 方法用来显示一个窗体。Hide 方法用宋将窗体暂时隐蔽起来，但并没有从内存中删除。27.在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char) Text1.Text=String(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的
44、内容为 _。（分数：2.00）A.aB.AC.aaaaaaaD.AAAAAAA 解析：解析：该事件过程中首先用 Chr 函数记录下输入的字符，然后用 UCase 函数将其转化为大写，再用Asc 函数记录下其码值。最后使用 String 函数将其重复 6 遍并输出到文本框中。当文本框中的文本内容发生变化的时候，会触发文本框的 Change 事件，而 KeyPress 事件是在 Change 事件之前触发的，在发生KeyPress 事件之前，尚未触发 Change 事件。在 KeyPress 事件中，改变了文本框的 Text 属性，所以会触发 Change 事件，之后，键盘输入的信息“a”才在变为
45、大写之后输入文本框，文本框中最终显示的是 7 个“A”。28.设 a=6，则执行 x=IIF(a5，-1，0) 后，x 的值为（分数：2.00）A.5B.6C.0D.-1 解析：解析：IIF 方法根据表达式的值来决定返回其第 2 和第 3 个参数中的某一个。表达式是其第 1 个参数。在本题中 a，5 为 True，所以返回的是-1。29.窗体上有 Text1、Text2 两个文本框及一个命令按钮 Command1，编写下列程序 Dim y As Integer Private Sub Command1_Click() Dim x As Integer X=2 Text1.Text=Fun2(F
46、un1(x)，y) Text2.Text=Fun1(x) End Sub Private Function Fun1(x As Integer)As Integer x=x+y:y=x+y Fun1=x+y End Function Private Function Fun2(x As Integer，y As Integer)As Integer Fun2=2*x+y End Function 当单击 1 次和单击 2 次命令按钮后，文本框 Textl 和 Text2 内的值分别是（分数：2.00）A.2 4 2 4B.2 4 4 8C.10 10 58 58 D.4 4 8 8解析：解析：
47、函数 Fun1 和 Fun2 都是传值调用，其中，Text1 文本框中的内容使用了嵌套调用。实参 X 是过程变量，实参 Y 是窗体变量。30.为了使一个窗体从屏幕消失但仍在内存中，所使用的方法或语句为 _。（分数：2.00）A.ShowB.Hide C.LoadD.Unload解析：解析：Hide 方法用来将窗体从屏幕上删除，但该窗体仍然留在内存中。31.文本框控件最多能处理 _个字节。（分数：2.00）A.32K B.64KC.128KD.16K解析：解析：对于用户系统上单行 TextBox 控件来说，最大值不能超过被内存强制建立的值，并且对于多行 TextBox 控件而言，最大值大约为 32K。32.在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub
