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.模块化 解析:解析 面向对象设计方法与面向过程设计方法有本质的不同,其基本原理是:使用现实世界的概念抽象地思考问题从而自然地解决问题。其特点包括:分类性、多态性、封装性、模块独立性、继承和多态性等。模块化是