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

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

1、二级 VISUAL+BASIC 笔试-345 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画一个名称为 Text1 的文本框，一个名称为 Command1 的命令按钮，然后编写如下事件过程和通用过程：Private Sub Command1_Click()n=Val(Text1.Text)if n/2=n/2 Thenf=f1(n)Elsef=f2(n)End IfPrint f;nEnd SubPublic Function f1(ByRef x)x=x*xf1=x+xEnd FunctionPublic Function f

2、2(ByVal x)x=x*xf2=x+x+xEnd Function程序运行后，在文本框中输入 6，然后单击命令按钮，窗体上显示的是( )。（分数：2.00）A.72 36B.108 36C.72 6D.108 62.设有以下循环结构Do循环体Loop While条件则以下叙述中错误的是( )。（分数：2.00）A.若“条件”是一个为 0 的常数，则一次也不执行循环体B.“条件”可以是关系表达式、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 True，则不停地执行循环体3.以下关于多重窗体程序的叙述中，错误的是( )（分数：2.00）A.用 Hide 方法

3、不但可以隐藏窗体，而且能清除内存中的窗体B.在多重窗体程序中，各窗体的菜单是彼此独立的C.在多重窗体程序中，可以根据需要指定启动窗体D.对于多重窗体程序，需要单独保存每个窗体4.以下叙述中错误的是( )。（分数：2.00）A.一个工程可以包括多种类型的文件B.Visual Basic 应用程序既能以编译方式执行，也能以解释方式执行C.程序运行后，在内存中只能驻留一个窗体D.对于事件驱动型应用程序，每次运行时的执行顺序可以不一样5.下列选项中不属于结构化程序设计方法的是( )。（分数：2.00）A.自顶向下B.逐步求精C.模块化D.可复用6.在文本框中，当用户键入一个字符时，能同时引发的事件的是

4、( )。（分数：2.00）A.KeyPress 和 ClickB.KeyPress 和 LostFocusC.KeyPress 和 ChangeD.Change 和 LostFocus7.在用通用对话框控件建立”打开”或”保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件(即.txt 文件)，则正确的描述格式是( )。（分数：2.00）A.“text(.txt)|(*.txt)“B.“文本文件(.txt)|(.txt)“C.“text(.txt)FFFFF|(*.txt)“D.“text(.txt)(*.text)“8.已知变量 X、Y 为整型，且 x=4，y=12，S 为字

5、符串型，且 s=a，1blok 为标签控件，下列赋值语句合法的是( )。（分数：2.00）A.x=1blok.CaptionB.Lblok.caption=Str(x)C.x*3=yD.Y=x*s9.阅读下面的程序段：For i=1 To 3For j=1 To iFor k=j To 4a=a+1Next kNext jNext i执行上面的三重循环后，a 的值为( )。（分数：2.00）A.9B.14C.20D.2110.假定有下表所列的菜单结构：标题 名称 层次显示 appear 1(主菜单)大图标 bigicon 2(菜单)小图标 smallicon 3(菜单)要求程序运行后，如果单击

6、菜单项“大图标”，则在该菜单项前添加一个“”。以下正确的事件过程是( )。（分数：2.00）A.Private Sub bigicon_Click()bigicon.Checked=FalseEnd SubB.Private Sub bigicon_Click()Me.appear.bigicon.Checked=TrueEnd SubC.Private Sub bigicon_Click()bigicon.Checked=TrueEnd SubD.Private Sub bigicon_Click()appear.bigicon.Checked=TrueEnd Sub11.Visual Ba

7、sic 根据计算机访问文件的方式将文件分成三类，其中不包括( )。A顺序文件 BUnix 文件 C. 二进制文件 D随机文件（分数：2.00）A.B.C.D.12.有如下程序：Private Sub Form_Click()Dim Check,CounterCheck=TrueCounter=0DoDo While Counter20Counter=Counter+1If Counter=10 ThenCheck=FalseExit DoEnd IfLoopLoop Until Check=FalsePrint Counter,CheckEnd Sub程序运行后，单击窗体，输出结果为( )。（

8、分数：2.00）A.15 0B.20 -1C.10 TrueD.10 False13.在设计阶段，双击窗体 Form1 的空白处，打开代码窗口，显示( )事件过程模板。（分数：2.00）A.Form_ClickB.Form_LoadC.Form1_ClickD.Foma1_Load14.在窗体上画两个滚动条，名称分别为 Hscroll1、Hscroll2；6 个标签，名称分别为Label1、Label2、Label3、Label4、Label5、Label6，其中标签 Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动

