1、二级 VISUAL+BASIC-15-1 及答案解析(总分:88.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:57.00)1.对窗体编写如下事件过程:Private Sub Form_ Mouse Down(Button As Integer,Shift As Integer,X AS Single,Y As Single)If Button=2 ThenPrint “AAAAA“End ifEnd SubPrivate Sub Form _ MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Singl
2、e)Print “BBBBB“End Sub程序运行后,如果单击鼠标右键,则输出结果为 _。 A. AAAAA BBBBB B. BBBBB AAAAA C. AAAAA D.BBBBB(分数:1.00)A.B.C.D.2.有如下的程序。Private Sub Commandl_Click( )Dim k As Integer, m As IntegerDim P As Integerk=4: m=1P=Fun(k, m) : Print P;P = Fun ( k, m) : Print PEnd SubPrivate Function Fun( a As Integer, b As Int
3、eger)Static m As Integer, i As Integerm=5:i=2i=i+m+1m=i + a + bFun=m/2End Function单击命令按钮后,输出结果为 A. 2 2 B. 4 4 C. 5 5 D. 6(分数:1.00)A.B.C.D.3.在窗体上有一个名称为 Check1 的复选框数组(含 4 个复选框),还有一个名称为 Text1 的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的方字罗列在文本框中(如下图所示)。下面能实现此功能的事件过程是U /U(分数:2.00)A.B.C.D.4.下列属性中,决定在程序运行期间列表框
4、或组合框的选项是否按字母顺序排列显示的属性是 _。 A. ListIndex B. Text C. ListCount D. Sorted(分数:1.00)A.B.C.D.5.某人编写了下面的程序:Private Sub Command1_Click()Dim a As Integer,b As Integera=InputBox(“请输入整数“)b=InputBox(“请输入整数“)pro apro bCall pro(a+b)End SubPrivate Sub pro(n As Integer)While(n0)Print n Mod 10;n=n/10WendPrintEnd Sub此
5、程序功能是:输入 2 个正整数,反序输出这 2 个数的每一位数字,再反序输出这 2 个数之和的每一位数字。例如:若输入 123 和 234,则应该输出:3 2 14 3 27 5 3但调试时发现只输出了前 2 行(即 2 个数的反序),而未输出第 3 行(即 2 个数之和的反序),程序需要修改。下面的修改方案中正确的是_。 A.把过程 pro 的形式参数 n As Integer 改为 ByVal n As Integer B.把 Call pro(a+b)改为 pro a+b C.把 n=n/10 改为 n=n/10 D.在 pro b 语句之后增加语句 c%=a+b,再把 Call pro
6、(a+b)改为 pro c(分数:1.00)A.B.C.D.6.假定有下列程序段:For i=1 TO 3For j=5 To 1 Step-1Print i*jNextjNext i则语句 Print i*j 的执行次数是U /U A.15 B.16 C.17 D.18(分数:2.00)A.B.C.D.7.双击窗体中的对象后,VB 将显示的窗口是_。 A. 工具箱 B. 项目(工程)窗口 C. 代码窗口 D. 属性窗口(分数:2.00)A.B.C.D.8.把窗体的 Key Preview 属性设置为 True,然后编写如下过程:Private Sub Form_KeyDown(KeyCode
7、 As Integer, Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyUp(KeyVode As Integer, ShiftAs Integer)Print Chr(KeyCode+2)End Sub程序运行后,如果按“A”键,则输出结果_。 A. A B. A C. A D. A A B C D(分数:2.00)A.B.C.D.9.窗体上有两个文本框 Text1、Text2 以及一个命令按钮 Command1,编写下列程序:Dim y As IntegerPrivate Sub Command1_Click()
8、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 p2(x As Integer, y As Integer)As Integerp2=2*x+yEnd Function当单击 1 次和单击 2 次命令按钮后,文本框 Text1 和 Text2 内的值分别为U /U。 A. 2 4 2 4 B. 2 4 4 8 C. 4 4 8 8 D. 1
9、0 10 58 58(分数:2.00)A.B.C.D.10.在窗体上画一个命令按钮,然后编写如下事件过程。Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 2X=X+6NextNextPrint XEnd Sub程序运行后,单击命令按钮,输出结果是U /U。 A. 12 B. 13 C. 16 D.17(分数:2.00)A.B.C.D.11.VB6 共有三个版本,按功能从弱到强的顺序排列应是_。 A. 学习版、专业版和工程版 B. 学习版、工程版和专业版 C. 学习版、专业版和企业版 D. 学习版、企业版和专业版(分数:2.00)A.B
10、.C.D.12.下列说法正确的是 A. 在 Visual Basic 中的对话框分为两种类型:预定义对话框和自定义对话框 B. 自定义对话框由用户根据自己需要定义的 C. 预定义对话框是用户在设置程序代码后定义的 D. MsgBox 函数是用户的自定义对话框的函数(分数:1.00)A.B.C.D.13.下列叙述中正确的是 A. 用 E-R 图能够表示实体集间一对一的联系、一对多的联系和多对多的联系 B. 用 E-R 图只能表示实体集之间一对一的联系 C. 用 E-R 图只能表示实体集之间一对多的联系 D. 用 E-R 图表示的概念数据模型只能转换为关系数据模型(分数:2.00)A.B.C.D.
11、14.在数据结构中,根据各数据元素之间前后件关系的复杂程度,一般将数据结构分成两类,它们是 A. 动态结构和静态结构 B. 紧凑结构和非紧凑结构 C. 线性结构和非线性结构 D. 内部结构和外部结构(分数:1.00)A.B.C.D.15.下面程序计算并输出的是U /UPrivate Sub Command1_Click()a=10s=0Dos=s+a*a*aa=a-1Loop Until a=0Print sEnd Sub A.13+23+33+103 的值 B.10! +3! +2! +1!的值 C.(1+2+3+1O)3 的值 D.10 个 103 的和(分数:2.00)A.B.C.D.1
12、6.下列关于栈的叙述正确的是U /U A.栈按“先进先出”组织数据 B.栈按“先进后出”组织数据 C.只能在栈底插入数据 D.不能删除数据(分数:2.00)A.B.C.D.17.通过文本框的U /U属性可以获得当前插入点所在的位置。 A. Position B. SelStart C. SelLength D. SelText(分数:2.00)A.B.C.D.18.要使文本框可输入多行文字,要更改的默认选项是 A. SorollBoars 和 MultiLine B. Visible C. ScrillBoars D. 以上都不是(分数:2.00)A.B.C.D.19.Datetime 是 D
13、ata 类型的变量,以下赋值语句中错误的是:_。 A. Datetime=# 4/14/97# B. Datetime=# September 1,1997# C. Datetime=#12:15:00 AM# D. Datetime=“8/8/99”(分数:2.00)A.B.C.D.20.下面哪个属性肯定不是框架控件的属性_。 A.Text B.Caption C.Left D.Enabled(分数:1.00)A.B.C.D.21.在窗体上画一个通用对话框,其名称为 CommonDialog1,然后画一个命令按钮,并编写如下事件过程:Private Sub Command1_ Click()
14、CommonDialog1. Flags= cd1OFNHideReadOnlyCommonDialog1. Filter=“All Files(*.*)*.*Text Files“ Min End Sub(分数:2.00)填空项 1:_39.在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程: Private Sub Form_ClickU /U Text1.Text=“VB 程序设计” End Sub PrivmeSubText1_Change() Picture1.Print“VB Programming“ End Sub 程序运行后,单击窗体,则在文本框中显示的内容是U U /
15、U /U,而在图片框中显示的内容是U U /U /U。(分数:1.00)填空项 1:_40.InputBox 函数输入数据时,可以单击“确定”按钮或U U /U /U表示确认。(分数:2.00)填空项 1:_41.扩展名为.bas 的文件称为 1。(分数:2.00)填空项 1:_42.一个变量未被显示定义,末尾也没有类型说明符,则该变量的隐含类型是上 1 类型。(分数:2.00)填空项 1:_43.在 Select case 结构中,使用“To 表达式”来指定一个范围时,必须把U U /U /U的值写在前面。(分数:2.00)填空项 1:_44.在窗体上画一个命令按钮和一个文本框,然后编写命令
16、按钮的 Click 事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到 Text1 中,例如,若在 Tcxt1 中输入的是 abDfdb,则单击 Commandl 按钮后Text1 中显示的字符串是 ZYXWVUTSRQPONMLKJIHGEC。请填空。 Private Sub Command_Click() DimSring,s As String,s As String,c As String Str=UCase(Text1) S=“ C=“Z“ WhileC=“A“ If In Ster(s
17、tr,c)=0 Then s=_ End If c=Chr$(Asc(c)-1) Wend If S“Then Text1=S End If End Sub(分数:2.00)填空项 1:_45.菜单项的唯一事件是U U /U /U。(分数:1.00)填空项 1:_46.软件开发过程主要分为需求分析、设计、编码与测试 4 个阶段,其中 1 阶段产生“软件需求规格说明书”。(分数:2.00)填空项 1:_47.常用的软件结构设计工具是结构图(SC) ,也称程序结构图。其中,用矩形表示 1,用带空心圆的箭头表示传递的是数据。(分数:2.00)填空项 1:_48.在面向对象程序设计中,从外面只能看到对
18、象的外部特征,而无须知道数据的具体结构以及实现操作的算法,这称为对象的 1。(分数:2.00)填空项 1:_49.下面程序的功能是从键盘上输入一个大于 100 的整数 m,计算并输出满足不等式 1+22+32+42+n2m的最大的 n,请填空。Private Sub Command1_Click()Dim s, m,n As Integerm=Val(InputBox(“请输入一个大于 100 的整数“)n=U U /U /Us=0Do While smn=n+1s=s+n*nLoopPrint “满足不等式的最大 n 是“U U /U /UEnd Sub(分数:4.00)填空项 1:_50.
19、测试的目的是暴露错误,评价程序的可靠性;而U U /U /U的目的是发现错误的位置并改正错误。(分数:1.00)填空项 1:_二级 VISUAL+BASIC-15-1 答案解析(总分:88.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:57.00)1.对窗体编写如下事件过程:Private Sub Form_ Mouse Down(Button As Integer,Shift As Integer,X AS Single,Y As Single)If Button=2 ThenPrint “AAAAA“End ifEnd SubPrivate Sub Form _ Mou
20、seUp(Button As Integer,Shift As Integer,X As Single,Y As Single)Print “BBBBB“End Sub程序运行后,如果单击鼠标右键,则输出结果为 _。 A. AAAAA BBBBB B. BBBBB AAAAA C. AAAAA D.BBBBB(分数:1.00)A. B.C.D.解析:解析 在窗体上单击鼠标右键时,实际上先后触发了两个事件,即先触发 MouseDown 事件,执行Print 方法输出 AAAAA;当释放鼠标键时,触发 MouseUp 事件,再次执行 Print 方法,输出 BBBBB。其实在 Visual Bas
21、ic 中类似的还有 DblCtick 事件,也是先后触发了两个事件,即当双击鼠标时,先触发Click 事件,再触发 DblClick 事件。2.有如下的程序。Private Sub Commandl_Click( )Dim k As Integer, m As IntegerDim P As Integerk=4: m=1P=Fun(k, m) : Print P;P = Fun ( k, m) : Print PEnd SubPrivate Function Fun( a As Integer, b As Integer)Static m As Integer, i As Integerm=
22、5:i=2i=i+m+1m=i + a + bFun=m/2End Function单击命令按钮后,输出结果为 A. 2 2 B. 4 4 C. 5 5 D. 6(分数:1.00)A.B.C.D. 解析:解析 考查考生对函数调用的掌握情况。 解题要点 在 Sub 过程中,程序段先定义了 3 个 Integer 型变量 k,m,P,并给 A 赋给初值 4,m 的初值为 1,然后调用事件过程 Fun,并将它的值赋给9;在事件过程 Fun 中定义了两个形参,参数的传送是通过引用实参,即将 k,m 的地址作为 a,b 的地址;在 Fun 中,将 m,i 定义为静态变量,所以第一次调用后的值仍然保留,但
23、是 m,i 分别都有赋值语句,将它们的值变为 5,2,所以返回值不变都是 6 6。 错解分析 调用函数只能返回一个结果值。 考点链接 函数调用、参数传递3.在窗体上有一个名称为 Check1 的复选框数组(含 4 个复选框),还有一个名称为 Text1 的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的方字罗列在文本框中(如下图所示)。下面能实现此功能的事件过程是U /U(分数:2.00)A. B.C.D.解析:解析 Text1.Text 表示文本框的文本内容,Check1(k).value=1 表示复选框被选中,For 循环遍历所有复选框,若 Check1(k).
24、value1。则 Text1.TextText1.Text Check1(k).Caption “ “,将Check1(k)的 Caption 即复选框后的文字添加到 Text1 中,每次添加文字后文字之间都由空格隔开。4.下列属性中,决定在程序运行期间列表框或组合框的选项是否按字母顺序排列显示的属性是 _。 A. ListIndex B. Text C. ListCount D. Sorted(分数:1.00)A.B.C.D. 解析:解析 ListIndex 属性的值表示程序运行时被选定的选项的序号,Text 属性的值是被选定的选项的文本内容,ListCount 属性的值表示列表框或组合框中
25、项目的数量,而决定在程序运行期间列表框或组合框的选项是否按字母顺序排列显示的属性是 Sorted,所以应选择 D。5.某人编写了下面的程序:Private Sub Command1_Click()Dim a As Integer,b As Integera=InputBox(“请输入整数“)b=InputBox(“请输入整数“)pro apro bCall pro(a+b)End SubPrivate Sub pro(n As Integer)While(n0)Print n Mod 10;n=n/10WendPrintEnd Sub此程序功能是:输入 2 个正整数,反序输出这 2 个数的每一
26、位数字,再反序输出这 2 个数之和的每一位数字。例如:若输入 123 和 234,则应该输出:3 2 14 3 27 5 3但调试时发现只输出了前 2 行(即 2 个数的反序),而未输出第 3 行(即 2 个数之和的反序),程序需要修改。下面的修改方案中正确的是_。 A.把过程 pro 的形式参数 n As Integer 改为 ByVal n As Integer B.把 Call pro(a+b)改为 pro a+b C.把 n=n/10 改为 n=n/10 D.在 pro b 语句之后增加语句 c%=a+b,再把 Call pro(a+b)改为 pro c(分数:1.00)A. B.C.
27、D.解析:解析 在过程定义中过程的形式参数定义时如果没有 ByVal 指明参数的传递方式,那么默认为地址传递,这样过程中对形参的改变将影响到实参的值。本程序中过程定义语句 Private Sub pro(n As Integer)说明形参 n 为按地址传递的,而在过程内语句 n=n/10 改变了形参的值,因此,a、b 的值就不再是最初输入的值了,表达式 a+b 就不是期望的两个输入数的和。因此得不到正确结果。 只要把 Private Sub pro(n As Integer)改为 Private Sub pro(ByVal n As Integer),程序即可得到正确结果,因此 A选项正确。6
28、.假定有下列程序段:For i=1 TO 3For j=5 To 1 Step-1Print i*jNextjNext i则语句 Print i*j 的执行次数是U /U A.15 B.16 C.17 D.18(分数:2.00)A. B.C.D.解析:解析 ForNext 循环语句可提供一个重复执行的语句序列,遵循“先检查,后执行”的规则,执行过程中,循环次数=Int(终值-初值)/步长+1。 本题代码是一个嵌套的 For 循环,其中每次执行内循环时的循环次数(Int(1-5)/-1)+15,外循环的循环次数为 3,因此执行循环体语句:PrintI*J 的次数为 15 次。7.双击窗体中的对象
29、后,VB 将显示的窗口是_。 A. 工具箱 B. 项目(工程)窗口 C. 代码窗口 D. 属性窗口(分数:2.00)A.B.C. D.解析:解析 可以按照下列所述的方式,来打开代码窗口:在工程窗口中,可以选择一个窗体或模块,然后选择“查看代码”按钮;在“窗体”窗口中,可以双击控件或窗体;也可以从“视图”菜单中选择“代码窗口”,或者按下 F7 键。8.把窗体的 Key Preview 属性设置为 True,然后编写如下过程:Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode)End Sub
30、Private Sub Form_KeyUp(KeyVode As Integer, ShiftAs Integer)Print Chr(KeyCode+2)End Sub程序运行后,如果按“A”键,则输出结果_。 A. A B. A C. A D. A A B C D(分数:2.00)A.B.C. D.解析:解析 当键盘被按下时,输出按下的键所代表的字符,即“A”;当键盘被松开的时候,输出该字符后继字符的后继字符,即“C”。9.窗体上有两个文本框 Text1、Text2 以及一个命令按钮 Command1,编写下列程序:Dim y As IntegerPrivate Sub Command1
31、_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 p2(x As Integer, y As Integer)As Integerp2=2*x+yEnd Function当单击 1 次和单击 2 次命令按钮后,文本框 Text1 和 Text2 内的值分别为U /U。 A. 2 4 2 4 B. 2 4 4 8 C. 4 4
32、8 8 D. 10 10 58 58(分数:2.00)A.B.C.D. 解析:解析 程序中 y 为窗体变量,其作用范围为整个窗体中的所有子过程,要注意区分与作为 p1、p2形式参数的 y 变量。 窗体变量 y 能够记录程序运行中对其的改变,第 1 次调用 p1,y 值为 2;第 2 次调用 p1,y 值为 6;第 3 次调用 p1,y 值为 14;第 4 次调用 p1,y 值为 36;所以计算出的函数 p1、p2 的返回值也会不同。10.在窗体上画一个命令按钮,然后编写如下事件过程。Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 2X
33、=X+6NextNextPrint XEnd Sub程序运行后,单击命令按钮,输出结果是U /U。 A. 12 B. 13 C. 16 D.17(分数:2.00)A.B.C. D.解析:解析 观察程序,由于每次执行外层循环时 X 都被重新赋值,因此只要看到 i=4 时,执行内循环所得到的结果即可。11.VB6 共有三个版本,按功能从弱到强的顺序排列应是_。 A. 学习版、专业版和工程版 B. 学习版、工程版和专业版 C. 学习版、专业版和企业版 D. 学习版、企业版和专业版(分数:2.00)A.B.C. D.解析:12.下列说法正确的是 A. 在 Visual Basic 中的对话框分为两种类
34、型:预定义对话框和自定义对话框 B. 自定义对话框由用户根据自己需要定义的 C. 预定义对话框是用户在设置程序代码后定义的 D. MsgBox 函数是用户的自定义对话框的函数(分数:1.00)A.B. C.D.解析:解析 考查考生对对话框的理解程度。 解题要点 对话框的分类及特点。 错解分析 在Visual Basic 中,对话框分为 3 种类型:即预定义对话框、自定义对话框和通用对话框,所以选项 A) 不正确;预定义对话框也称预制对话框,是由系统提供的,Visual Basic 系统提供了两种预定义对话框:即输入框和信息框(或消息框),前者用 InputBox 函数建立,后者用 MsgBox
35、 函数建立,所以选项 C) 和选项 D) 不正确;自定义对话框也称定制对话框,这种对话框由用户根据自己的需要进行定义,输入框和信息框尽管很容易建立,但在应用上有一定的限制,所以选项 B) 是正确的;通用对话框是一种控件,用这种控件可以设计较为复杂的对话框。 考点链接 对话框的概念、对话框的应用。13.下列叙述中正确的是 A. 用 E-R 图能够表示实体集间一对一的联系、一对多的联系和多对多的联系 B. 用 E-R 图只能表示实体集之间一对一的联系 C. 用 E-R 图只能表示实体集之间一对多的联系 D. 用 E-R 图表示的概念数据模型只能转换为关系数据模型(分数:2.00)A. B.C.D.
36、解析:解析 两个实体之间的联系实际上是实体集间的函数关系,这种函数关系可以有下面 3 种,即一对一的联系、一对多(或多对一)的联系和多对多的联系。概念模型便于向各种模型转换。由于概念模型不依赖于具体的数据库管理系统,因此,容易向关系模型、网状模型和层次模型等各种模型转换。14.在数据结构中,根据各数据元素之间前后件关系的复杂程度,一般将数据结构分成两类,它们是 A. 动态结构和静态结构 B. 紧凑结构和非紧凑结构 C. 线性结构和非线性结构 D. 内部结构和外部结构(分数:1.00)A.B.C. D.解析:解析 数据的逻辑结构抽象地反映数据元素之间的逻辑关系,即数据元素之间的前后件关系,而不管
37、它在计算机中的存储表示形式。根据数据结构中各数据元素之间前后件关系的复杂程度,一般将数据结构分为两大类型:线性结构和非线性结构。15.下面程序计算并输出的是U /UPrivate Sub Command1_Click()a=10s=0Dos=s+a*a*aa=a-1Loop Until a=0Print sEnd Sub A.13+23+33+103 的值 B.10! +3! +2! +1!的值 C.(1+2+3+1O)3 的值 D.10 个 103 的和(分数:2.00)A. B.C.D.解析:解析 本题中 s=s+a*a*a 即求 a3,a=a-1 即把每次 a 减 1,直到 a=0 退出
38、循环,所以本题是求所有的 a3 之和,所以 A 选项正确。16.下列关于栈的叙述正确的是U /U A.栈按“先进先出”组织数据 B.栈按“先进后出”组织数据 C.只能在栈底插入数据 D.不能删除数据(分数:2.00)A.B. C.D.解析:解析 栈是限定在一端进行插入和删除的“先进后出”的线性表,其中允许进行插入和删除元素的一端称为栈顶。17.通过文本框的U /U属性可以获得当前插入点所在的位置。 A. Position B. SelStart C. SelLength D. SelText(分数:2.00)A.B. C.D.解析:解析 SelStart 属性返回或设置所选择的文本的起始点,如
39、果没有文本被选中,则指出插入点的位置;Se1Length 属性返回或设置所选择的字符数;Se1Text 属性返回或设置包含当前所选择文本的字符串,如果没有字符被选中,则指出插入点的位置。文本框没有 Position 属性。18.要使文本框可输入多行文字,要更改的默认选项是 A. SorollBoars 和 MultiLine B. Visible C. ScrillBoars D. 以上都不是(分数:2.00)A. B.C.D.解析:解析 Multiline 被设置为 True 时可以使用多行文字,不用改 SorollBoars19.Datetime 是 Data 类型的变量,以下赋值语句中错
40、误的是:_。 A. Datetime=# 4/14/97# B. Datetime=# September 1,1997# C. Datetime=#12:15:00 AM# D. Datetime=“8/8/99”(分数:2.00)A.B.C.D. 解析:20.下面哪个属性肯定不是框架控件的属性_。 A.Text B.Caption C.Left D.Enabled(分数:1.00)A. B.C.D.解析:解析 框架没有 Text 属性。故选 A。21.在窗体上画一个通用对话框,其名称为 CommonDialog1,然后画一个命令按钮,并编写如下事件过程:Private Sub Comman
41、d1_ Click()CommonDialog1. Flags= cd1OFNHideReadOnlyCommonDialog1. Filter=“All Files(*.*)*.*Text Files“ Min End Sub(分数:2.00)填空项 1:_ (正确答案:Min=arrl(i))解析:解析 题目要求输出数组中的最小值,分析程序可知,本程序求数组最小值的算法是,假设最小的值是第一个数组元素,并把它存在 Min 变量中,然后从数组的第二个元素开始逐个与 Min 变量对比,如果有比 Min 更小的数,则赋值给 Min,这样对比到数组最后一个元素时,就能找到最小的元素,且它存储在 M
42、in 变量中,因此最后只要输出 Min 变量值即可。39.在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程: Private Sub Form_ClickU /U Text1.Text=“VB 程序设计” End Sub PrivmeSubText1_Change() Picture1.Print“VB Programming“ End Sub 程序运行后,单击窗体,则在文本框中显示的内容是U U /U /U,而在图片框中显示的内容是U U /U /U。(分数:1.00)填空项 1:_ (正确答案:7VB 程序设计 8 VBProgramming)解析:解析 单击窗体时响应 Form
43、_Click( )事件,所以文本框的内容为“VB 程序设汁”。当文本框的内容改变后,就触发了 Text1_Change( ),所以图片框的内容变为“VB Programming“。40.InputBox 函数输入数据时,可以单击“确定”按钮或U U /U /U表示确认。(分数:2.00)填空项 1:_ (正确答案:按回车键)解析:解析 确定为默认按钮,回车即可。41.扩展名为.bas 的文件称为 1。(分数:2.00)填空项 1:_ (正确答案:程序模块文件)解析:42.一个变量未被显示定义,末尾也没有类型说明符,则该变量的隐含类型是上 1 类型。(分数:2.00)填空项 1:_ (正确答案:
44、变体)解析:43.在 Select case 结构中,使用“To 表达式”来指定一个范围时,必须把U U /U /U的值写在前面。(分数:2.00)填空项 1:_ (正确答案:较小)解析:44.在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的 Click 事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到 Text1 中,例如,若在 Tcxt1 中输入的是 abDfdb,则单击 Commandl 按钮后Text1 中显示的字符串是 ZYXWVUTSRQPONMLKJIHGEC。请填空。 Pr
45、ivate Sub Command_Click() DimSring,s As String,s As String,c As String Str=UCase(Text1) S=“ C=“Z“ WhileC=“A“ If In Ster(str,c)=0 Then s=_ End If c=Chr$(Asc(c)-1) Wend If S“Then Text1=S End If End Sub(分数:2.00)填空项 1:_ (正确答案:S+C 或 s&c)解析:45.菜单项的唯一事件是U U /U /U。(分数:1.00)填空项 1:_ (正确答案:Click 事件)解析:解析 考查考生对菜单事件的掌握情况。 解题要点 由于我们对菜单项的操作只有单击,因此菜单项唯一识别的事件是 Click 事件。 考点链接 使用菜单编辑器制作菜单。46.软件开发过程主要分为需求分析、设计、编码与测试 4 个阶段,其中 1 阶段产生“软件需求规格说明书”。(分数:2.00)填空项 1:_ (正确答案:需求分析)解析:解析 需求分析阶段的工作主要包括需求获取、需求分析、编写需求规格说明书和需求评审等 4方面,产生的主要文档为软件需求规格说明书,它可以为用户、分析人员和设计人员之间的交流