1、二级 VISUAL+BASIC 笔试 52 及答案解析(总分：88.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是（分数：2.00）A.MouseDownB.MouseUpC.LoadD.Click2.信息隐蔽的概念与下述哪一种概念直接相关?（分数：2.00）A.软件结构定义B.模块独立性C.模块类型的划分D.模块耦合度3.如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是（分数：2.00）A.如果工程中含有 SubMain 过程，则程序一定首先执行该过程B.不能把标准模块设置为启动模块C.用 H
2、ide 方法只是隐藏一个窗体，不能从内存中清除该窗体D.任何时刻最多只有上个窗体是活动窗体4.设有如下程序： Private Sub Command1_Click( ) Dim sum As Double，x As Double sum0 n0 For i1 To 5 xn/i nn+1 sum=sum+x Next End Sub 该程序通过 For 循环计算一个表达式的值，这个表达式是（分数：2.00）A.1+1/2+2/3+3/4+4/5B.1+1/2+2/33/4C.1/2+2/3+3/4+4/5D.1+1/2+1/3+1/4+1/55.结构化程序设计的主要任务是确定每个模块的（分数：
3、2.00）A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性6.以下有关数组定义的语句序列中，错误的是（分数：2.00）A.Static arr1(3) Arr1l(1)=100 Arr1(2)=“Hello” Arr1(3)=123.45B.Dim art2( )As Integer Dim size As Integer Private Sub Command2_Click( ) size=Input Box(“输入：”) ReDinarr2(siz End SubC.Option Base 1 Private Sub Command3_Click( ) Dim arr3(
4、3) As Integer End SubD.Dim n As Integer Private Sub Command4_Click( ) Dim arr( As Integer End Sub7.在窗体上画两个滚动条，名称分别为 Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3，La- bel4、Label5、Label6，其中标签 Label4Label6 分别显示“A”；“B”、“A*B”等文字信息，标签 Label1、La- bel2 分别显示其右侧的滚动条的数值，LabeB 显示 A*B的计算结果。如图所示。当移动滚动框时，在相应的标签
5、中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现上述功能的事件过程是（分数：2.00）A.Private Sub Command1_Click( )B.Private Sub Command1_Click( ) Labe3.Caption=Hscroll1.Value*Hscrol12.Value End SubC.Private Sub Command1_Click( ) Labe3.Caption=Hscrol11*Hscrol12 End SubD.Private Sub Command1C
6、hek( ) Labe13.Caption=Hscrol11.Text*Hscrol12.Text End Sub8.窗体的 MouseDown 事件过程 FormMouseDown(Button As Integer，Shift As Integer，X As SinSle，Y As Single) 有 4 个参数，关于这些参数，正确的描述是（分数：2.00）A.通过 Button 参数判定当前按下的是哪一个鼠标键B.Shift 参数只能用来确定是否按下 Shift 键C.Shift 参数只能用来确定是否按下 Alt 和 Ctrl 键D.参数 x，y 用来设置鼠标当前位置的坐标9.在深度为
7、5 的满二叉树中，结点的个数为（分数：2.00）A.32B.31C.16D.1510.设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Static x As Integer x=10 y=5 y=f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是（分数：2.00）A.10 5B.20 5C
8、.20 40D.10 4011.以下关于焦点的叙述中，错误的是（分数：2.00）A.如果文本框的 TabStop 属性为 False，则不能接收从键盘上输入的数据B.当文本框失去焦点时，触发 LostFocus 事件C.当文本框的 Enabled 属性为 False 时，其 Tab 顺序不起作用D.可以用 Tablndex 属性改变 Tab 顺序12.软件详细设计的主要任务是确定每个模块的（分数：2.00）A.算法和使用的数据结构B.外部接口C.功能D.编程13.在结构化方法中，软件功能分解属于下列软件开发中（分数：2.00）A.详细设计阶段B.需求分析阶段C.总体设计阶段D.编程调试阶段14
9、.在窗体上画一个名称为 Text1 的文本框，并编写如下程序： Private Sub Form Load( ) Show Text1.Text=“ Text1.SetFocus End Sub Pfivate Sub Form_MouseUp(BuHon As Integer，Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，shift As Integer) Print“Visua1 Basic“； End Sub 程序运行后，
10、如果按“A”键，然后单击窗体，则在窗体上显示的内容是（分数：2.00）A.VisualBasicB.程序设计C.A 程序设计D.Visual Basic 程序设计15.下列叙述中，不正确的是（分数：2.00）A.算法的执行效率与数据的存储结构有关B.算法的空间复杂度是指执行这个算法所需要的内存空间C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.算法的时间复杂度是指执行这个算法所需要的时间16.设有如下通用过程： Public Sub Fun(a( )，ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为 T
11、ext1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click( ) Dimsn(5)As Variant For i=1 To 5 arc(i)=i Next n=10 Call Fun(arr( )，n) Textl.Text=n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（分数：2.00）A.10B.15C.25D.2417.在窗体上画一个名称为 Command1 的命令按钮和两个名称分别为 Text1、Text2 的文本框，然后编写如下事件过程： Private Sub Command
12、l_Click( ) n=Text1.Text Select Case n Case 1 T0 20 x=10 Case 2，4，6 x=20 Case lsA.B.C.D.18.关系数据库的概念模型是（分数：2.00）A.关系模型的集合B.关系模式的集合C.关系子模式的集合D.存储模式的集合19.设有以下循环结构 Do 循环体 Loop WhileA.若“条件”是一个为 0 的常数，则一次也不执行循环体B.“条件”可以是关系表达式、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 True，则不停地执行循环体20.如果要改变窗体的标题，则需要设置的属性是（分数
13、：2.00）A.CaptionB.NameC.BackColorD.BorderStyle21.设组合框 Combol 中有 3 个项目，则以下能删除最后一项的语句是（分数：2.00）A.Combo1.Removeltem TextB.Combo1.Removehem 2C.Combo1.Removeltem 3D.Combo1.Removeltem Combo1.Listcount22.执行语句 Open“Tel.dat“For Random As #1 Len=50 后，对文件 Tel.dat 中的数据能够执行的操作是（分数：2.00）A.只能写，不能读B.只能读，不能写C.既可以读，也可
14、以写D.不能读，不能写23.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下代码： OPtion Base l Private Sub Commandl_Click( ) d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)c Then d=d+x(i) C=x(i) Else d=d-c End lf Next i Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为（分数：2.00）A.89B.99C.23D.7724.如果要在菜单中添加一个分隔线，则应将其 Caption 属性设置为（分
15、数：2.00）A.B.*C.&D.-25.设 a=10，b=5，c=1，执行语句 Printabc 后，窗体上显示的是（分数：2.00）A.TreeB.FalseC.1D.出错信息26.概要设计是软件系统结构的总体设计，不属于概要设计的是（分数：2.00）A.把软件划分成模块B.确定模块之间的调用关系C.确定各个模块的功能D.设计每个模块的伪代码27.以下能判断是否到达文件尾的函数是（分数：2.00）A.BOFB.LOCC.LOFD.EOF28.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For n=1
16、 T0 20 If n Mod 3A.15B.18C.21D.2429.数据的存储结构是指（分数：2.00）A.数据所占的存储空间量B.数据的逻辑结构在计算机中表示C.数据在计算机中的顺序存储方式D.存储在外存中的数据30.设窗体上有列表框控件 List1，且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是（分数：2.00）A.List1.ListB.List1.List1ndexC.List1.IndexD.List1.Text31.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1Click( ) Dim a As
17、 Integer，s As Integer a8 s1 Do S=s+a a=a-1 Loop While a=0 Prim s，a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.7 9B.34 0C.9 7D.死循环32.在数据库管理系统提供的数据语言中，负责数据的模式定义与数据的物理存取构建的是（分数：2.00）A.数据定义语言B.数据转换语言C.数据操纵语言D.数据控制语言33.以下声明语句中错误的是（分数：2.00）A.Const varl123B.Dim var2ABCC.Defint a2D.Static var3 As Integer34.以
18、下能正确定义数据类型 TelBook 的代码是（分数：2.00）A.TypeTelBook Name As String*10 TelNum As Integer EndTypeB.Type TelBook Name As String*10 TelNum As Integer End TelBookC.Type TelBook Name String*10 TelNum Integer EndTypeTelBookD.Typedef TelBook Name String*10 TelNum Integer End Type35.在窗体上画一个名称为 Command1 的命令按钮，然后编写如
19、下事件过程： 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.1 3.4 5.8B.1 3 5C.1 4 7D.无数据输出二、B填空题/B(总题数：9，分数：18.00)36.算法的复杂度主要包括U 【1】 /U复杂度和空间复杂度。（分数：2.00）填空项 1:_37.数据的U 【2】 /U结构在计算机存储空间中的存放形式称为数据的存储结构或物理结构。（分数：2.00
20、）填空项 1:_38.对于软件测试，从是否需要执行被测软件的角度，可以分为静态测试和动态测试。代码检查属于U 【3】 /U测试。（分数：2.00）填空项 1:_39.数据库的设计通常可以分为 4 个步骤：需求分析、概念设计、U 【4】 /U和物理设计。（分数：2.00）填空项 1:_40.一个项目具有一个项目主管，一个项目主管可管理多个项目，则实体“项目主管”与实体“项目”的联系属于U 【5】 /U。（分数：2.00）填空项 1:_41.在窗体上画一个标签(名称为 Label1)和一个计时器(名称为 Timer1)，然后编写如下几个事件过程： （分数：2.00）填空项 1:_42.在窗体上画一
21、个列表框、一个命令按钮和一个标签，其名称分别为 List1、Commandl 和 Label1，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数，运行情况如图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序，请填空。 Pfivme Sub Command1_Click( ) If List1.List1ndex=U 【9】 /UThen List1.RemovehemU 【10】 /U Label1.Caption=U 【1
22、1】 /U Else MsgBox“请选择要删除的项目” （分数：2.00）填空项 1:_43.设有程序： Option Base 1 Pfivme Sub Command1_Click( ) Dim arr1，Max as Integer arr1=Array(12，435，76，24，78，54，866，43) U 【12】 /U=arr1(1) For i=1 To 8 If arr1(i)MaxThenU 【13】 /U Next i Print“最大值是：“；Max End Sub 以上程序的功能是：用 Array 函数建立一个含有 8 个元素的数组，然后查找并输出该数组中元素的最大
23、值。请填空。（分数：2.00）填空项 1:_44.以下程序的功能是：把当前目录下的顺序文件 smtextl.txt 的内容读入内存，并在文本框 Texd 中显示出来。请填空。 Pfivme Sub Commandl_Click( ) Dim inData As String Textl.Text =“ Open“/smtextl.txt“U 【14】 /UAs#1 Do WhileU 【15】 /U Input#1，in Data Text1.Text=Text1.Text&inData Loop Close#1 End Sub（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔
24、试 52 答案解析(总分：88.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是（分数：2.00）A.MouseDownB.MouseUpC.Load D.Click解析：解析 在窗体上单击鼠标，窗体可以接收到的事件为 MouseDown、MouseUp、 Click。Load 事件是在窗体被装入内存中系统自动引发的。2.信息隐蔽的概念与下述哪一种概念直接相关?（分数：2.00）A.软件结构定义B.模块独立性 C.模块类型的划分D.模块耦合度解析：解析 采用信息隐蔽的目的就是为了确保每个模块的独立性。3.
25、如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是（分数：2.00）A.如果工程中含有 SubMain 过程，则程序一定首先执行该过程 B.不能把标准模块设置为启动模块C.用 Hide 方法只是隐藏一个窗体，不能从内存中清除该窗体D.任何时刻最多只有上个窗体是活动窗体解析：解析 Sub Main 过程是 Visual Basic 中一个比较特殊的过程。它是 Visual Basic 的启动过程，如果用 Sub Main 过程，则可以(但不是必须)首先执行 Sub Main 过程。 Sub Main 过程不能自动被识别，必须通过“工程”“工程属性”“通用”选项卡设置。所以选项 A 是错误的
26、。这个错误叙述在 2004年 4 月的考试中也出现了，考生应予以关注。标准模块不能设置为启动模块，B 项是正确的。Hide 方法只能隐藏一个窗体，如果想清除该窗体，要使用 UnLoad 方法，C 项也是对的。4.设有如下程序： Private Sub Command1_Click( ) Dim sum As Double，x As Double sum0 n0 For i1 To 5 xn/i nn+1 sum=sum+x Next End Sub 该程序通过 For 循环计算一个表达式的值，这个表达式是（分数：2.00）A.1+1/2+2/3+3/4+4/5B.1+1/2+2/33/4C.1
27、/2+2/3+3/4+4/5 D.1+1/2+1/3+1/4+1/5解析：解析 sum 的初始值为 0，n 的初始值为 0，每执行次 For i 循环，先令 x 值等于 n 浮点除以i，然后再把这一 x 值加到 sum 上，很显然，sum 的最终结果为：0/1+1/2+ 2/3+3/4+4/5，故正确答案为C。5.结构化程序设计的主要任务是确定每个模块的（分数：2.00）A.程序的规模B.程序的易读性 C.程序的执行效率D.程序的可移植性解析：解析 按结构化程序设计方法设计出的程序具有明显的优点，即程序易于理解、使用和维护，便于控制、降低程序的复杂性，便于验证程序的正确性，程序清晰易读，可理解
28、性好。6.以下有关数组定义的语句序列中，错误的是（分数：2.00）A.Static arr1(3) Arr1l(1)=100 Arr1(2)=“Hello” Arr1(3)=123.45B.Dim art2( )As Integer Dim size As Integer Private Sub Command2_Click( ) size=Input Box(“输入：”) ReDinarr2(siz End SubC.Option Base 1 Private Sub Command3_Click( ) Dim arr3(3) As Integer End SubD.Dim n As Int
29、eger Private Sub Command4_Click( ) Dim arr( As Integer End Sub 解析：解析 A 项定义了一个默认数组。B 项定义了一个动态数组。C 项直接定义。由于声明数组时不能通过变量声明数组长度，故 D 项错。7.在窗体上画两个滚动条，名称分别为 Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3，La- bel4、Label5、Label6，其中标签 Label4Label6 分别显示“A”；“B”、“A*B”等文字信息，标签 Label1、La- bel2 分别显示其右侧的滚动条的数值，Labe
30、B 显示 A*B的计算结果。如图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现上述功能的事件过程是（分数：2.00）A.Private Sub Command1_Click( )B.Private Sub Command1_Click( ) Labe3.Caption=Hscroll1.Value*Hscrol12.Value End SubC.Private Sub Command1_Click( ) Labe3.Caption=Hscrol11*Hscrol
31、12 End SubD.Private Sub Command1Chek( ) Labe13.Caption=Hscrol11.Text*Hscrol12.Text End Sub 解析：解析 为实现题目中的功能，可以把 Label1 与 LabeL2 的 Caption 属性值变为数值之后相乘，然后赋给 kabel3 的 Caption 属性，也可以把 Hscroll2 与 Hscroll2 的 Value 值相乘，把结果赋给 Label3的 Caption 属性。所以 A、B 项都是可行的。由于 Value 属性是滚动条的默认属性，故可以省略不写，所以 C 项也是正确的。Text 并非滚动
32、条的属性，故 D 项错误。8.窗体的 MouseDown 事件过程 FormMouseDown(Button As Integer，Shift As Integer，X As SinSle，Y As Single) 有 4 个参数，关于这些参数，正确的描述是（分数：2.00）A.通过 Button 参数判定当前按下的是哪一个鼠标键 B.Shift 参数只能用来确定是否按下 Shift 键C.Shift 参数只能用来确定是否按下 Alt 和 Ctrl 键D.参数 x，y 用来设置鼠标当前位置的坐标解析：解析 Button 参数用来判定当前按下的是哪一个鼠标键。Button 值为 1 时表示按下左
33、键；为 2 时，表示按下右键；为 4 时，表示按下中间键。Shift 参数用来判断 Shift、Ctfi 和 Alt 键的状态。X、Y 参数用来获取鼠标的位置，而不是设置鼠标当前的位置，两者有根本的区别。9.在深度为 5 的满二叉树中，结点的个数为（分数：2.00）A.32B.31 C.16D.15解析：解析 二叉树有如下性质：深度为 m 的二叉树最多有 2 的 m 次方再减 1 个结点。10.设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为 Com
34、mand1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Static x As Integer x=10 y=5 y=f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是（分数：2.00）A.10 5B.20 5C.20 40 D.10 40解析：解析 在 Commandl 的 Click 事件过程中，x=10 以传地址的方式传给 Func- hon f(x As Integer)。而在这个函数过程中，x 又被赋值 20，所以此时变量 x 的值为 20。y 的值为 20 乘以 2。11.以下关于焦
35、点的叙述中，错误的是（分数：2.00）A.如果文本框的 TabStop 属性为 False，则不能接收从键盘上输入的数据 B.当文本框失去焦点时，触发 LostFocus 事件C.当文本框的 Enabled 属性为 False 时，其 Tab 顺序不起作用D.可以用 Tablndex 属性改变 Tab 顺序解析：解析 TabStop 是可获得焦点的控件都具备的属性，当设置其为 False 时，控件仍保持在实际 Tab顺序中的位置，只不过按 Tab 时会被跳过，但该控件仍可以通过键盘输入获得焦点从而接受数据的输入。12.软件详细设计的主要任务是确定每个模块的（分数：2.00）A.算法和使用的数据
36、结构 B.外部接口C.功能D.编程解析：解析 从软件开发的工程化观点来看，在使用程序设计语言编制程序以前， 需要对所采用算法的逻辑关系进行分析，设计出全部必要的过程细节，并给予清晰的表达。详细设计的任务就是要决定各个模块的实现算法，并精确表达出这些算法。13.在结构化方法中，软件功能分解属于下列软件开发中（分数：2.00）A.详细设计阶段B.需求分析阶段C.总体设计阶段 D.编程调试阶段解析：解析 详细设计的任务是：在使用程序设计语言编程以前，对所采用算法的逻辑关系进行分析，并给予清晰的表达。需求分析是指用户对目标软件系统在功能、行为、性能、设计约束等方面的希望。编程调试任务是诊断和改正程序中
37、潜在的错误。软件功能分解只能发生在总体设计阶段。14.在窗体上画一个名称为 Text1 的文本框，并编写如下程序： Private Sub Form Load( ) Show Text1.Text=“ Text1.SetFocus End Sub Pfivate Sub Form_MouseUp(BuHon As Integer，Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，shift As Integer) Print“Vis
38、ua1 Basic“； End Sub 程序运行后，如果按“A”键，然后单击窗体，则在窗体上显示的内容是（分数：2.00）A.VisualBasicB.程序设计C.A 程序设计D.Visual Basic 程序设计 解析：解析 按“A”键，将执行“Print”Visual Basic”；”语句，单击窗体，执行“Print”程序设计“”语句。注意“Print”Visual Basic“；”后面以分号结束，则执行下面的 Print 语句输出的字符会以紧凑方式与之相连。15.下列叙述中，不正确的是（分数：2.00）A.算法的执行效率与数据的存储结构有关B.算法的空间复杂度是指执行这个算法所需要的内存
39、空间C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.算法的时间复杂度是指执行这个算法所需要的时间 解析：解析 算法的时间复杂度是指执行算法所需要的计算工作量。16.设有如下通用过程： Public Sub Fun(a( )，ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click( ) Dimsn(5)As Variant For i=1 To 5 arc(i)=i N
40、ext n=10 Call Fun(arr( )，n) Textl.Text=n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（分数：2.00）A.10 B.15C.25D.24解析：解析 Fun 过程中参数 a( )的传送方式为传地址，参数 x 的传送方式为传值。当在 Commandl 的Click 事件过程调用该过程时，变量仅仅复制了一个变量副本传送给 Fun 过程，而它自己本身并没有发生变化。所以当调用完毕 Fun 过程后，再将 n 值赋给 Textl 的 Text 属性时，文本框中显示的内容仍为 10。17.在窗体上画一个名称为 Command1 的命令按钮和两个
41、名称分别为 Text1、Text2 的文本框，然后编写如下事件过程： Private Sub Commandl_Click( ) n=Text1.Text Select Case n Case 1 T0 20 x=10 Case 2，4，6 x=20 Case lsA. B.C.D.解析：解析 Case 语句的表达式有三种形式，一种为“表达式(，表达式)”；一种为“表达式 To 表达式”；还有一种比较特殊，为 Is 关键运算表达式。三者可以混用。由于在 Textl 中输入10，满足“Casel To 20“的条件，故执行“x=10”的语句。最终 Text2 的 Text 属性值为 10，故正确
42、答案为 A。18.关系数据库的概念模型是（分数：2.00）A.关系模型的集合B.关系模式的集合 C.关系子模式的集合D.存储模式的集合解析：解析 数据库的概念模型体现了数据之间的关系，它是各种数据之间相互关系的集合。19.设有以下循环结构 Do 循环体 Loop WhileA.若“条件”是一个为 0 的常数，则一次也不执行循环体 B.“条件”可以是关系表达式、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 True，则不停地执行循环体解析：解析 当指定的“循环条件”为 True，或直到指定的“循环条件”变为 True 之前重复执行循环体。本题的关键是“条件”是
43、 Tme 还是 False。若“条件”是一个为 0 的常数，则表示 False，但 Do 循环仍然可以执行一次循环体，直到遇到这一条件时，系统才会作出判断退出该循环。循环体中可以使用ExitDo 语句，也可以不使用。“条件”可以是关系表达式、逻辑表达式，也可以是常数。20.如果要改变窗体的标题，则需要设置的属性是（分数：2.00）A.Caption B.NameC.BackColorD.BorderStyle解析：解析 Caption 属性确定窗体的标题，即显示在窗体标题栏内的内容。而 Name 确定窗体的名称，即窗体在整个程序中的“身份”。BackColor 用来设置窗体的背景颜色；Bord
44、erStyle 确定窗体的边框样式。21.设组合框 Combol 中有 3 个项目，则以下能删除最后一项的语句是（分数：2.00）A.Combo1.Removeltem TextB.Combo1.Removehem 2 C.Combo1.Removeltem 3D.Combo1.Removeltem Combo1.Listcount解析：解析 删除组合框的表项一般使用“Removhem 索引值”语句。组合框表项的索引值从 0 开始，故要删除 3 个项目的最后一项，应选择 B 项，而不是 C 项。A 项的写法错误。ListCount 确定表项的数量，故 D 项也是不符合题目要求的。22.执行语句
45、 Open“Tel.dat“For Random As #1 Len=50 后，对文件 Tel.dat 中的数据能够执行的操作是（分数：2.00）A.只能写，不能读B.只能读，不能写C.既可以读，也可以写 D.不能读，不能写解析：解析 以 Open 语句打开一个随机文件可以进行读操作，也可以进行写操作，故答案为 C。写操作使用 Put#语句，读操作使用 Get#语句。23.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下代码： OPtion Base l Private Sub Commandl_Click( ) d=0 c=10 x=Array(10，12，21，32，24)
46、 For i=1 To 5 If x(i)c Then d=d+x(i) C=x(i) Else d=d-c End lf Next i Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为（分数：2.00）A.89B.99C.23 D.77解析：解析 首先使用 Array 为数组 x 赋值。For 循环表示当 x(i)值大于 c 时就执行： d=d+x(i) c=x(i) 表示如果 x(i)c 则令 d 加 x(i)，并且 x(i)给变量 c。否则，执行 d=d-c 语句。要注意 c 的值在不断发生变化，根据题意，最终答案为 c。24.如果要在菜单中添加一个分
47、隔线，则应将其 Caption 属性设置为（分数：2.00）A.B.*C.&D.- 解析：解析 如果要在菜单中添加一个分隔线，则应将其 Caption 属性设为“-”。 C 项的连接符一般在字母前加，显示菜单时在该字母下加上一条下划线，以表示访问键。25.设 a=10，b=5，c=1，执行语句 Printabc 后，窗体上显示的是（分数：2.00）A.TreeB.False C.1D.出错信息解析：解析 Print 方法具有计算的功能。本句 Print 先计算 abc。解题的关键是能否理解这一关系表达式，按照正常的理解，这个不等式为 True，但 Visual Basic 有它自己的语法。系统
48、在判断该不等式时，从左向右解析，先解析 a，b 为真，与整数比较时，真用-1 表示，故选择 B 项。26.概要设计是软件系统结构的总体设计，不属于概要设计的是（分数：2.00）A.把软件划分成模块B.确定模块之间的调用关系C.确定各个模块的功能D.设计每个模块的伪代码 解析：解析 概要设计是数据库的总体设计，其目的就是要按照需求规格说明书把软件按照功能划分为多个模块，然后确定每个模块要实现的功能，最后确定模块之间的调用关系，而设计每个模块的伪代码则属于详细设计。27.以下能判断是否到达文件尾的函数是（分数：2.00）A.BOFB.LOCC.LOFD.EOF 解析：解析 文件操作的函数主要有 LOC、LOF、EOF 这几种。LOC 返回文件号指定的文件的当前读写位置；LOF 返回文件的长度；EOF 用来测试文件的结束状态，它可以判断是否到达文件尾。28.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For n=1