9、条的数值，Label3 显示 A*B 的计算结果。如下图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现上述功能的事件过程是( )。（分数：2.00）A.Private Sub Command1_Click()Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)End SubB.Private Sub Command1_Click()Label3.Caption=HScroll1.Value*HScr

10、oll2.ValueEnd SubC.Private Sub Command1_Click()Label3.Caption=HScroll1*HScroll2End SubD.Private Sub Command1_Click()Label3.Caption=HScroll1.Text*HScroll2.TextEnd Sub15.编写如下事件过程：Private Sub Form-MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Shift=6 And Button=2 ThenPrint“Hel

11、lo“End IfEnd Sub程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下( )操作。（分数：2.00）A.同时按下 Shift 键和鼠标左键B.同时按下 Shift 键和鼠标右键C.同时按下 Ctrl、Alt 键和鼠标左键D.同时按下 Ctrl、Alt 键和鼠标右键16.窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Clcik()Dim aa=Array(1,2,3,4,5)For k=1 To 4s=s+a(k)Next kPrint sEnd Sub（分数：2.00）A.10B.

12、14C.15D.12017.假定有如下事件过程：Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button=2 ThenPopupMenu popFormEnd IfEnd Sub则以下描述中错误的是( )。（分数：2.00）A.该过程的功能是弹出一个菜单B.PopForm 是在菜单编辑器中定义的弹出式菜单的名称C.参数 X、Y 指明鼠标的当前位置D.Button=2 表示按下的是鼠标左键18.有如下一个 Sub 过程：Sub mlt(ParamArray num

13、bers()n=1For Each x In numbersn=n*xNext xPrint nEnd Sub在一个事件过程中如下调用该 Sub 过程：Private Sub Command1_Click()Dim a As IntegerDim b As IntegerDim c As IntegerDim d As Integera=1b=2c=3d=4mlt a,b,c,dEnd Sub该程序的运行结果为( )。（分数：2.00）A.12B.24C.36D.4819.下面关于多重窗体的叙述中，正确的是( )。（分数：2.00）A.作为启动对象的 Main 子过程只能放在窗体模块中B.如果

14、启动对象的 Main 子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载及加载哪一个窗体C.没有启动窗体，程序不能运行D.以上都不对20.程序设计语言的基本成分是数据成分、运算成分、控制成分和( )。（分数：2.00）A.对象成分B.变量成分C.语句成分D.传输成分21.以下描述正确的是( )。（分数：2.00）A.过程的定义可以嵌套，但过程的调用不能嵌套B.过程的定义不可以嵌套，但过程的调用可以嵌套C.过程的定义和过程的调用均可以嵌套D.过程的定义和过程的调用均不能嵌套22.若要将某命令按钮设置为默认命令按钮。则应设置为 True 的属性是( )。（分数：2.00）A.

15、ValueB.CancelC.DefaultD.Enabled23.下列关于 DOLoop 语句的叙述不正确的是( )。（分数：2.00）A.Doloop 语句采用逻辑表达式来控制循环体执行的次数B.当 Do whileLoop 或 Do untilLoop 语句中 while 或 until 后的表达式的值为 true 或非零时，循环继续C.DoLoop while 语句与 DoLoop until 语句都至少执行一次循环体D.Do whileLoop 语句与 Do untilLoop 语句可能不执行循环体24.下面 4 个语句中，能打印显示 40*90 字样的是( )。（分数：2.00）A

16、.Print“40*90“B.Print 40*90C.Print Chr$(40)+“*“+CHr$(90)D.Print Val(“40“)*Val(“90“)25.在运行阶段，要在文本框 Text1 获得焦点时选中文本框中所有内容，对应的事件过程是( )（分数：2.00）A.Private Sub Text1_GotFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)End SubB.Private Sub Text1_LostFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)E

17、nd subC.Private Sub Text1_Change()Text1.SelStart=0Text1.SelStart=Len(Text1.text)End subD.Private Sub Text1_SetFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)End sub26.应用程序设计完成后，应将程序保存，保存的过程是( )。（分数：2.00）A.只保存窗体文件即可B.只保存工程文件即可C.先保存工程文件，之后还要保存窗体文件D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件27.下列程序段( )能够正确实现条件：

