1、国家二级（VB）机试模拟试卷 179 及答案解析(总分：86.00，做题时间：90 分钟)一、选择题(总题数：40，分数：80.00)1.线性表常采用的两种存储结构是( )。（分数：2.00）A.散列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储结构D.线性存储结构和非线性存储结构2.软件需求分析阶段的工作，可以分为四个方面：需求获取、编写需求规格说明书、需求评审和( )。（分数：2.00）A.阶段性报告B.需求分析C.需求总结D.都不正确3.在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是( )。（分数：2.00）A.需求分析B.详细设计C.软件设计
2、D.概要设计4.对建立良好的程序设计风格，下面描述正确的是( )。（分数：2.00）A.程序应简单、清晰、可读性好B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无5.下列工具中，不属于结构化分析的常用工具的是( )。（分数：2.00）A.数据流图B.数据字典C.判定树D.N-S 图6.在软件生产过程中，需求信息的来源是( )。（分数：2.00）A.程序员B.项目经理C.设计人员D.软件用户7.对关系 S 和 R 进行集合运算，结果中既包含 S 中的所有元组也包含尺中的所有元组，这样的集合运算称为( )。（分数：2.00）A.并运算B.交运算C.差运算D.积运算8.设
3、有关键码序列(Q，G，M，Z，A，N，B，P，X，H，Y，S，T，L，K，E)，采用堆排序法进行排序，经过初始建堆后关键码值 B 在序列中的序号是( )。（分数：2.00）A.1B.3C.7D.99.数据库的故障恢复一般是由( )来执行恢复。（分数：2.00）A.电脑用户B.数据库恢复机制C.数据库管理员D.系统普通用户10.下列选项中，不属于数据模型所描述的内容的是( )。（分数：2.00）A.数据类型B.数据操作C.数据结构D.数据约束11.在窗体上画一个命令按钮，然后编写如下时间过程( )。 Print Sub Commandl_Click() a=InputBox(”Enter the
4、 First interger”) b=InputBox(”Enter the Second interger”) Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入 456 和 123，则输出结果是（分数：2.00）A.579B.123C.456D.12345612.确定一个控件在窗体上的位置的属性是( )。（分数：2.00）A.Width 或 HeightB.Width 和 HeightC.Top 或 LeftD.Top 和 Left13.以下( )控件没有 Caption 属性。（分数：2.00）A.CommandButtonB.CheckBox
5、C.TextBoxD.Label14.在窗体上有一个名称为 Commandl 的命令按钮，并有如下程序： Private Sub Commandl_Click() Static X As Integer Static Y As Integer Cls Y=1：Y=Y+5：X=5+X：Print XY End Sub 程序执行时，单击命令按钮 Commandl 三次后，窗体上显示的结果为( )。（分数：2.00）A.15 16B.5 6C.15 15D.15 615.表达式 Str(Len(”123”)+Str(7771)的值是( )。（分数：2.00）A.3+777B.3777C.807D.1
6、2377716.表达式 Int(-158)+Fix(-158)+Int(158)+Fix(158)的运算结果是( )。（分数：2.00）A.一 1B.-2C.0D.117.编写如下事件过程： Private Sub Form_MouseMove(Button As Integer，Shift As Integer,X As Single，Y As Single) If(Button And 3)=3 Then Print”AAAA” End If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为( )。（分数：2.00）A.按左键并移动B.按右键并移动C.同时按下左、
7、右键并移动D.按什么键都不显示18.窗体上有一个名称为 Cbl 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是( )。（分数：2.00）A.Print CblSelectedB.Print CblList(CblListIndex)C.Print CblSelectedTextD.Print CblList(Listlndex)19.窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入 12345，单击命令按钮后的输出结果为( )。 Private Sub Commandl_Click() Dim A As Integer，B As Integer Text1SelStar
8、t=2：Text1SelLength=2 A=Val(Text1SelText)：B=Len(Text1Text) Print A*B End Sub（分数：2.00）A.68B.115C.1700D.17020.使用( )方法，可清除列表框中所有的列表项。（分数：2.00）A.RemoveB.ClearC.RemoveltemD.Move21.下列循环能正常结束的是( )。（分数：2.00）A.x=5 Do x=x+1 Loop Until x0D.x=6 Do x=x 一 2 Loop Until x=122.程序运行时，当在空文本框中依次输入 1234 时，窗体上显示的是( )。 Pri
9、vate sub Textl_Change() Print Text1： End Sub（分数：2.00）A.1234B.12C.1121231234D.1023.在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是( )。 Private Sub Form_Load() For i=1 To 10 sum=sum+i Next i Print”Sum=”；sum End Sub（分数：2.00）A.在窗体上输出 55B.在窗体上输出 sum=55C.出错D.窗体上不输出24.在窗体上画两个名称分别为 Hscroll1、Hscroll2 的滚动条控件；6 个名称分别为Label
10、1、Label2、Label3、Label4、Label5、Label6 的标签，其中，Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动条 Value 属性值，Label3 显示A*B 的计算结果，如图 1 所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现求积功能的事件过程是( )。 （分数：2.00）A.Private Sub Commandl_Click() Label3Captio
11、n=Str(Val(Label1Caption)*Val(Label2Caption)End SubB.Private Sub Commandl_Click() Label3Caption=HScroll1Value*HScroll2Value End SubC.Private Sub Commandl_Click() Label3Caption=HScrolll*HScroll2 End SubD.Private SUb Commandl_Click() Label3Caption=HScroll1Text* HScroll2Text End Sub25.设 a=6，则执行 X=IIf(a5
12、，一 1,0)后，x 的值为( )。（分数：2.00）A.5B.6C.0D.一 126.以下程序执行后，在窗体上输出的图案是( )。 FormlCIs For a=1 To 5 Print Space(5-a)；String(a，”*”) Next a（分数：2.00）A.* * * * *B.* * * * *C.* * * * *D.* * * * *27.假定窗体上有一个标签，名为 Label。为了使该标签透明并且没有边框，则正确的属性设置为( )。（分数：2.00）A.Label1BackStyle=0 Label1BorderStyle=0B.Label1BackStyle=1 La
13、bel1BorderStyle=1C.Label1BackStyle=True Label1BorderStyle=TrueD.Label1BackStyle=False Label1BorderStyle=False28.单击命令按钮时，下列程序段的执行结果为( )。 Private Sub Commandl_Click() Print Funcl(24，18) End Sub Public Function Funcl(m As Integer，n As Integer)As Integer Do While mn：m=m-n：Loop Do While mA.8B.6C.4D.229.下
14、列程序段执行后，输出的结果是( )。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y（分数：2.00）A.90B.60C.40D.1030.使用语句 Dim A(I To 10)As Integer 声明数组 A 后，以下叙述正确的是( )。（分数：2.00）A.A 数组中的所有元素值为 0B.A 数组中的所有元素值不确定C.A 数组中的所有元素值为 EmptyD.执行语句“Erase A”后，A 数组中的所有元素值为 Null31.以下程序段的功能是( )。
15、X=86 y=Int(x+05) Print y（分数：2.00）A.输出 y 的绝对值B.实现 x 的四舍五入C.实现 x 的绝对值D.实现 y 的四舍五入32.在窗体上建立一个命令控件数组 Commandl，并双击第一个命令按钮，编写如下事件过程： Private Sub Commandl_Click(Index As Integer) Commandl(Index)Caption=FormatS(Now,“hh：mm：ss“) End Sub 以下描述正确的是( )。（分数：2.00）A.当单击某个命令按钮时，数组中所有命令按钮的 Caption 属性将被设置为当前时间B.当单击某个命令
16、按钮时，该按钮的 Caption 属性将被设置为当前时间C.程序有错误D.窗体的 Caption 属性将被设置为当前时间33.有如下的一个函数过程： Function fn(ByVal num As Long) Dim k As Long k=1：num=Abs(num) Do While num k=k*(num Mod 10) num=num10 Loop fn=k End Function 通过以下事件过程调用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为( )。 Private Sub Commandl_Click() Dim n As Long Dim r As
17、Long n=InputBox(”请输入一个数值”) n=CLng(n)：r=fn(n) Print r End Sub（分数：2.00）A.12B.6C.3D.134.下列关于函数过程的叙述中，正确的是( )。（分数：2.00）A.如果不指明函数过程参数的类型，则该参数没有数据类型B.函数过程的返回值可以有多个C.函数过程形参的类型与函数返回值的类型没有关系D.当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递35.以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以 4 余 1，除以 5 余 2”的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，
18、并清除文本框的内容，在横线处应填写( )。 Private Sub Commandl_Click() x=Val(TextlText) If_ Then Print x Else TextlSetFocus TextlText=“” End If End Sub（分数：2.00）A.x4=1 And x5=2B.x4=1 Or x5=2C.x Mod 4=1 And x Mod 5=2D.x Mod 4=1 Or x Mod 5=236.要求当鼠标在图片框 Picturel 中移动时，立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是( )。（分数：2.00）A.Private
19、 Sub Picturel_MouseMove(Button As Integer，Shift As Integer，XAs Single，Y As Single) Picture 1Print X，Y End SubB.Private Sub Picture1_MouseMove(Button As Integer，Shift As Integer，XAs Single，Y As Single) Print X，Y End SubC.Private Sub Picturel_MouseDown(Button As Integer，Shift As Integer，XAs Single，Y A
20、s Single) PicturePrint X，Y End SubD.Private Sub Form_MouseMove(Button As Integer Shift As Integer，XAs S ingle，YAs Single) Picture 1Print X，Y End Sub37.一个工程中包含两个名称分别为 Form1、Form2 的窗体、一个名称为 Func 的标准模块。假定在Form1、Form2 和 Func 中分别建立了自定义过程，其定义格式为： Form1 中定义的过程： Private Sub Funl() End Sub Form2 中定义的过程： Priv
21、ate Sub Fun2() End Sub Func 中定义的过程： Private Sub Fun3() End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是( )。（分数：2.00）A.上述 3 个过程都可以在工程中的任何窗体或模块中被调用B.Funl 和 Fun2 过程能够在工程中各个窗体或模块中被调用C.上述 3 个过程都只能在各自被定义的模块中调用D.只在 Fun3 过程能够被工程中各窗体或模块调用38.在窗体上有一个名称为 CDl 的通用对话框和一个名称为 Commandl 的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的
22、标题为“保存”，缺省文件名为“ABC”，在“文件类型”栏中显示*txt。则能够满足上述要求的程序是( )。（分数：2.00）A.Private Sub Commandl_Click() CD1FilcNamcTM”ABC” CD1Filter=”All Files|*|(*txt)|*txt|(*doc)|*doc” CD1FilterIndex=1 CD1DialogTitle=”保存” CD1Action=2 End SubB.Private Sub Commandl_Click() CD1FileName=”ABC” CD1Filter=”All Files|*|(*txt)|*txt|
23、(*doc)|*doc” CD1FilterIndex=2 CD1DialogTitle=”保存” CD1Action=2 End SubC.Private Sub Command1_Click() CD1FileName=”保存” CD1Filter=”All Files|*|(*txt)|*txt|(*doc)|*doc” CD1Filterlndex=2 CD1DialogTitle=”ABC” CD1Action=2 End SubD.Private Sub Commandl_Click() CD1FileName=”ABC” CD1Filter=”All Files|*|(*txt)
24、|*txt|(*doc)|*doc” CD1FilterIndex=1 CD1DialogTitle=”保存” CD1Action=1 End Sub39.已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为 a1，且取消其“可见”属性，如图 2 所示。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标右键单击。 （分数：2.00）A.Private Sub Form MouseDown(Button As Integer,_ Shift As Integer,X As Single，Y As Single) IfButton=2 Then PopupMenu a12 End SubB.P
25、rivate Sub Form MouseDown(Button As Integer,_ Shift As Integer,X As Single，Y As Single) PopupMenu a1，0 End SubC.Private Sub Form MouseDown(Button As Integer,_ Shift As Integer,X As Single，Y As Single) PopupMenu a1 End SubD.Private Sub Form_MouseDown(Button As Integer,Shift As_ Integer,X As Single，Y
26、As Single) If(Button=vbLetfButton)Or(Button=vbRightButton)Then PopupMenu a1 End Sub40.下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。 Private Sub Commandl_Click() Dim Num(25)As Integer，Chrl As String Chrl=UCase(InputBox(”请输入字母字符串”) For k=1 To L,en(Chrl) n=Asc(Mid(Chrlk1)-Asc(“A”) If n=0 Then Num
27、(n)=Num(n)+1 End If Next k m=Num(0) For k=1 To 25 If mA.3B.2C.1D.0二、基本操作题(总题数：1，分数：2.00)41.请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。 (1)在名称为 Forml 的窗体上画出包含三个命令按钮的控件数组，名称为 cmdl，下标分别为 0、1、2，Caption 分别为“开始”、“停止”和“退出”，如图 3(a)所示。通过属性窗口设置各命令按钮的属性，使得程序开始运行时，“停止”按钮不可见，“退出”按钮不可用，如图 3(b)所示。 注意：存盘时，将文件保存至考生文件夹
28、下，且窗体文件名为 sjtlfrm，工程文件名为 sjtlvbp。 (2)在名称为 Forml 的窗体上画两个名称分别为 Commandl 和 Command2、标题分别为“打开”和“保存”的命令按钮，和一个名称为 CDl 的通用对话框，如图 4 所示。请在属性窗口中设置 CDl 的属性，使得打开通用对话框时，其初始路径是“C：”。再编写适当的事件过程，使得运行程序，分别单击“打开”或“保存”按钮时，相应地出现“打开”或“保存”对话框。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为 sjt2frm，工程文件名为 Sjt2vbp。
29、（分数：2.00）_三、简单应用题(总题数：1，分数：2.00)42.(1)考生文件夹中有工程文件 sjt3vbp。在窗体上有名称为 Combol 的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图 5(a)所示，单击“输入正整数”按钮，通过输入对话框输入一个正整数，再单击“判断”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图5(b)所示的是输入 56 且选中的组合框选项为“判奇偶数”时显示的信息框。 在给心的窗体文件中己经有了全部控件，但程序不完整，要求：按照题目
30、要求设置组台框的有关属性，去掉程序中的注释符，把程序中的?改为正确的内容。 注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。(2)在考生目录下有一个工程文件 sjt4vbp。窗体上有一大一小两个名称分别为 Shape2、Shapel的 Shape 控件。请在属性窗口中将 Shapel 控件设置为圆形，并将其颜色设置为红色(颜色值为&H000000FF&)，如图 6 所示。 要求：当单击窗体时，Shape1 移动到矩形(即 Shape2)左上角，再次单击窗体，则 Shape1 移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：在属性窗口中设置有关的属
31、性值，去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 （分数：2.00）_四、综合应用题(总题数：1，分数：2.00)43.在考生目录下已有一个工程文件 sjt5vbp。运行程序后，分别从两个文件中读出数据，放入两个一维数组 a、b 中。请编写程序，当单击“合并数组”按钮时，将 a、b 数组中相同下标的数组元素的值求和，并将结果存入数组 c。单击“找最大值”按钮时，调用 find 过程分别找出 a、c 数组中元素的最大值，并将所找到的结果分别显示在。Text1、Text2 中。在给出的窗体文件中已经有了全部控件，但程
32、序不完整。要求：去掉程序中的注释符，把程序中的?改为确的内容，并编写相应程序，实现程序的功能。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，各命令按钮的事件过程必须至少各执行一次。（分数：2.00）_国家二级（VB）机试模拟试卷 179 答案解析(总分：86.00，做题时间：90 分钟)一、选择题(总题数：40，分数：80.00)1.线性表常采用的两种存储结构是( )。（分数：2.00）A.散列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储结构 D.线性存储结构和非线性存储结构解析：解析：线性表的存储通常要用两种存储结构：顺序存储结
33、构和链式存储结构。2.软件需求分析阶段的工作，可以分为四个方面：需求获取、编写需求规格说明书、需求评审和( )。（分数：2.00）A.阶段性报告B.需求分析 C.需求总结D.都不正确解析：解析：软件需求分析阶段的工作，可以概括为四个方面：需求获取、需求分析、编写需求规格说明书和需求评审。需求获取的目的是确定对目标系统的各方面需求。涉及到的_丰要任务是建立获取用户需求的方法框架，并支持和监控需求获取的过程。需求分析是对获取的需求进行分析和综合，最终给出系统的解决方案和目标系统的逻辑模型。编写需求规格说明书作为需求分析的阶段成果，可以为用户、分析人员和设计人员之间的交流提供方便，可以直接支持目标软
34、件系统的确认，又可以作为控制软件开发进程的依据。需求评审是对需求分析阶段的工作进行复审，验证需求文档的一致性、可行性、完整性和有效性。3.在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是( )。（分数：2.00）A.需求分析 B.详细设计C.软件设计D.概要设计解析：解析：软件生命周期的主要活动阶段为：可行性研究和计划制定、需求分析、软件设计、软件实现、软件测试、运行和维护。其中需求分析是对开发软件提出的需求进行分析并给出详细定义，即准确地确定软件系统的功能，编写软件规格说明书及初步的用户手册，提交评审。4.对建立良好的程序设计风格，下面描述正确的是( )。（分数：2
35、.00）A.程序应简单、清晰、可读性好 B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无解析：解析：程序设计应该简单易懂，语句结构应该简单直接，不应该为提高效率而把语句复杂化。5.下列工具中，不属于结构化分析的常用工具的是( )。（分数：2.00）A.数据流图B.数据字典C.判定树D.N-S 图 解析：解析：结构化分析常用工具有数据流图、数据字典、判定树和判定表。6.在软件生产过程中，需求信息的来源是( )。（分数：2.00）A.程序员B.项目经理C.设计人员D.软件用户 解析：解析：软件需求是指用户对目标软件系统在功能、性能、设计约束等方面的要求，是由用户提出的。
36、7.对关系 S 和 R 进行集合运算，结果中既包含 S 中的所有元组也包含尺中的所有元组，这样的集合运算称为( )。（分数：2.00）A.并运算 B.交运算C.差运算D.积运算解析：解析：关系的并运算是指由结构相同的两个关系合并，形成一个新的关系，新关系中包含两个关系中的所有元组。8.设有关键码序列(Q，G，M，Z，A，N，B，P，X，H，Y，S，T，L，K，E)，采用堆排序法进行排序，经过初始建堆后关键码值 B 在序列中的序号是( )。（分数：2.00）A.1B.3 C.7D.9解析：解析：建堆的算法：首先将要排序的所有关键码放到一棵完全二叉树的各个结点中(这时的二叉树不具备堆的特性)，然后
37、，从 i=n2(n 为结点的个数)的结点 K i 开始，逐步把以 K n/2 ，K n/2-1 ，K n/2-2 为根的子树排成堆，直到以 K 1 为根的树排成堆，就完成了建堆过程。此题中，n=16，i=162=8，即从第 8 个结点开始，所以经过初始建堆后关键码值 B 在序列中的序号是 3。9.数据库的故障恢复一般是由( )来执行恢复。（分数：2.00）A.电脑用户B.数据库恢复机制C.数据库管理员 D.系统普通用户解析：解析：数据库一旦发生故障，需要及时进行故障恢复，并由数据库管理员负责执行故障恢复。10.下列选项中，不属于数据模型所描述的内容的是( )。（分数：2.00）A.数据类型 B
38、.数据操作C.数据结构D.数据约束解析：解析：数据模型描述的内容包含数据结构、数据操作和数据约束。11.在窗体上画一个命令按钮，然后编写如下时间过程( )。 Print Sub Commandl_Click() a=InputBox(”Enter the First interger”) b=InputBox(”Enter the Second interger”) Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入 456 和 123，则输出结果是（分数：2.00）A.579B.123C.456D.123456 解析：解析：InputBox 函数返回
39、的是字符串格式的用户输入的数据，因此本题中，最后变 a 和变量 b 中存储的是字符串456和123，因此表达式 b+a，就是将这两个字符串连接起来，称为字符串123456。12.确定一个控件在窗体上的位置的属性是( )。（分数：2.00）A.Width 或 HeightB.Width 和 HeightC.Top 或 LeftD.Top 和 Left 解析：解析：本题考查对象的基本属性。Height 和 width 属性决定了控件的高度和宽度，而 Top 和 Left属性决定了控件在窗体中的位置属性。13.以下( )控件没有 Caption 属性。（分数：2.00）A.CommandButton
40、B.CheckBoxC.TextBox D.Label解析：解析：本题考查基本控件的常用属性。命令按钮 (CommandButton)、复选框(CheckBox)以及标签(Label)都有标题(Caption)属性；而文本框没有 Caption 属性，只有 Text 属性。14.在窗体上有一个名称为 Commandl 的命令按钮，并有如下程序： Private Sub Commandl_Click() Static X As Integer Static Y As Integer Cls Y=1：Y=Y+5：X=5+X：Print XY End Sub 程序执行时，单击命令按钮 Command
41、l 三次后，窗体上显示的结果为( )。（分数：2.00）A.15 16B.5 6C.15 15D.15 6 解析：解析：本题考查静态变量。静态变量的值有继承性，上一次调用的结果在下一次调用时还是有效的。题目中每次调用 Y 的值都被重新赋值了，因此单击 3 次以后 Y 的值仍然是 6，而 X 每次调用的结果都保留，因此调用 3 次以后，结果为 15。15.表达式 Str(Len(”123”)+Str(7771)的值是( )。（分数：2.00）A.3+777B.3777 C.807D.123777解析：解析：本题考查字符串处理函数。Str 的功能是把数字转化为字符，Len 函数的功能是求字符串中字
42、符的个数。题中“+”为字符串连接运算符。16.表达式 Int(-158)+Fix(-158)+Int(158)+Fix(158)的运算结果是( )。（分数：2.00）A.一 1 B.-2C.0D.1解析：解析：本题考查函数 Int 的功能，Int(x)的作用是取不大于 x 的最小的整数，Fix(x)则是简单的取整数部分。17.编写如下事件过程： Private Sub Form_MouseMove(Button As Integer，Shift As Integer,X As Single，Y As Single) If(Button And 3)=3 Then Print”AAAA” End
43、 If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为( )。（分数：2.00）A.按左键并移动B.按右键并移动C.同时按下左、右键并移动D.按什么键都不显示 解析：解析：鼠标单击时，鼠标键按下的参数 Button 可取 3 个值：按下左键时，Button 值为 1、按下右键时，Button 值为 2、按下中间键时Button 值为 4。因此始终不能执行语句“Print”AAAA”，也就不能输出“AAAA”。18.窗体上有一个名称为 Cbl 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是( )。（分数：2.00）A.Print CblSelectedB.
44、Print CblList(CblListIndex) C.Print CblSelectedTextD.Print CblList(Listlndex)解析：解析：组合框的属性 ListIndex 返回当前所选项目的索引号，List(Index)属性返回指定索引号的列表项内容，因此返回当前选定的列表项应该用 Cb1List(Cb1，Listlndex)。19.窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入 12345，单击命令按钮后的输出结果为( )。 Private Sub Commandl_Click() Dim A As Integer，B As Integer Text
45、1SelStart=2：Text1SelLength=2 A=Val(Text1SelText)：B=Len(Text1Text) Print A*B End Sub（分数：2.00）A.68B.115C.1700D.170 解析：解析：本题考查文本框的常见属性。文本框的 SelStart 属性和 SelLength 属性表示选中文本的开始位置和长度，第一个字符的位置为 0，SelText 表示选中的文本。Val 把字符转化为数字。所以 A 为34，B 为 5，因此输出为 34*5=170。20.使用( )方法，可清除列表框中所有的列表项。（分数：2.00）A.RemoveB.Clear C.
46、RemoveltemD.Move解析：解析：本题考查列表框项目清除。在列表框中可以使用 RemoveItem 方法和 Clear 方法来清除项目，其中 RemoveItem 清除某一项，而 Clear 清除所有项。21.下列循环能正常结束的是( )。（分数：2.00）A.x=5 Do x=x+1 Loop Until x0 D.x=6 Do x=x 一 2 Loop Until x=1解析：解析：本题考查 Do 型循环。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。由 Until 引出的
47、循环条件为 False 时执行循环体，条件为 True 时退出循环；题目中选项 A)中循环变量逐渐增加，不可能小于 0，选项 B)中循环变量的步长为 2，初值为 1，不可能等于 10。而选项 C)中执行一次循环体，条件成立，退出循环。选项 D)和选项 B)相似，循环变量无法等于 1。22.程序运行时，当在空文本框中依次输入 1234 时，窗体上显示的是( )。 Private sub Textl_Change() Print Text1： End Sub（分数：2.00）A.1234B.12C.1121231234 D.10解析：解析：本题考查文本框的 Change 事件，Change 事件是
48、每次文本框中的文本发生改变都要触发的事件，因此输入 1234 后，Change 事件触发了 4 次，每次都是把文本框的现有的内容输出，依次输出为1121231234。23.在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是( )。 Private Sub Form_Load() For i=1 To 10 sum=sum+i Next i Print”Sum=”；sum End Sub（分数：2.00）A.在窗体上输出 55B.在窗体上输出 sum=55C.出错D.窗体上不输出 解析：解析：本题考查 Load 事件运行。当装入窗体事件触发时，通常用于对属性和变量初始化，一般不使用 Print 方法，若想 Print 方法在 Form Load 事件过程中起作用，必须设置窗体的 AutoRedraw 为True，否则 Print 方法不起作用。24.在窗体上画两个名称分别为 H
