1、二级 VISUAL+BASIC 笔试 77 及答案解析(总分：90.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.在结构化方法的软件需求分析中，可采用分析工具来辅助完成。下列工具中，常用需求分析工具的是 数据流图 结构图 数据字典 判定表（分数：2.00）A.和B.、和C.、和D.、和2.链式栈与顺序栈相比，一个比较明显的优点是（分数：2.00）A.插入操作更加方便B.通常不会出现栈满的情况C.通常不会出现栈空的情况D.删除操作更加方便3.检查软件产品是否符合需求定义的过程称为（分数：2.00）A.系统测试B.集成测试C.验收测试D.单元测试4.在窗体上画一
2、个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub sub1(p，m，n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x，y+1，(z) Print x；y；z End Sub 程序运行后，单击命令按钮，则窗体上第二行显示的内容是（分数：2.00）A.7 6 3B.7 4 2C.6 4 2D.4 6 35.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command
3、1_Click() a=InputBox(“请输入一个整数“) b=InputBox(“请输入一个整数“) Print a+b End Sub 程序运行后，单击命令按钮，在输入对话框中分别输入 37 和 18，输出结果为（分数：2.00）A.3718B.55C.0D.a+b6.以下语句的输出结果是 Print Format$(32548.5，“000，00000“)（分数：2.00）A.32548.5B.32，548.5C.032，548.50D.32，548.507.下列不正确的语句是（分数：2.00）A.Print a=10+20B.Print “a=“；10+20C.Print “a“=
4、“10+20“D.Print a=；10+208.下面关于数据逻辑结构的叙述中，正确的是（分数：2.00）A.数据的逻辑结构是数据间关系的描述B.数据的逻辑结构反映了数据在计算机中的存储方式C.数据的逻辑结构分为顺序结构和链式结构D.数据的逻辑结构分为静态结构和动态结构9.在窗体上画两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(其 Name 属性为 Command1)，然后编写如下事件过程： Private Sub Command1_Click() X=0 Do While x 50 x = (x + 2) * (x + 3) n = n + 1 Loop
5、Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为（分数：2.00）A.1 和 0B.2 和 72C.3 和 50D.4 和 16810.对序列中的元素通过适当的位置交换将有关元素一次性地放置在其最终位置上，这种排序方法是（分数：2.00）A.希尔排序B.插入排序C.快速排序D.选择排序11.在窗体上有一个文本框控件，名称为 TxtTime；一个计时器控件，名称为 Timer1。为了使得每一秒钟在文本框中显示一次当前的时间，应将 Interval 属性值设置为（分数：2.00）A.1)B.10C.100
6、D.100012.如果将文本框的 Locked 属性设置为 Tree，则以下说法正确的是（分数：2.00）A.此时在属性窗口不可以修改文本框的 Text 属性值B.运行时用户不可以在界面上修改文本框中的内容C.在程序代码中不可以修改文本框的内容，如不可以使用语句 Text1.Text=“aa“D.以上均不正确13.在一个长度为 n 的顺序表中，删除第 i(1in)个元素时，需要移动的元素个数为（分数：2.00）A.n-i+1B.n-iC.iD.i-114.在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub Form_Load() For i=1 To
7、 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.3012315.某二叉树前序遍历结点的访问顺序是 abdgcefh，中序遍历结点的访问顺序是 dgbaechf,则后序遍历结点的访问顺序是（分数：2.00）A.bdgcefhaB.gdbecfhaC.bdgaechfD.
8、gdbehfca16.设计数据库的存储结构属于数据库的（分数：2.00）A.需求分析B.概念设计C.逻辑设计D.物理设计17.执行下面的语句后，产生的信息框标题是 a=MsgBox(“AAAA“，“BBBB“，“ “，5)（分数：2.00）A.BBBBB.空C.AAAAD.出错，不能产生信息框18.为了能将信息直接送往打印机，应该将 Print 方法的对象改为（分数：2.00）A.PictureBoxB.FormC.ImageD.Printer19.使文本框获得焦点的方法是（分数：2.00）A.ChangeB.GotfocusC.SetFocusD.LostFocus20.在窗体上添加文本框
9、Text1，然后编写下列程序： Private Sub Form_Load() Text1.Text=“ “ End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) KeyAscii=Asc(Ucase(Char) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后，在文本框中依次输入 1、2、3、a、b、c，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.23BCDB.ABCC.!#ABCD.123abc
10、21.在设计 Visual Basic 应用程序界面时，改变窗体的属性看不到效果的是（分数：2.00）A.LeftB.TopC.VisibleD.BackColor22.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(1 To 3， 1 To 3)， x x=Array(1，2，3，4，5，6，7，8，9) For i=1 To 3 For i-1 To 3 a(i，j)=x(i*j-1) Next j Next i Call sub1(i，j，a() End Sub Private Sub su
11、b1(m，n，t) For m=1 To 3 For n=1 To 3 Print t(m，n)； Next n Print Next m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.1 2 3 2 5 8 3 6 9B.1 2 3 2 4 6 3 6 9C.3 6 9 2 5 8 1 2 3D.3 6 9 2 4 6 1 2 323.一个对象在收到消息时，要予以响应。不同的对象收到同一消息可以产生完全不同的结果，这一现象叫做对象的（分数：2.00）A.继承性B.多态性C.抽象性D.封装性24.工程文件的扩展名是（分数：2.00）AfrmBvbpCbas
12、Dfrx25.为了通过属性窗口将窗体的 controlBox 属性设置为 True(或 False)，下列正确的操作是（分数：2.00）A.直接输入 True(或 FalsB.利用对话框设置属性值C.选择 ControlBox，然后按回车键D.双击 ControlBox 属性条26.为了取消窗体的最大化功能，需要将它的一个属性设置为 False，这个属性是（分数：2.00）A.ControlBoxB.MinButtonC.EnabledD.MaxButton27.当一个工程含有多个窗体时，其中的启动窗体是（分数：2.00）A.启动 Visual Basic 时建立的窗体B.第一个添加的窗体C.
13、最后一个添加的窗体D.在“工程属性”对话框中指定的窗体28.执行语句 s=Len(Mid(“Visual Basic“，1，6)后，s 的值是（分数：2.00）A.VisualB.BasicC.6D.1129.用 FontSize、FontBold、FontItalic、FontStrikethru 和 FontUnderline 属性来设置大小和样式属性前，要先改变的属性是（分数：2.00）A.EnabledB.FontNameC.CheckedD.Visible30.确定一个控件在窗体上的大小的属性是（分数：2.00）A.Width 和 HeightB.Width 或 HeightC.To
14、p 和 LeftD.Top 或 Left31.删除列表框中指定的项目所使用的方法为（分数：2.00）A.MoreB.RemoveC.ClearD.RemoveItem32.阅读下列程序： Dim SW As Boolean Function func(X As Integer)As Integer If X20 Then Y=X Else Y=20+X End If func=Y End Function Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single， Y As Single) SW=Fals
15、e End Sub Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single， Y As Single) SW=True End Sub Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox(“ “) If SW Then Print func(intNum) End If End Sub 程序运行后，单击一次窗体，再单击命令按钮，将显示一个输入对话框，如果在对话框中输入 20，则程序的输出结果为（分数：2.00）A.0B.20C
16、.40D.无任何输出33.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim k As Integer For i=1 To 3 k = i Call sub1(k) m=m + k Next i Print m; i End Sub Private Sub sub1(n As Integer) n = 1 + 2 * n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.1 3B.11 14C.15 4D.4 1534.为了对多个控件执行操作，必须选择这些控件。下列不能
17、选择多个控件的操作是（分数：2.00）A.按住 Alt 键，不要松开，然后单击每个要选择的控件B.按住 Shift 键，不要松开，然后单击每个要选择的控件C.按住 Ctrl 键，不要松开，然后单击每个要选择的控件D.拖动鼠标画出一个虚线矩形，使所选择的控件位于这个矩形内35.DBA 是数据库系统的一个重要组成部分，它有很多职责。以下选项不属于 DBA 职责的是（分数：2.00）A.定义数据库的存储结构和存取策略B.定义数据库的结构C.定期对数据库进行重组和重构D.设计和编写应用系统的程序模块二、B填空题/B(总题数：10，分数：20.00)36.栈中允许进行插入和删除的一端为U 【1】 /U。
18、（分数：2.00）填空项 1:_37.已知一棵含有 n 个结点的树中，只有度为 k 的结点和度为 0 的叶子结点，则该树中含有的叶子结点个数为U 【2】 /U。（分数：2.00）填空项 1:_38.在结构化程序设计的原则中，“先考虑总体，后考虑细节；先考虑全局目标，后考虑局部目标”称为U 【3】 /U原则。（分数：2.00）填空项 1:_39.软件工程研究的内容主要包括：软件开发技术和U 【4】 /U。（分数：2.00）填空项 1:_40.关系模型允许定义 3 类数据约束，它们是U 【5】 /U约束、参照完整性约束以及用户定义的完整性约束。（分数：2.00）填空项 1:_41.假定一个文本框的
19、 Name 属性为 Text1，为了在该文本框中显示“Hello!”，所使用的语句为U 【6】 /U。（分数：2.00）填空项 1:_42.为了使一个标签透明且没有边框，必须将它的 BorderStyle 属性设置为 0，并将U 【7】 /U属性设置为 0。（分数：2.00）填空项 1:_43.以下程序的功能是，从键盘上输入若干数据，统计并输出最大值和最小值，当输入负数时结束输入，请填空。 Dim amax As Single，amin As Single x=InputBox(“请输入数据“) amax=x amin=x Do WhileU 【8】 /U If xamax Then amax
20、=x End If IfU 【9】 /UThen amin=x End If x=InputBox(“请输入数据“) Loop Print “Max=“；amax；“Min=“；amin End Sub（分数：2.00）填空项 1:_44.窗体上有 4 个文本框控件数组 text1()和一个命令按钮，程序运行前如左图所示，程序运行后如右图所示。给定的程序不完整，将程序补充完整。 （分数：2.00）填空项 1:_45.窗体上有一个命令按钮，数据文件 data.txt 的内容如下： “语文“ “2001“, 87 “数学“ “2002“, 75 “英语“ “2003“, 92 “体育“ “2004
21、“, 66 Type bs aa As String * 2 bb As String * 4 cc As Integer End Type Private Sub command1_Click( Dim xs As bs Dim fl As Integer fl = FreeFile Open “d:/data.txt“ For Input As #fl Do While Not EOF(fl) Input #fl, xs. aa, xs .bb, xs.cc List1.AddItem xs.bb List1.AddItem xs.aa List1.AddItem xs.cc Loop P
22、rint EOF(fl) Close End Sub 问：在列表框中第一行、第三行、第四行的内容是U 【12】 /U、U 【13】 /U、U 【14】 /U。窗体上打印出的是U 【15】 /U。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试 77 答案解析(总分：90.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.在结构化方法的软件需求分析中，可采用分析工具来辅助完成。下列工具中，常用需求分析工具的是 数据流图 结构图 数据字典 判定表（分数：2.00）A.和B.、和C.、和D.、和 解析：分析 结构化分析的常用工具有数据流图、数据字典
23、、判定树和判定表。结构图是软件结构设计工具。2.链式栈与顺序栈相比，一个比较明显的优点是（分数：2.00）A.插入操作更加方便B.通常不会出现栈满的情况 C.通常不会出现栈空的情况D.删除操作更加方便解析：分析 链式栈是通过链表来实现栈的，结点空间是动态生成的，因此只要能在内存申请空间就不会出现栈满的情况。3.检查软件产品是否符合需求定义的过程称为（分数：2.00）A.系统测试B.集成测试C.验收测试 D.单元测试解析：分析 单元测试的目的是发现各模块内部可能存在的各种错误：集成测试是测试和组装软件的过程；系统测试的目的是在真实的系统工作环境下检验软件是否能与系统正确连接，发现软件与系统需求不
24、一致的地方。因此选项 A、B、D 都不是所需答案。验收测试(也叫确认测试)的任务是验证软件的功能和性能及其他特性是否满足了需求规格说明中确定的各种需求，以及软件配置是否完全、正确。因此选项 C 是正确答案。4.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub sub1(p，m，n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x，y+1，(z) Print x；y；z End S
25、ub 程序运行后，单击命令按钮，则窗体上第二行显示的内容是（分数：2.00）A.7 6 3B.7 4 2 C.6 4 2D.4 6 3解析：分析 本题考察的是函数过程的调用和参数传送。当发生了 Command1 的单击事件时，调用函数过程 sub1，虽然 sub1 函数过程在定义时 3 个参数都被定义成传址方式传送，但在调用时只有第 1 个参数是变量，按引用传送，其他两个参数均按传值传送。参数传送后，进入 subl 函数过程执行，p、m 和 n 均加1 分别得到的值为 7、 6 和 3。函数过程调用返回后，只有 x 的值发生了变化，变为 7，y 和 z 的值仍为 4和 2。5.在窗体上画一个命
26、令按钮，然后编写如下事件过程： Private Sub Command1_Click() a=InputBox(“请输入一个整数“) b=InputBox(“请输入一个整数“) Print a+b End Sub 程序运行后，单击命令按钮，在输入对话框中分别输入 37 和 18，输出结果为（分数：2.00）A.3718 B.55C.0D.a+b解析：分析 InputBox 函数能产生一个对话框，并显示提示，等待用户输入内容或按下按钮，并返回包含文本框内容的字符串。在此题中，变量 a 和 b 都是变体型变量，InputBox 函数返回的分别是“37”和“18”。“+”运算符除了计算数值的和以外，
27、在对字符串操作时，也可以用来做字符串的连接操作。输出的结果为“3718”。6.以下语句的输出结果是 Print Format$(32548.5，“000，00000“)（分数：2.00）A.32548.5B.32，548.5C.032，548.50 D.32，548.50解析：分析 在使用 Format$函数使数值按“格式字符串”指定的格式输出时，符号“#”和“0”都用于数字，其个数决定了显示区段的长度。如果要显示的数值位数小于格式字符串指定的区段长度，则该数值靠区段的左端显示，但这两个功能的区别在于，“#”显示的多余位不补 0，“0”显示的多余位以 0 补齐。7.下列不正确的语句是（分数：2
28、.00）A.Print a=10+20B.Print “a=“；10+20C.Print “a“=“10+20“D.Print a=；10+20 解析：分析 Print 方法的输出项是一个表达式，包括算术表达式(字符串表达式)、关系表达式和逻辑表达式。在所给出的选择中，A 是用 Print 方法输出一个关系表达式的值，比较两个算术表达式的值是否相等；B 是用 Print 输出一个字符串和一个算术表达式的值，其中字符串照原样输出，然后计算并输出算术表达式的值：C 是用 Print 方法输出一个关系表达式的值，比较两个字符串是否相等，这几个语句都是正确的，可以输出正确的结果，而 D 会产生语法错误
29、。8.下面关于数据逻辑结构的叙述中，正确的是（分数：2.00）A.数据的逻辑结构是数据间关系的描述 B.数据的逻辑结构反映了数据在计算机中的存储方式C.数据的逻辑结构分为顺序结构和链式结构D.数据的逻辑结构分为静态结构和动态结构解析：分析 数据的逻辑结构抽象地反映数据元素之间的逻辑关系，即数据元素之间的前后件关系，而不管它在计算机中的存储表示形式。根据数据结构中各数据元素之间前后件关系的复杂程度，一般将数据结构分为两大类：线性结构与非线性结构。9.在窗体上画两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(其 Name 属性为 Command1)，然后编写如下事
30、件过程： Private Sub Command1_Click() X=0 Do While x 50 x = (x + 2) * (x + 3) n = n + 1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为（分数：2.00）A.1 和 0B.2 和 72 C.3 和 50D.4 和 168解析：分析 本例使用 Do WhileLoop 语句来计算结果 x 和循环次数 n：第 1 次循环 x=6，n=1；第 2 次循环，x=72，n=2。Str(Number)函数的返回值是一个代表数
31、字的字符串变量，最后将 n 和 x 的值分别在文本框中显示出来。10.对序列中的元素通过适当的位置交换将有关元素一次性地放置在其最终位置上，这种排序方法是（分数：2.00）A.希尔排序B.插入排序C.快速排序 D.选择排序解析：分析 快速排序的基本思想是：通过一趟排序将待排序记录分割成独立的两部分，其中一部分记录的关键字均比另一部分记录的关键字小，再分别对这两部分记录继续进行排序，以达到整个序列有序。也就是说，一趟快速排序是将序列中的元素通过适当的位置交换将有关元素一次性地放置在其最终位置上。11.在窗体上有一个文本框控件，名称为 TxtTime；一个计时器控件，名称为 Timer1。为了使得
32、每一秒钟在文本框中显示一次当前的时间，应将 Interval 属性值设置为（分数：2.00）A.1)B.10C.100D.1000 解析：分析 Interval 属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为 065535，因此其最大时间间隔不能超过 65 秒。60000 毫秒为 1 分钟，如果将 Interval 属性设置为 1000，则表明每秒钟发生一个计时器事件。如果希望每秒产生 n 个事件，则属性 Interval 的值为 1000/n。12.如果将文本框的 Locked 属性设置为 Tree，则以下说法正确的是（分数：2.00）A.此时在属性窗口不可以修改文本框的 Tex
33、t 属性值B.运行时用户不可以在界面上修改文本框中的内容 C.在程序代码中不可以修改文本框的内容，如不可以使用语句 Text1.Text=“aa“D.以上均不正确解析：分析 文本框的 Locked 属性设置为 True 后，可以在程序运行过程中使用代码来改变 Text 属性，而用户不能直接在文本框中修改。13.在一个长度为 n 的顺序表中，删除第 i(1in)个元素时，需要移动的元素个数为（分数：2.00）A.n-i+1B.n-i C.iD.i-1解析：分析 在一个长度为 n 的顺序表中，删除一个元素时，有 n 个位置可供选择。需要改变从第 i+1个元素起到第 n 个元素的存储位置，即进行“从
34、第 i+1 到第 n 个元素往前移动一个位置”的操作，共需移动 n-i 个元素。14.在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub 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.40123 B.163C.1
35、23D.30123解析：分析 当双击列表框的第四行，对应的 Text 值是 40 而不是 123。另外，ListBox 和 TextBox 的Text 属性返回的均为字符型数据。窗体上显示的是列表框的内容与文本框的内容连接以后的内容，即为40123。15.某二叉树前序遍历结点的访问顺序是 abdgcefh，中序遍历结点的访问顺序是 dgbaechf,则后序遍历结点的访问顺序是（分数：2.00）A.bdgcefha B.gdbecfhaC.bdgaechfD.gdbehfca解析：分析 由二叉树前序遍历序列和中序遍历序列可以唯一确定一棵二叉树。16.设计数据库的存储结构属于数据库的（分数：2.0
36、0）A.需求分析B.概念设计C.逻辑设计D.物理设计 解析：分析 物理设计阶段主要解决选择文件存储结构和确定文件存取方法的问题，包括：选择存储结构、确定存取方法、选择存取路径、确定数据的存放位置。17.执行下面的语句后，产生的信息框标题是 a=MsgBox(“AAAA“，“BBBB“，“ “，5)（分数：2.00）A.BBBB B.空C.AAAAD.出错，不能产生信息框解析：分析 MsgBox 函数格式为： MsgBox(Msg$，type%)，title$， helpfile，context) Msg$是一个字符串；type 是一个整数值或符号常量；title 是一个字符串，用来显示对话框的
37、标题： helpfile 是一个字符串变量或字符串表达式，用来表示帮助文件的名字；context 是一个数值变量或表达式，用来表示相关帮助主题的帮助目录号。该题中信息框的标题是“BBBB”。注意第 2 项和第 3 项参数之间的逗号不能省略。18.为了能将信息直接送往打印机，应该将 Print 方法的对象改为（分数：2.00）A.PictureBoxB.FormC.ImageD.Printer 解析：分析 直接输出就是将信息直接送往打印机，所使用的仍是 Print 方法，只是将 Print 方法的对象改为 Printer，其格式为： Printer.Print表达式表 Print 属性返回一个
38、Printer 对象，该对象允许跟一个系统打印机(最初是默认的系统打印机)进行通信。19.使文本框获得焦点的方法是（分数：2.00）A.ChangeB.GotfocusC.SetFocus D.LostFocus解析：分析 SetFocus 方法将焦点移至指定的控件或窗体。焦点只能移到可视的窗体或控件上。20.在窗体上添加文本框 Text1，然后编写下列程序： Private Sub Form_Load() Text1.Text=“ “ End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) Ke
39、yAscii=Asc(Ucase(Char) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后，在文本框中依次输入 1、2、3、a、b、c，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.23BCD B.ABCC.!#ABCD.123abc解析：分析 在向文本框中依次输入 1、2、3、a、 b、c 的同时，Text1_KeyPress 过程分别接收到的是KeyAscii(各字符的 ASCII 码)，Chr 函数将加过 1 的 ASCII 码转换成字符，UCase 函数将字符转换成大写字符，数字保持不变
40、，Asc 函数又将字符转换成 ASCII 码，最后出现选项 A 的字符。21.在设计 Visual Basic 应用程序界面时，改变窗体的属性看不到效果的是（分数：2.00）A.LeftB.TopC.Visible D.BackColor解析：分析 在设计 Visual Basic 应用程序界面时，改变窗体的 Visible 属性是看不到效果的，只是在程序运行后，屏幕上没有窗体出现。22.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(1 To 3， 1 To 3)， x x=Array(1，2，
41、3，4，5，6，7，8，9) For i=1 To 3 For i-1 To 3 a(i，j)=x(i*j-1) Next j Next i Call sub1(i，j，a() End Sub Private Sub sub1(m，n，t) For m=1 To 3 For n=1 To 3 Print t(m，n)； Next n Print Next m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.1 2 3 2 5 8 3 6 9B.1 2 3 2 4 6 3 6 9 C.3 6 9 2 5 8 1 2 3D.3 6 9 2 4 6 1 2 3解析
42、：分析 本题程序的主要功能是将一维数组部分元素读入到二维数组然后调用函数输出，注意语句a(i，j)-x(i*j-1)，结果是 d(i，j)和。(j，i)的值相同，而不是顺序地将一维数组读入到二维数组。23.一个对象在收到消息时，要予以响应。不同的对象收到同一消息可以产生完全不同的结果，这一现象叫做对象的（分数：2.00）A.继承性B.多态性 C.抽象性D.封装性解析：分析 对象根据所接收的消息而做出动作，同样的消息被不同的对象接收时可导致完全不同的行为，该现象称为对象的多态性。24.工程文件的扩展名是（分数：2.00）AfrmBvbp CbasDfrx解析：分析 Visual Basic 应用
43、程序可以用 4 种类型的文件保存。一类是单独的窗体文件，扩展名为.frm;一类是公用的标准模块文件，扩展名为.bas；第三类是类模块文件，扩展名为.cls；第四类是工程文件，这种文件由若干个窗体和模块组成，扩展名为.vbp。25.为了通过属性窗口将窗体的 controlBox 属性设置为 True(或 False)，下列正确的操作是（分数：2.00）A.直接输入 True(或 FalsB.利用对话框设置属性值C.选择 ControlBox，然后按回车键D.双击 ControlBox 属性条 解析：分析 ControlBox 属性是一个逻辑值，其取值只有两种，即 True 和 False，一般可
44、以通过选择输入，即单击属性条右端的箭头，下拉后显示属性值 True 和 False，从中选择所需要的值。在上面给出的答案中，前 3 个答案都不能实现所要求的操作，只有选项 D 才能实现。实际上，对于只有两种可能取值(True 或 False、0 或 1)的属性，都可以通过双击属性条设置。26.为了取消窗体的最大化功能，需要将它的一个属性设置为 False，这个属性是（分数：2.00）A.ControlBoxB.MinButtonC.EnabledD.MaxButton 解析：分析 MaxButton、MinButton 两个属性用来显示窗体右上角的最大、最小化按钮。如果希望显示最大和最小化按钮
45、，则应将两个属性设置为 True，这两个属性只在运行期间起作用。在设计阶段，这两项设置不起作用，因此，即使将 MaxButton 属性和 MinButton 属性设置为 False，最大、最小化按钮也不会消失。如果 BorderStyle 属性被设置为“0-None”，则这两个属性将被忽略。27.当一个工程含有多个窗体时，其中的启动窗体是（分数：2.00）A.启动 Visual Basic 时建立的窗体B.第一个添加的窗体C.最后一个添加的窗体D.在“工程属性”对话框中指定的窗体 解析：分析 对于多窗体程序，只有一个窗体为启动窗体。如果没有特别指定启动窗体，则启动窗体为创建 Visual Ba
46、sic 程序时建立的第一个窗体，也可以通过“工程”菜单的“工程属性”窗口指定启动窗体。显然，C 不是正确答案。选项 B 中所提到的窗体是第一个添加的窗体，而不是建立工程文件时建立的第一个窗体。28.执行语句 s=Len(Mid(“Visual Basic“，1，6)后，s 的值是（分数：2.00）A.VisualB.BasicC.6 D.11解析：分析 中部截取函数 Mid(字符串，p，n)的作用是：从“字符串”的第 p 个字符开始，向后截取n 个字符。字符串长度测试函数 Len(字符串)的作用是：测试“字符串”的长度。Mid(“Visual Basic“，1，6)的计算结果为“Visual”
47、， Len(“Visual“)的计算结果为 6。29.用 FontSize、FontBold、FontItalic、FontStrikethru 和 FontUnderline 属性来设置大小和样式属性前，要先改变的属性是（分数：2.00）A.EnabledB.FontName C.CheckedD.Visible解析：分析 用 FontSize、FontBold、FontItalic、 FontStrikethru 和 FontUnderline 属性来设置大小和样式属性前，要先改变 FontName 属性。30.确定一个控件在窗体上的大小的属性是（分数：2.00）A.Width 和 Hei
48、ght B.Width 或 HeightC.Top 和 LeftD.Top 或 Left解析：分析 Height 和 Width(高、宽)属性用来指定窗体的高度和宽度，其单位为 twip。31.删除列表框中指定的项目所使用的方法为（分数：2.00）A.MoreB.RemoveC.ClearD.RemoveItem 解析：分析 为了删除列表框中指定的项目，可以使用 RemoveItem 方法，其格式为： 列表框名称.RemoveItem 索引值 其中“索引值”是项目的地址，列表框中的项目从 0 开始计数，被选择的项目索引值就是列表框的 ListIndex 属性。32.阅读下列程序： Dim SW As Boolean Function func(X As Integer)As Integer If X20 Then Y=X Else Y=20+X End If func=Y End Function Private Sub Form_MouseDown(Butto