18、如果 XY 则 A=15，否则 A=-15。（分数：2.00）A.If XY Then A=15A=-15Prin AB.If XY Then A=15:Print AA=-15:Print AC.If XY ThenA=1.5:Print AElseA=-15:Print AEnd IfD.If XY Then A=15Else A=-15Print AEnd If28.为启动定时器控件，需要设置定时器的属性是( )。（分数：2.00）A.NameB.IntervalC.LeftD.Top29.设有如下程序：Option Base 1Private Sub Command1_Click()D

19、im a(10) As IntegerDim n As Integern=InputBox(“输入数据“)If n10 ThenCall GetArray(a,n)End IfEnd SubPrivate Sub GetArray(b()As Integer,n As Integer)Dim c(10)As Integerj=0For i=1 To nb(i)=Clnt(Rnd()*100)Ifb(i)/2=b(i)/2 Thenj=j+1c(j)=b(i)End IfNextPrint jEnd Sub以下叙述中错误的是( )。（分数：2.00）A.数组 b 中的偶数被保存在数组 C 中B.

20、程序运行结束时，在窗体上显示的是 c 数组中元素的个数C.GetArray 过程的参数 n 是按值传送的D.如果输入的数据大于 10，则窗体上不显示任何信息30.要使控件与框架捆绑在一起，以下操作正确的是( )。（分数：2.00）A.要在窗体不同位置上分别画一框架和控件，再将控件拖到框架上B.在窗体上画好控件，再画框架将控件框起来C.在窗体上画好框架，再在框架中画控件D.在窗体上画好框架，再双击工具箱中的控件31.下列程序段的执行结果为( )。a=1b=1For I=1 To 3f=a+ba=bb=fPrint f：Next I（分数：2.00）A.2 3 6B.2 3 5C.2 3 4D.2

21、 2 832.以下能够触发文本框 Change 事件的操作是( )。（分数：2.00）A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文本框的内容33.下列各选项说法错误的一项是( )。（分数：2.00）A.文件对话框可分为两种，即打开(Open)文件对话框和保存(Save As)文件对话框B.通用对话框的 Name 属性的默认值为 CommonDialogX，此外，每种对话框都有自己的默认标题C.打开文件对话框可以让用户指定一个文件，由程序使用；而用保存文件对话框可以指定一个文件，并以这个文件名保存当前文件D.DefaultEXT 属性和 DialogTitle 属性都是打开

22、对话框的属性，但非保存对话框的属性34.在窗体模块的通用声明段中声明变量时，不能使用( )关键字。（分数：2.00）A.DimB.PublicC.PrivateD.Static35.如果要在程序代码中为图片框动态加载和清除图像，可以利用( )函数。（分数：2.00）A.InputBoxB.InputC.LoadPictureD.PaintPicture二、填空题(总题数：12，分数：30.00)36.VB6.0 的主要特点是具有面向对象的 1 设计工具，非常适用于用户界面的编程方式。（分数：2.00）填空项 1:_37.属性窗口主要是针对窗体和控件设置的。在 VB 中，窗体和控件被称为 1。每

23、个对象都可以用一组属性来刻画其特征，而属性窗口就是用来设置窗体或窗体中的控件属性。（分数：2.00）填空项 1:_38.决定一个窗体有无控制菜单的属性是 1。（分数：2.00）填空项 1:_39.使用代码在程序运行期间，把图形文件装入图片框或图像框中所用的函数是 1。（分数：2.00）填空项 1:_40.在执行 KeyPress 事件过程时，KeyAscii 表示所按键的盟值。（分数：2.00）填空项 1:_41.下列程序段运行结果是_。Dim c As Integer,num As IntegerNum=29483Doc=num Mod 10Print c；num=num/10Loop Wh

24、ile num0（分数：2.00）填空项 1:_42.为了把一个 Visual Basic 应用程序装入内存，只要装入 1 文件即可。（分数：2.00）填空项 1:_43.菜单控件只包括一个 1 事件。（分数：2.00）填空项 1:_44.函数 Str$(256.36)的值是 1。（分数：2.00）填空项 1:_45.给定年份，下列程序用来判断该年是否为闰年，请填空。提示：闰年的条件是年份可以被 4 整除但不能被 100 整除，或者能被 400 整除。Private Sub Comand6_Click()Dim y As Integery=InputBox(“请输入年份“)If(y Mod 4

25、=0_y Mod 1000)or(y Mod 400=0)ThenPrint“是闰年“ElsePrint“是普通年份“End IfEnd Sub（分数：2.00）填空项 1:_设有如下程序：Prirate Sub Form_Click()Dim a As Integer,b AS Integera=20:b=50p1 a,bp2 a,bp3 a,bPrint“a=“；a,“b=“;bEnd SubSub p1(x As Integeh By Val y As Integer)x=x+10y=y+20End SubSub p2(ByVal x As Integer,y As Integer)x=

