【计算机类职业资格】二级VISUAL+BASIC笔试-52及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC笔试-52及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-52及答案解析.doc（24页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 笔试-52 及答案解析(总分：92.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.下列叙述中正确的是( )。（分数：2.00）A.在模块化程序设计中，一个模块应该尽量多的包括与其他模块联系的信息B.在自顶向下、逐步细化的设计过程中，首先应设计解决问题的第一个细节C.在模块化程序设计中，一个模块内部的控制结构也要符合结构化原则D.在程序设计过程中，不能同时采用结构化程序设计方法与模块化程序设计方法2.下列不属于软件工程 3 个要素的是( )。（分数：2.00）A.工具B.过程C.方法D.环境3.下列程序执行后，变量 x 的值为( )。

2、Dim a，b，c，d As SingleDim x As Singlea=10b=30c=400If ba Thend=a：a=b：b=dEnd IfIf bc Thenx=bElse If ac Thenx=cElsex=aEnd If（分数：2.00）A.10B.30C.400D.4304.有下列二叉树，对此二叉树中序遍历的结果为( )。（分数：2.00）A.B.C.D.5.下列叙述中错误的是( )。（分数：2.00）A.一种数据的逻辑结构可以有多种存储结构B.数据的存储结构与数据的处理效率无关C.数据的存储结构与数据的处理效率密切相关D.数据的存储结构在计算机中所占的空间不一定是连续的

3、6.要清除已经在图片框 Picturel 中打印的字符串而不清除图片框中的图像，应使用语句( )。（分数：2.00）A.Picturel.ClsB.Picturel.Picture=LoadPicmre(“)C.Picturel.Pint“D.Picturel.Picture“7.在随机文件中使用用户自定义数据类型时，要注意它的成员的要求，它的成员不能是( )。（分数：2.00）A.定长字符串和数组B.变长字符串和动态数组C.货币型和日期型D.变长字符串和货币型8.下列程序段的输出结果为( )。Dim M(5，5)，S(5)For i=1 To 5S(i)=0For j=1 To 5M(i，j

4、)=i+jS(i)=S(i)+M(i，j)Next jNext iFor Each x In SPrint x；Next x（分数：2.00）A.20 23 24 35 40B.20 25 30 35 40C.20 23 25 35 40D.20 25 35 40 459.设计软件结构是在软件生命周期的( )。（分数：2.00）A.软件定义期B.软件开发期C.软件维护期D.以上 3 个都不是10.在窗体上画 4 个文本框，并用这 4 个文本框建立一个控件数组，名称为 Text1(下标从 0 开始，自左至右顺序增大)，然后编写如下事件过程：Private Sub Command1_Click()

5、For Each Text Box In Text1Text1(i)=Text1(i).Indexi=i+1NextEnd Sub程序运行后，单击命令按钮，4 个文本框中显示的内容分别为( )。（分数：2.00）A.0 1 2 3B.1 2 34C.0 1 3 2D.出错信息11.窗体上有两个文本框 Text1、Text2 以及一个命令按钮 Command1，编写下列程序：Dim y As IntegerPrivate Sub Command1_Click()Dim x As Integerx=2Text1.Text=p2(p1(x)，y)Text2.Text=p1(x)End SubPriv

6、ate Function p1(x As Integer)As Integerx=x+y：y=x+yp1=x+yEnd FunctionPrivate Function p2(x As Integer, y As Integer)As Integerp2=2*x+yEnd Function当单击 1 次和单击 2 次命令按钮后，文本框 Text1 和 Text2 内的值分别为( )。（分数：2.00）A.2 42 4B.2 44 8C.4 48 8D.10 1058 5812.Visual Basic 根据计算机访问文件的方式将文件分成 3 类，其中不包括( )。（分数：2.00）A.顺序文件

7、B.Unix 文件C.二进制文件D.随机文件13.下列叙述中错误的是( )。（分数：2.00）A.线性表是由 n 个元素组成的一个有限序列B.线性表是一种线性结构C.线性表的所有结点有且仅有一个前件和后件D.线性表可以是空表14.设“A=“87654321“”，则表达式 Val(Left(A，4)+Mid(A，4，2)的值为( )。（分数：2.00）A.876543B.876554C.8D.615.在窗体上有文本框 Text1 和命令按钮 Command1，并有如下事件过程：Private Sub Command1_Click()Dim i As Integer，n As IntegerFor

8、 i=0 To 50i=i+3n=n+1If i10 Then Exit ForNextText1.Text=Str(n)End Sub单击命令按钮，程序运行后，在文本框中显示的值是( )。（分数：2.00）A.2B.3C.4D.516.语句 Y=Y+1 的正确含义是( )。（分数：2.00）A.变量 Y 的值与 Y+1 的值相等B.将变量 Y 的值存到 Y+1 中去C.将变量 Y 的值加 1 后赋值给变量 YD.变量 Y 的值为 117.( )属性用于设置组合框的风格。（分数：2.00）A.BackstyleB.BorderstyleC.StyleD.Sorted18.下列程序的输出图形是(

9、 )。For k=0 To 360cr=Int(160 * Rnd)ang=-3.1415926/180*kCircle(2000，2000)，500，cr,0，angNext（分数：2.00）A.一段彩色圆弧B.一个彩色扇形C.一个彩色空心圆D.一个辐射状彩色圆形19.下列程序的功能是：调用字体对话框来设置文本框中的字体，单击 Command1 按钮弹出对话框，进行相应的字体、字号等的设置，然后单击。“确定”按钮退出对话框，则将发生哪些变化( )。Private Sub Command1_Click()CommonDialogl.CancelError=TrueCommonDialogl.F

10、lags=3On Error Resume NextCommonDialogl.ShowFontTextl.Font.Name=CommonDialogl.FontNameTextl.Font.Size=CommonDialogl.FontSizeTextl.Font.Bold=CommonDialogl.FontBoldTextl.Font.Italic=CommonDialogl.FontItalicTextl.Font.Underline=CommonDialogl.FontUnderlineTextl.FontStrikethru=CommonDialogl.FontStrikethr

11、uTextl.ForeColor=CommonDialogl.ColorEnd Sub（分数：2.00）A.Text1 的字体不发生变化B.Text1 的字体发生变化C.Text1 的字体和颜色发生变化D.程序出错20.在窗体上放置一个命令按钮 Command1，并编写下列单击事件的程序：Option Base 1Private Sub Command1_Click()Dim c As Integer,d As Integerd=0c=6X=Array(2，4，6，8，10，12)For i=1 To 6If X(i)c Thend=d+X(i)c=X(i)Elsed=d-cEnd IfNex

12、t iPrint dEnd Sub程序运行后，单击命令按钮，则在窗体上输出的结果为( )。（分数：2.00）A.10B.12C.16D.2021.在窗体中放置控件，对该控件的操作错误的是( )。（分数：2.00）A.单击窗体上没有控件处，可把活动控件变为不活动控件B.双击任一个控件内部，可激活该控件的代码窗口C.双击一个控件内部，可把活动控件变为不活动控件D.拖动一个活动控件四周的控制小方块可缩放控件22.下列工具中为需求分析常用工具的是( )。（分数：2.00）A.PADB.PFDC.N-SD.DFD23.下列程序的运行结果是( )。Private Function myfun(m，n)Do

13、 While mnDo While mn:m=m-n:LoopDo While nm:n=n-m:LoopLoopmyfun=mEnd FunctionPrivate Sub Command1_Click()Print myfun(9，8)End Sub（分数：2.00）A.2B.1C.4D.324.下列特征中不是面向对象方法的主要特征的是( )。（分数：2.00）A.多态性B.继承C.封装性D.模块化25.Sub 过程与 Function 过程最根本的区别是( )。（分数：2.00）A.Sub 过程可以使用 Call 语句或直接使用过程名调用，而 Function 过程不可以B.Functi

14、on 过程可以有参数，Sub 过程不能有参数C.两种过程参数的传递方式不同D.Sub 过程的过程名不能有返回值，而 Function 过程能通过过程名返回值26.下列关于栈的描述中错误的是( )。（分数：2.00）A.栈是先进先出的线性表B.栈只能顺序存储C.栈具有记忆作用D.对栈的插入与删除操作中，不需要改变栈底指针27.在文本框控件中，将 Text 的内容全部显示为用户所定义的字符的属性是( )。（分数：2.00）A.PasswordCharB.需要编程来实现C.PasswordD.以上都不是28.某程序列表框中有许多项，现在用 Timer 控件控制时间，0.1 秒删除一项，直到删完为止，

15、用一滚动条来显示删除的项目，请选择合适的语句，完成此程序( )。（分数：2.00）A.B.C.D.29.下列程序的功能是：将数据 1，2，8 写入顺序文件 Num.txt 中，请选择正确的程序段。Private Sub Form_Click()Dim i As IntegerOpen “Num.txt“ For Output As #1For i=1 To 8Next iClose #1End Sub（分数：2.00）A.print #1，iB.input #1，iC.print #1D.input #130.在窗体上有一个文本框 Text1，Text 属性值为空，然后编写如下事件过程：Pri

16、vate Sub Text1_KeyPress(KeyAscii As Integer)Dim str As String，n As Integerstr=UCase(Chr(KeyAscii)n=Len(str)Text1.Text=String(n，str)End Sub程序运行后，若在文本框中输入单字母“p”，则在文本框 Text1 中显示的内容为( )。（分数：2.00）A.ppB.pPC.PPD.Pp31.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为( )。（分数：2.00）A.E*Sin(30*3.14/180)*2*X/X+Y

17、*Log(X)B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X)C.Exp(x)*Sin(30*3.14/180)*2*x/(x+y)*Log(x)D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(X)32.下列叙述正确的是( )。（分数：2.00）A.任何时候都可以使用标准工具栏中的“菜单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器C.只有当窗体设计窗口为当前活动窗体时，才能打开菜单编辑器D.任何时候都可以使用“工具”菜单中的“菜单编辑器”命令，打开菜单编辑器33.有下列程序段，单击命令按钮执行程序后，输出结果为(

18、 )。Option Base 1Private Sub Command1_Click()Dim xx=Array(23，-5，17，38，-31，46，11，8，5，-4)s1=0s2=0For k=1 To 10If(x(k)0)Thens1=s1+x(k)Elses2=s2+x(k)End IfNext kY=s1/Abs(s2)Print YEnd Sub（分数：2.00）A.148B.40C.-40D.3.734.下列控件属性中，属性值的类型不相同的一项是( )。（分数：2.00）A.Label 控件的 Enabled 属性与 TextBox 控件的 Enabled 属性B.Optio

19、nButton 控件的 Value 属性与 CheckBox 控件的 Value 属性C.Command 控件的 Default 属性与 Command 控件的 Cancel 属性D.Command 控件的 Visible 属性与 Form 控件的 Visible 属性35.对长度为 n 的线性表进行顺序查找，在最坏情况下需要比较的次数为( )。（分数：2.00）A.125B.n/2C.nD.n+1二、填空题(总题数：11，分数：22.00)36.算法的复杂度主要包括时间复杂度和 1 复杂度。（分数：2.00）填空项 1:_37.按照逻辑结构分类，结构可以分为线性结构和非线性结构，栈属于 1。

20、（分数：2.00）填空项 1:_38.树中度为零的结点称为 1。（分数：2.00）填空项 1:_39.在面向对象方法中，类之间共享属性和方法的机制称为 1。（分数：2.00）填空项 1:_40.软件是程序、数据和 1 的集合。（分数：2.00）填空项 1:_41.表达式 Len(Str(1.3)Mod 2 的值为_。（分数：2.00）填空项 1:_42.下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以 4 余 1，除以 5 余 2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。Private Sub Commandl_Click()

21、x=Val(Textl.Text)If_ThenPrint xElse_Textl.Text=“End IfEnd Sub（分数：2.00）填空项 1:_43.在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框 List2 中所有列表项目移入列表框 List1 中，并将移入 List1 中的项目从 List2 中删除。Do While List2.ListCount_List 2.RemoveItem 0 Loop（分数：2.00）填空项 1:_44.滚动条的最小值属性是_，最大值属性是_。（分数：2.00）填空项 1:_45.假设有以下程序段：For i=1 To 3For j=

22、5 To 1 Step -1Print i*jNext jNext i则语句 Print i*j 的执行次数是_，i 的值为_，j 的值为_。（分数：2.00）填空项 1:_46.下列是一个体操评分程序。设满分为 10 分，20 位评委，除去一个最高分和一个最低分，计算平均分。Private Sub Commandl_Click()Max=0Min=10For i=1 To 20n=Val(InputBox(“请输入分数“)If nMax Then Max=nIf nMin Then Min=ns=s+n_s=s-Min-Maxp=s/18Print “最高分“；Max；“最低分“；MinPr

23、int “最后得分：“；pEnd Sub（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-52 答案解析(总分：92.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.下列叙述中正确的是( )。（分数：2.00）A.在模块化程序设计中，一个模块应该尽量多的包括与其他模块联系的信息B.在自顶向下、逐步细化的设计过程中，首先应设计解决问题的第一个细节C.在模块化程序设计中，一个模块内部的控制结构也要符合结构化原则 D.在程序设计过程中，不能同时采用结构化程序设计方法与模块化程序设计方法解析：解析 在模块化程序设计中，模块之间的联系可以通过程序的控制结构

24、来实现，在自顶向下、逐步细化的设计过程中，首先要考虑全局目标，而不是细节。在程序设计中模块化和结构化可以同时使用，一个模块的内部结构也要符合结构化设计原则。2.下列不属于软件工程 3 个要素的是( )。（分数：2.00）A.工具B.过程C.方法D.环境 解析：解析 软件工程包括 3 个要素，即方法、工具和过程。方法是完成软件工程项目的技术手段；工具支持软件的开发、管理和文档生成；过程支持软件开发的各个环节的控制、管理。3.下列程序执行后，变量 x 的值为( )。Dim a，b，c，d As SingleDim x As Singlea=10b=30c=400If ba Thend=a：a=b：

25、b=dEnd IfIf bc Thenx=bElse If ac Thenx=cElsex=aEnd If（分数：2.00）A.10B.30 C.400D.430解析：解析 程序操作过程如下：程序首先执行 If ba Then 语句，条件为真执行 d=a：a=b：b=d 语句，执行后 d=10，a=30，b=10；然后执行 If bc Then 语句，条件不成立，因此执行 ElseIf ac Then 语句；条件不成立，因此执行Else 后面的 x=a 语句，执行后 x=30。4.有下列二叉树，对此二叉树中序遍历的结果为( )。（分数：2.00）A.B. C.D.解析：解析 对二叉树的中序遍历

26、是指：首先遍历左子树，然后访问根结点，最后遍历右子树。在遍历左、右子树时，注意依旧按照“左子树一根结点一右子树”的顺序。本题的遍历顺序是这样的：首先访问左子树：BDEY；在左子树 BDEY 中，也按中序遍历，先访问左子树 DY：在左子树 DY 中，也按中序遍历，先访问左子树，左子树没有，则访问根结点 D，然后访问右子树 Y；接着访问根 B，再访问右子树E；访问左子树 BDEY 后，接着访问根结点 A，然后访问右子树 CFXZ；同理可得右子树 CFXZ 的访问顺序为 FCZX。5.下列叙述中错误的是( )。（分数：2.00）A.一种数据的逻辑结构可以有多种存储结构B.数据的存储结构与数据的处理效

27、率无关 C.数据的存储结构与数据的处理效率密切相关D.数据的存储结构在计算机中所占的空间不一定是连续的解析：解析 数据的存储结构分为顺序结构和链式结构，一个数据的逻辑结构可以有多种存储结构。顺序结构中数据元素所占的存储空间是连续的，而链式存储结构中，数据元素所占的存储空间不一定是连续的。数据的存储结构与数据的处理效率密切相关。6.要清除已经在图片框 Picturel 中打印的字符串而不清除图片框中的图像，应使用语句( )。（分数：2.00）A.Picturel.Cls B.Picturel.Picture=LoadPicmre(“)C.Picturel.Pint“D.Picturel.Pict

28、ure“解析：解析 Cls 将清除打印语句在运行时所产生的文本，而清除图片应使用的语句为Picturel.Picture=LoadPicture()。7.在随机文件中使用用户自定义数据类型时，要注意它的成员的要求，它的成员不能是( )。（分数：2.00）A.定长字符串和数组B.变长字符串和动态数组 C.货币型和日期型D.变长字符串和货币型解析：解析 用户自定义的类型中，成员可以是任何基本数据类型，也可以是用户定义的类型。但要注意的是，在记录数据类型中的元素可以是变长字符串，也可以是定长字符串。当在随机文件中使用时，必须使用定长字符串；记录类型中不能使用动态数组。8.下列程序段的输出结果为( )

29、。Dim M(5，5)，S(5)For i=1 To 5S(i)=0For j=1 To 5M(i，j)=i+jS(i)=S(i)+M(i，j)Next jNext iFor Each x In SPrint x；Next x（分数：2.00）A.20 23 24 35 40B.20 25 30 35 40 C.20 23 25 35 40D.20 25 35 40 45解析：解析 程序的执行过程如下：当 i=1 时，j=1，M(1，1)=i+j=2，S(1)=S(1)+M(1，1)=2；当 j=2 时，M(1，2)=i+j=3，S(1)=S(1)+M(1，2)=5；当 j=3 时，M(1，3

30、)=i+ j=4，S(1)=S(1)+M(1，3)=9；当 j=4 时，M(1，4)=i+j=5；S(1)=S(1) +M(1，4)=14；当 j=5 时，M(1，5)=i+j=6，S(1)=S(1)+M(1，5)=20。依次类推，最后 S 数组元素的值为：S(1)=20，S(2)=25，S(3)=30， S(4)=35，S(5)=40。9.设计软件结构是在软件生命周期的( )。（分数：2.00）A.软件定义期B.软件开发期 C.软件维护期D.以上 3 个都不是解析：解析 设计软件结构，是在软件概要设计阶段进行的，而概要设计属于软件开发期。10.在窗体上画 4 个文本框，并用这 4 个文本框建

31、立一个控件数组，名称为 Text1(下标从 0 开始，自左至右顺序增大)，然后编写如下事件过程：Private Sub Command1_Click()For Each Text Box In Text1Text1(i)=Text1(i).Indexi=i+1NextEnd Sub程序运行后，单击命令按钮，4 个文本框中显示的内容分别为( )。（分数：2.00）A.0 1 2 3 B.1 2 34C.0 1 3 2D.出错信息解析：解析 数组控件的 Index 属性默认从 0 开始，因此这 4 个文本框的 Index 值分别为 0、1、2、3。题中通过 For Each 循环，依次将每个文本框

32、的 Index 属性值赋给它自己的 Text 属性，因此，运行程序后，文本框显示的内容为 0、1、2、3。11.窗体上有两个文本框 Text1、Text2 以及一个命令按钮 Command1，编写下列程序：Dim y As IntegerPrivate Sub Command1_Click()Dim x As Integerx=2Text1.Text=p2(p1(x)，y)Text2.Text=p1(x)End SubPrivate Function p1(x As Integer)As Integerx=x+y：y=x+yp1=x+yEnd FunctionPrivate Function

33、p2(x As Integer, y As Integer)As Integerp2=2*x+yEnd Function当单击 1 次和单击 2 次命令按钮后，文本框 Text1 和 Text2 内的值分别为( )。（分数：2.00）A.2 42 4B.2 44 8C.4 48 8D.10 1058 58 解析：解析 程序中 y 为窗体变量，其作用范围为整个窗体中的所有子过程，要注意区分与作为 p1、p2形式参数的 y 变量。窗体变量 y 能够记录程序运行中对其的改变，第 1 次调用 p1，y 值为 2；第 2 次调用 p1，y 值为 6；第 3次调用 p1，y 值为 14；第 4 次调用 p

34、1，y 值为 36；所以计算出的函数 p1、p2 的返回值也会不同。12.Visual Basic 根据计算机访问文件的方式将文件分成 3 类，其中不包括( )。（分数：2.00）A.顺序文件B.Unix 文件 C.二进制文件D.随机文件解析：解析 访问文件时应根据文件包括的数据类型，来使用合适的文件访问类型。文件访问类型有 3种：顺序型，适用于读写在连续块中的文本文件：随机型，适用于读写有固定长度记录结构的文本文件或者二进制文件；二进制型，适用于读写任意有结构的文件。13.下列叙述中错误的是( )。（分数：2.00）A.线性表是由 n 个元素组成的一个有限序列B.线性表是一种线性结构C.线性

35、表的所有结点有且仅有一个前件和后件 D.线性表可以是空表解析：解析 线性表是一种线性结构，由 n(n0)个元素组成，所以线性表可以是空表。但是在线性表中，第一个结点没有前件，最后一个结点没有后件，其他结点有且只有一个前件和后件，所以 C 是错误的。14.设“A=“87654321“”，则表达式 Val(Left(A，4)+Mid(A，4，2)的值为( )。（分数：2.00）A.876543B.876554 C.8D.6解析：解析 Left(string,length)函数是字符串截取函数。功能是截取某字符串最左边的“length”个字符，这里截取字符串为“8765”。 Val(string)函

36、数用于返回字符串中所含的数值，这里“8765”返回的数值为“8765”。Mid(Str,p,n)函数是字符截取函数，功能是截取从第 p 个字符开始，向后取字符串的n 个“Str”字符串中的字符。这里 Mid(A,4,2)为截取字符串“54”。“+”做字符串连接，这里将“8765”和“54”进行相连接运算。15.在窗体上有文本框 Text1 和命令按钮 Command1，并有如下事件过程：Private Sub Command1_Click()Dim i As Integer，n As IntegerFor i=0 To 50i=i+3n=n+1If i10 Then Exit ForNextT

37、ext1.Text=Str(n)End Sub单击命令按钮，程序运行后，在文本框中显示的值是( )。（分数：2.00）A.2B.3C.4 D.5解析：解析 For 循环是指定循环次数的循环，但是有时候可能需要在循环变量到达终值前退出循环，这可以使用 Exit For 语句来实现。在一个 For 循环中，可以含有一个或多个 Exit For 语句，并且它可以出现在循环体的任何位置。本题中，当 i 大于 10 的时候，就退出 For 循环，不管循环变量 j 是否达到终值 50。程序执行过程如下：第 1 次循环，即 j=0 时：i=3，n=1：第 2 次循环，即 j=1 时：i=6， n=2：第 3

38、 次循环，即 j=2 时：i=9，n=3：第 4 次循环，即 j=3 时：i=12， n=4：此时 i10 成立，执行 Exit For 语句退出循环。16.语句 Y=Y+1 的正确含义是( )。（分数：2.00）A.变量 Y 的值与 Y+1 的值相等B.将变量 Y 的值存到 Y+1 中去C.将变量 Y 的值加 1 后赋值给变量 Y D.变量 Y 的值为 1解析：解析 这是考查通过赋值运算符给变量赋值，赋值运算符“二”的含义是将等号右边的表达式的值赋给等号左边的变量或属性，其优先级低于算术运算符，所以应该是 Y+1 先运算然后赋值给等号左侧的Y。17.( )属性用于设置组合框的风格。（分数：2

39、.00）A.BackstyleB.BorderstyleC.Style D.Sorted解析：解析 Style 属性返回或设置一个值，该值用来组合框控件的显示类型和行为。组合框的 Style属性值可设置成下拉组合框 0 (vbComboDropDown)、简单组合框 1(vbComboSimple)和下拉式列表框2(vbComboDrop-DownList)。默认值为 0，包括一个下拉式列表和一个文本框，可以从列表选择或在文本框中输入：简单组合框 1 包括一个文本框和一个不能下拉的列表，可以从列表中选择或在文本框中输入，简单组合框的显示区域包括编辑和列表部分；下拉式列表框 2 锁定了文本框的输

40、入，仅允许从下拉式列表中选择，不能在文本框中输入内容。18.下列程序的输出图形是( )。For k=0 To 360cr=Int(160 * Rnd)ang=-3.1415926/180*kCircle(2000，2000)，500，cr,0，angNext（分数：2.00）A.一段彩色圆弧B.一个彩色扇形C.一个彩色空心圆D.一个辐射状彩色圆形 解析：解析 解本题主要是理解用 Circle 画圆弧的方法，它以弧度为单位，给出定义弧线 start 和 end的角度参数。画圆弧的语法是：object.CircleStep(x，y)，radius，color，start，end，aspect题中，

41、圆心不变，半径 500 不变，用变量 cr 表示颜色，是随机变化的，弧线终点也在变化，所以经过360 次循环会画出一段辐射状彩色的圆形。知识拓展如果 start 参数或 end 参数是负数的话，Visual Basic 将画一条连接圆心到负端点的线。例如，下面的过程将用消除切片方式画出一个饼。Private Sub Form_Click()Const PI=3.14159265Circle(3500，1500)，1000，-PI/2，-PI/3End Sub19.下列程序的功能是：调用字体对话框来设置文本框中的字体，单击 Command1 按钮弹出对话框，进行相应的字体、字号等的设置，然后单击

42、。“确定”按钮退出对话框，则将发生哪些变化( )。Private Sub Command1_Click()CommonDialogl.CancelError=TrueCommonDialogl.Flags=3On Error Resume NextCommonDialogl.ShowFontTextl.Font.Name=CommonDialogl.FontNameTextl.Font.Size=CommonDialogl.FontSizeTextl.Font.Bold=CommonDialogl.FontBoldTextl.Font.Italic=CommonDialogl.FontItal

43、icTextl.Font.Underline=CommonDialogl.FontUnderlineTextl.FontStrikethru=CommonDialogl.FontStrikethruTextl.ForeColor=CommonDialogl.ColorEnd Sub（分数：2.00）A.Text1 的字体不发生变化B.Text1 的字体发生变化 C.Text1 的字体和颜色发生变化D.程序出错解析：解析 通用对话框的 Flags 属性设置为 3，从而可以设置屏幕显示和打印机字体，接着用ShowFont 方法建立字体对话框，如下图所示。*“字体”对话框中并没有设置颜色的选项，所以

44、文本框中的字体、字形、字号会发生相应的变化，但是字体的颜色并不会改变。20.在窗体上放置一个命令按钮 Command1，并编写下列单击事件的程序：Option Base 1Private Sub Command1_Click()Dim c As Integer,d As Integerd=0c=6X=Array(2，4，6，8，10，12)For i=1 To 6If X(i)c Thend=d+X(i)c=X(i)Elsed=d-cEnd IfNext iPrint dEnd Sub程序运行后，单击命令按钮，则在窗体上输出的结果为( )。（分数：2.00）A.10B.12 C.16D.20解

45、析：解析 程序首先使用 Array 函数为 x 数组变量赋值，然后利用 For 循环和 If 结构语句实现程序功能。程序执行过程如下：当 i=1 时，X(i)=2，d=d-c=-6：当 i=2 时，X(i)=4，d=d- c12；当 i=3 时，X(i)-6，d=d-c=-18；当 i=4 时，X(i)=8，d= d+X(i)=-10，c=8；当 i=5 时，X(i)=10，d=d+X(i)=0，c=10；当 i=6时，X(i)=12，d=d+X(i)=12，c=12。21.在窗体中放置控件，对该控件的操作错误的是( )。（分数：2.00）A.单击窗体上没有控件处，可把活动控件变为不活动控件B

46、.双击任一个控件内部，可激活该控件的代码窗口C.双击一个控件内部，可把活动控件变为不活动控件 D.拖动一个活动控件四周的控制小方块可缩放控件解析：解析 当焦点在某个控件上时，该控件为活动控件，如果单击该控件以外的任何地方，则该控件就失去焦点，变为不活动控件。对于一个不拥有焦点的控件，单击其内部则变为活动的控件，如果双击一个控件内部可以激活该控件的代码窗口，进行代码编写。当一个控件是活动控件时，拖动四周的控制小方块可缩放控件。焦点对象可以接收用户鼠标或键盘的输入。当一个对象具有焦点时，就可以接收用户的输入。在 Windows系统中，某个时刻可以运行多个应用程序，但只有具有焦点的应用程序才是当前活

47、动应用程序，才能接收用户的输入。22.下列工具中为需求分析常用工具的是( )。（分数：2.00）A.PADB.PFDC.N-SD.DFD 解析：解析 需求分析常用的工具有数据流图(DFD) 、数据字典 (DD) 、判定树和判定表。PAD(问题分析图)、PFD(程序流程图)、 N-S(盒式图)都是详细设计的常用工具，不是需求分析的工具。23.下列程序的运行结果是( )。Private Function myfun(m，n)Do While mnDo While mn:m=m-n:LoopDo While nm:n=n-m:LoopLoopmyfun=mEnd FunctionPrivate Su

48、b Command1_Click()Print myfun(9，8)End Sub（分数：2.00）A.2B.1 C.4D.3解析：解析 求解本题的关键在于理解好 3 个 Do While 循环的执行顺序，第 2 个和第 3 个 Do While 循环嵌套在第 1 个 Do While 循环内，先执行第 2 个循环，然后是第 3 个循环，最后是外层循环即第 1 个 Do While 循环。程序执行如下：m=9，n=8：第 1 个 Do While 循环内，执行第 2 个 Do While 循环，m=m-n=1；退出第 2 个 Do While 循环；执行第 3 个 Do While 循环，n=n-m，最后 n 的值为 1；退出第 3 个 Do While 循环；退出第 1 个 Do While 循环。程序执行结果是 1。24.下列特征中不是面向对象方法的主要特征的是( )。（分数：2.00）A.多态性B.继承C.封装性D.模块化 解析：解析 面向对象设计方法与面向过程设计方法有本质的不同，其基本原理是：使用现实世界的概念抽象地思考问题从而自然地解决问题。其特点包括：分类性、多态性、封装性、模块独立性、继承和多态性等。模块化是