26、x+10y=y+20End SubSub p3 (ByVal x As Integer,ByVal y As Integer)x=x+10y=y+20End Sub该程序运行后，单击窗体，则在窗体上显示的内容是：a= (11) 和 b= (12) 。（分数：4.00）填空项 1:_填空项 1:_请填写下列空白以实现运行后形成一个主对角线上元素值为 l，其他元素为 0 的 66 阶矩阵。Private Sub Command1_Click()Dim s (6,6)For i=1 To 6For i=1 To 6If i=j Then(13) Else(14) End IfPrint (15) N

27、ext jPrintNext iEnd Sub（分数：6.00）填空项 1:_填空项 1:_填空项 1:_二级 VISUAL+BASIC 笔试-345 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画一个名称为 Text1 的文本框，一个名称为 Command1 的命令按钮，然后编写如下事件过程和通用过程：Private Sub Command1_Click()n=Val(Text1.Text)if n/2=n/2 Thenf=f1(n)Elsef=f2(n)End IfPrint f;nEnd SubPublic Function

28、 f1(ByRef x)x=x*xf1=x+xEnd FunctionPublic Function f2(ByVal x)x=x*xf2=x+x+xEnd Function程序运行后，在文本框中输入 6，然后单击命令按钮，窗体上显示的是( )。（分数：2.00）A.72 36 B.108 36C.72 6D.108 6解析：2.设有以下循环结构Do循环体Loop While条件则以下叙述中错误的是( )。（分数：2.00）A.若“条件”是一个为 0 的常数，则一次也不执行循环体 B.“条件”可以是关系表达式、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 T

29、rue，则不停地执行循环体解析：3.以下关于多重窗体程序的叙述中，错误的是( )（分数：2.00）A.用 Hide 方法不但可以隐藏窗体，而且能清除内存中的窗体 B.在多重窗体程序中，各窗体的菜单是彼此独立的C.在多重窗体程序中，可以根据需要指定启动窗体D.对于多重窗体程序，需要单独保存每个窗体解析：4.以下叙述中错误的是( )。（分数：2.00）A.一个工程可以包括多种类型的文件B.Visual Basic 应用程序既能以编译方式执行，也能以解释方式执行C.程序运行后，在内存中只能驻留一个窗体 D.对于事件驱动型应用程序，每次运行时的执行顺序可以不一样解析：5.下列选项中不属于结构化程序设计

30、方法的是( )。（分数：2.00）A.自顶向下B.逐步求精C.模块化D.可复用 解析：6.在文本框中，当用户键入一个字符时，能同时引发的事件的是( )。（分数：2.00）A.KeyPress 和 ClickB.KeyPress 和 LostFocusC.KeyPress 和 Change D.Change 和 LostFocus解析：7.在用通用对话框控件建立”打开”或”保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件(即.txt 文件)，则正确的描述格式是( )。（分数：2.00）A.“text(.txt)|(*.txt)“ B.“文本文件(.txt)|(.txt)“C.

31、“text(.txt)FFFFF|(*.txt)“D.“text(.txt)(*.text)“解析：8.已知变量 X、Y 为整型，且 x=4，y=12，S 为字符串型，且 s=a，1blok 为标签控件，下列赋值语句合法的是( )。（分数：2.00）A.x=1blok.CaptionB.Lblok.caption=Str(x) C.x*3=yD.Y=x*s解析：9.阅读下面的程序段：For i=1 To 3For j=1 To iFor k=j To 4a=a+1Next kNext jNext i执行上面的三重循环后，a 的值为( )。（分数：2.00）A.9B.14C.20 D.21解析：

32、10.假定有下表所列的菜单结构：标题 名称 层次显示 appear 1(主菜单)大图标 bigicon 2(菜单)小图标 smallicon 3(菜单)要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“”。以下正确的事件过程是( )。（分数：2.00）A.Private Sub bigicon_Click()bigicon.Checked=FalseEnd SubB.Private Sub bigicon_Click()Me.appear.bigicon.Checked=TrueEnd SubC.Private Sub bigicon_Click()bigicon.Checke

33、d=TrueEnd Sub D.Private Sub bigicon_Click()appear.bigicon.Checked=TrueEnd Sub解析：11.Visual Basic 根据计算机访问文件的方式将文件分成三类，其中不包括( )。A顺序文件 BUnix 文件 C. 二进制文件 D随机文件（分数：2.00）A.B. C.D.解析：12.有如下程序：Private Sub Form_Click()Dim Check,CounterCheck=TrueCounter=0DoDo While Counter20Counter=Counter+1If Counter=10 ThenC

34、heck=FalseExit DoEnd IfLoopLoop Until Check=FalsePrint Counter,CheckEnd Sub程序运行后，单击窗体，输出结果为( )。（分数：2.00）A.15 0B.20 -1C.10 TrueD.10 False 解析：13.在设计阶段，双击窗体 Form1 的空白处，打开代码窗口，显示( )事件过程模板。（分数：2.00）A.Form_ClickB.Form_Load C.Form1_ClickD.Foma1_Load解析：14.在窗体上画两个滚动条，名称分别为 Hscroll1、Hscroll2；6 个标签，名称分别为Label1

35、、Label2、Label3、Label4、Label5、Label6，其中标签 Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动条的数值，Label3 显示 A*B 的计算结果。如下图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现上述功能的事件过程是( )。（分数：2.00）A.Private Sub Command1_Click()Label3.Caption=Str(Val(La

36、bel1.Caption)*Val(Label2.Caption)End SubB.Private Sub Command1_Click()Label3.Caption=HScroll1.Value*HScroll2.ValueEnd SubC.Private Sub Command1_Click()Label3.Caption=HScroll1*HScroll2End SubD.Private Sub Command1_Click()Label3.Caption=HScroll1.Text*HScroll2.TextEnd Sub 解析：15.编写如下事件过程：Private Sub For

37、m-MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Shift=6 And Button=2 ThenPrint“Hello“End IfEnd Sub程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下( )操作。（分数：2.00）A.同时按下 Shift 键和鼠标左键B.同时按下 Shift 键和鼠标右键C.同时按下 Ctrl、Alt 键和鼠标左键D.同时按下 Ctrl、Alt 键和鼠标右键 解析：16.窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结

38、果是( )。Private Sub Command1_Clcik()Dim aa=Array(1,2,3,4,5)For k=1 To 4s=s+a(k)Next kPrint sEnd Sub（分数：2.00）A.10B.14 C.15D.120解析：17.假定有如下事件过程：Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button=2 ThenPopupMenu popFormEnd IfEnd Sub则以下描述中错误的是( )。（分数：2.00）A.该过程

39、的功能是弹出一个菜单B.PopForm 是在菜单编辑器中定义的弹出式菜单的名称C.参数 X、Y 指明鼠标的当前位置D.Button=2 表示按下的是鼠标左键 解析：18.有如下一个 Sub 过程：Sub mlt(ParamArray numbers()n=1For Each x In numbersn=n*xNext xPrint nEnd Sub在一个事件过程中如下调用该 Sub 过程：Private Sub Command1_Click()Dim a As IntegerDim b As IntegerDim c As IntegerDim d As Integera=1b=2c=3d=4

40、mlt a,b,c,dEnd Sub该程序的运行结果为( )。（分数：2.00）A.12B.24 C.36D.48解析：19.下面关于多重窗体的叙述中，正确的是( )。（分数：2.00）A.作为启动对象的 Main 子过程只能放在窗体模块中B.如果启动对象的 Main 子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载及加载哪一个窗体 C.没有启动窗体，程序不能运行D.以上都不对解析：20.程序设计语言的基本成分是数据成分、运算成分、控制成分和( )。（分数：2.00）A.对象成分B.变量成分C.语句成分D.传输成分 解析：21.以下描述正确的是( )。（分数：2.00）

41、A.过程的定义可以嵌套，但过程的调用不能嵌套B.过程的定义不可以嵌套，但过程的调用可以嵌套 C.过程的定义和过程的调用均可以嵌套D.过程的定义和过程的调用均不能嵌套解析：22.若要将某命令按钮设置为默认命令按钮。则应设置为 True 的属性是( )。（分数：2.00）A.ValueB.CancelC.Default D.Enabled解析：23.下列关于 DOLoop 语句的叙述不正确的是( )。（分数：2.00）A.Doloop 语句采用逻辑表达式来控制循环体执行的次数B.当 Do whileLoop 或 Do untilLoop 语句中 while 或 until 后的表达式的值为 tru

42、e 或非零时，循环继续 C.DoLoop while 语句与 DoLoop until 语句都至少执行一次循环体D.Do whileLoop 语句与 Do untilLoop 语句可能不执行循环体解析：24.下面 4 个语句中，能打印显示 40*90 字样的是( )。（分数：2.00）A.Print“40*90“ B.Print 40*90C.Print Chr$(40)+“*“+CHr$(90)D.Print Val(“40“)*Val(“90“)解析：25.在运行阶段，要在文本框 Text1 获得焦点时选中文本框中所有内容，对应的事件过程是( )（分数：2.00）A.Private Sub

43、 Text1_GotFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)End Sub B.Private Sub Text1_LostFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)End subC.Private Sub Text1_Change()Text1.SelStart=0Text1.SelStart=Len(Text1.text)End subD.Private Sub Text1_SetFocus()Text1.SelStart=0Text1.SelStart=Len

44、(Text1.text)End sub解析：26.应用程序设计完成后，应将程序保存，保存的过程是( )。（分数：2.00）A.只保存窗体文件即可B.只保存工程文件即可C.先保存工程文件，之后还要保存窗体文件D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件 解析：27.下列程序段( )能够正确实现条件：如果 XY 则 A=15，否则 A=-15。（分数：2.00）A.If XY Then A=15A=-15Prin AB.If XY Then A=15:Print AA=-15:Print AC.If XY ThenA=1.5:Print AElseA=-15:Print AEnd I

45、f D.If XY Then A=15Else A=-15Print AEnd If解析：28.为启动定时器控件，需要设置定时器的属性是( )。（分数：2.00）A.NameB.Interval C.LeftD.Top解析：29.设有如下程序：Option Base 1Private Sub Command1_Click()Dim a(10) As IntegerDim n As Integern=InputBox(“输入数据“)If n10 ThenCall GetArray(a,n)End IfEnd SubPrivate Sub GetArray(b()As Integer,n As I

46、nteger)Dim c(10)As Integerj=0For i=1 To nb(i)=Clnt(Rnd()*100)Ifb(i)/2=b(i)/2 Thenj=j+1c(j)=b(i)End IfNextPrint jEnd Sub以下叙述中错误的是( )。（分数：2.00）A.数组 b 中的偶数被保存在数组 C 中B.程序运行结束时，在窗体上显示的是 c 数组中元素的个数C.GetArray 过程的参数 n 是按值传送的 D.如果输入的数据大于 10，则窗体上不显示任何信息解析：30.要使控件与框架捆绑在一起，以下操作正确的是( )。（分数：2.00）A.要在窗体不同位置上分别画一框架

47、和控件，再将控件拖到框架上B.在窗体上画好控件，再画框架将控件框起来C.在窗体上画好框架，再在框架中画控件 D.在窗体上画好框架，再双击工具箱中的控件解析：31.下列程序段的执行结果为( )。a=1b=1For I=1 To 3f=a+ba=bb=fPrint f：Next I（分数：2.00）A.2 3 6B.2 3 5 C.2 3 4D.2 2 8解析：32.以下能够触发文本框 Change 事件的操作是( )。（分数：2.00）A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文本框的内容 解析：33.下列各选项说法错误的一项是( )。（分数：2.00）A.文件对话框可分为

48、两种，即打开(Open)文件对话框和保存(Save As)文件对话框B.通用对话框的 Name 属性的默认值为 CommonDialogX，此外，每种对话框都有自己的默认标题C.打开文件对话框可以让用户指定一个文件，由程序使用；而用保存文件对话框可以指定一个文件，并以这个文件名保存当前文件D.DefaultEXT 属性和 DialogTitle 属性都是打开对话框的属性，但非保存对话框的属性 解析：34.在窗体模块的通用声明段中声明变量时，不能使用( )关键字。（分数：2.00）A.DimB.PublicC.PrivateD.Static 解析：35.如果要在程序代码中为图片框动态加载和清除图像，可以利用( )函数。（分数：2.00）A.InputBoxB.InputC.LoadPicture D.PaintPicture解析：二、填空题(总题数：12，分数：30.00)36.VB6.0 的主要特点是具有面向对象的 1 设计工具，非常适用于用户界面的编程方式。（分数：2.00）填空项 1:_ （正确答案：可视化的图形）解析：37.属性窗口主要是针对窗体和控件设置的。在 VB 中，窗体和控件被称为 1。每个对象都可以用一组属性来刻画其特征，而