1、二级 VISUAL+BASIC-96 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.线性表常采用的两种存储结构是_。（分数：2.50）A.散列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储结构D.线性存储结构和非线性存储结构2.软件需求分析阶段的工作，可以分为四个方面：需求获取、编写需求规格说明书、需求评审和_。（分数：2.50）A.阶段性报告B.需求分析C.需求总结D.都不正确3.在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是_。（分数：2.50）A.需求分析B.详细设计C.软件设计D.概要
2、设计4.对建立良好的程序设计风格，下面描述正确的是_。（分数：2.50）A.程序应简单、清晰、可读性好B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无5.下列工具中，不属于结构化分析的常用工具的是_。（分数：2.50）A.数据流图B.数据字典C.判定树D.N-S 图6.在软件生产过程中，需求信息的来源是_。（分数：2.50）A.程序员B.项目经理C.设计人员D.软件用户7.对关系 S 和 R 进行集合运算，结果中既包含 S 中的所有元组也包含 R 中的所有元组，这样的集合运算称为_。（分数：2.50）A.并运算B.交运算C.差运算D.积运算8.设有关键码序列(Q，G
3、，M，Z，A，N，B，P，X，H，Y，S，T，L，K，E)，采用堆排序法进行排序，经过初始建堆后关键码值 B 在序列中的序号是_。（分数：2.50）A.1B.3C.7D.99.数据库的故障恢复一般是由_来执行恢复。（分数：2.50）A.电脑用户B.数据库恢复机制C.数据库管理员D.系统普通用户10.下列选项中，不属于数据模型所描述的内容的是_。（分数：2.50）A.数据类型B.数据操作C.数据结构D.数据约束11.在窗体上画一个命令按钮，然后编写如下时间过程_。 Print Sub Command1_Click() a=InputBox(“Enter the First interger“)
4、b=InputBox(“Enter the Second interger“) Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入 456 和 123，则输出结果是（分数：2.50）A.579B.123C.456D.12345612.确定一个控件在窗体上的位置的属性是_。（分数：2.50）A.Width 或 HeightB.Width 和 HeightC.Top 或 LeftD.Top 和 Left13.以下_控件没有 Caption 属性。（分数：2.50）A.CommandButtonB.CheckBoxC.TextBoxD.Label14.在窗体
5、上有一个名称为 Command1 的命令按钮，并有如下程序： Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y=1:Y=Y+5:X=5+X:Print X, Y End Sub 程序执行时，单击命令按钮 Command1 三次后，窗体上显示的结果为_。（分数：2.50）A.15 16B.5 6C.15 15D.15 615.表达式 Str(Len(“123“)+Str(77.7)的值是_。（分数：2.50）A.3+77.7B.377.7C.80.7D.12377.716.表达式 Int(-15.
6、8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是_。（分数：2.50）A.-1B.-2C.0D.117.编写如下事件过程： Private Sub Form_MouseMove(Button As Integer, Shift As Interger, X As Single, Y As Single) If(ButtonAnd 3)=3 Then Print“AAAA“ End If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为_。（分数：2.50）A.按左键并移动B.按右键并移动C.同时按下左、右键并移动D.按什么键都不显示18.
7、窗体上有一个名称为 Cbl 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是_。（分数：2.50）A.Print Cbl.SelectedB.Print Cbl.List(Cbl.ListIndex)C.Print Cbl.Selected.TextD.Print Cbl.List(ListIndex)19.窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入 12345，单击命令按钮后的输出结果为_。 PriVate Sub Command1_Click() Dim A As Integer, B As Integer Text1.SelStart=2:Text1.SelL
8、ength=2 A=Val(Text1.SelText):B=Len(Text1.Text) Print A*B End Sub（分数：2.50）A.68B.115C.1700D.17020.使用_方法，可清除列表框中所有的列表项。（分数：2.50）A.RemoveB.ClearC.RemoveItemD.Move21.下列循环能正常结束的是_。（分数：2.50）A.x=5Dox=x+1Loop Until x0B.x=1Dox=x+2Loop Until x=10C.x=10Dox=x+1Loop Until x0D.x=6Dox=x-2Loop Until x=122.程序运行时，当在空文
9、本框中依次输入 1234 时，窗体上显示的是_。 Private sub Text1_Change() Print Text1; End Sub（分数：2.50）A.1234B.12C.1121231234D.1023.在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是_。 Private Sub Form_Load() For i=1 To 10 sum=sum+i Next i Print “Sum=“; sum End Sub（分数：2.50）A.在窗体上输出 55B.在窗体上输出 sum=55C.出错D.窗体上不输出24.在窗体上画两个名称分别为 Hscroll1、H
10、scroll2 的滚动条控件；6 个名称分别为Label1、Label2、Label3、Label4、Label5、Label6 的标签，其中，Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动条 Value 属性值，Label3 显示A*B 的计算结果，如图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现求积功能的事件过程是_。 （分数：2.50）A.Private Sub Comman
11、d1_Click()Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)End SubB.Privae Sub Command1_Click()Label3.Caption=HScroll1.Value * HScroll2.ValueEnd SubC.Private Sub Command1_Click()Label3.Caption=HScroll1*HScrcll2End SubD.Pfivate Sub Command1_Click()Label3.Caption=HScroll1.Text * HScroll2.Text
12、End Sub25.设 a=6，则执行 x=IIf(a5, -1, 0)后，x 的值为_。（分数：2.50）A.5B.6C.0D.-126.以下程序执行后，在窗体上输出的图案是_。 Form1.Cls For a=1 To 5 Print Space(5-a); String(a, “*“) Next a（分数：2.50）A.*B.*C.*D.*27.假定窗体上有一个标签，名为 Label。为了使该标签透明并且没有边框，则正确的属性设置为_。（分数：2.50）A.Label1.BackStyle=0Label1.BorderStyle=0B.Label1.BackStyle=1Label1.B
13、orderStyle=1C.Label1.BackStyle=TrueLabel1.BorderStyle=TrueD.Label1.BackStyle=FalseLabel1.Borderstyle=False28.单击命令按钮时，下列程序段的执行结果为_。 Private Sub Command1_Click() Print Func1(24, 18) End Sub Public Function Func1(m As Integer, n As Integer)As Integer Do While mn Do While mn:m=m-n:Loop Do While mn:n=n-m
14、:Loop Loop Func1=m End Function（分数：2.50）A.8B.6C.4D.229.下列程序段执行后，输出的结果是_。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y（分数：2.50）A.90B.60C.40D.1030.使用语句 Dim A(1 To 10) As Integer 声明数组 A 后，以下叙述正确的是_。（分数：2.50）A.A 数组中的所有元素值为 0B.A 数组中的所有元素值不确定C.A 数组中的所有元素值为 Emp
15、tyD.执行语句“Erase A”后，A 数组中的所有元素值为 Null31.以下程序段的功能是_。 x=8.6 y=Int(x+0.5) Print y（分数：2.50）A.输出 y 的绝对值B.实现 x 的四舍五入C.实现 x 的绝对值D.实现 y 的四舍五入32.在窗体上建立一个命令控件数组 Command1，并双击第一个命令按钮，编写如下事件过程： Private Sub Command1_Click(Index As Integer) Command1(Index).Caption=Format$(Now, “hh:mm:ss“) End Sub 以下描述正确的是_。（分数：2.50
16、）A.当单击某个命令按钮时，数组中所有命令按钮的 Caption 属性将被设置为当前时间B.当单击某个命令按钮时，该按钮的 Caption 属性将被设置为当前时间C.程序有错误D.窗体的 Caption 属性将被设置为当前时间33.有如下的一个函数过程： Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) Do While num k=k*(num Mod 10) num=num/10 Loop fn=k End Function 通过以下事件过程调用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为_。
17、Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox(“请输入一个数值“) n=CLng(n):r=fn(n) Print r End Sub（分数：2.50）A.12B.6C.3D.134.下列关于函数过程的叙述中，正确的是_。（分数：2.50）A.如果不指明函数过程参数的类型，则该参数没有数据类型B.函数过程的返回值可以有多个C.函数过程形参的类型与函数返回值的类型没有关系D.当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递35.以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除
18、以 4 余 1，除以 5 余 2”的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容，在横线处应填写_。 Private Sub Command1_Click() x=Val(Text1.Text) If_Then Print x Else Text1.SetFocus Text1.Text=“ End If End Sub（分数：2.50）A.x%4=1 And x%5=2B.x%4=1 Or x%5=2C.x Mod 4=1 And x Mod 5=2D.x Mod 4=1 Or x Mod 5=236.要求当鼠标在图片框 Picture1 中移动时，立即
19、在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是_。（分数：2.50）A.Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, XAs Single Y As Single)Picture1.Print X, YEnd SubB.Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, XAs Single, Y As Single)Print X, YEnd SubC.Private Sub Picture1_Mouse
20、Down(Button As Integer, Shift As Integer, XAs Single, Y As Single)Picture.Print X, YEnd SubD.Private Sub Form_MouseMove(Button As Integer Shift As Integer, X As Single, Y As Single)Picture1.Print X, YEnd Sub37.一个工程中包含两个名称分别为 Form1、Form2 的窗体、一个名称为 Func 的标准模块。假定在Form1、Form2 和 Func 中分别建立了自定义过程，其定义格式为：
21、Form1 中定义的过程： Private Sub Fun1() End Sub Form2 中定义的过程： Private Sub Fun2() End Sub Func 中定义的过程： Private SubFun3() End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是_。（分数：2.50）A.上述 3 个过程都可以在工程中的任何窗体或模块中被调用B.Fun1 和 Fun2 过程能够在工程中各个窗体或模块中被调用C.上述 3 个过程都只能在各自被定义的模块中调用D.只在 Fun3 过程能够被工程中各窗体或模块调用38.在窗体上有一个名称为 CD1 的
22、通用对话框和一个名称为 Command1 的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“保存”，缺省文件名为“ABC”，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是_。（分数：2.50）A.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc“|CD1.FilterIndex=1CD1.DialogTitle=“保存“CD1.Action=2End SubB.Private Sub Command1_C
23、lick()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc“CD1.FilterIndex=2CD1.DialogTitle=“保存“CD1.Action=2End SubC.Private Sub Command1_Click()CD1.FileName=“保存“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc“CD1.FilterIndex=2CD1.DialogTitie=“ABC“CD1.Action=2End SubD.Privat
24、e Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc“CD1.FilterIndex=1CD1.DialogTitle=“保存“CD1.Action=1End Sub39.已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为 a1，且取消其“可见”属性，如图所示。运行时，以下_事件过程可以使快捷菜单的菜单项响应鼠标右键单击。 （分数：2.50）A.Private Sub Form_MouseDown(Button As Integer, _Shift As Int
25、eger, X As Single, Y As Single)If Button=2 Then PopupMenu a1, 2End SubB.Private Sub Form_MouseDown(Button As Integer, _Shift As Integer, X As Single, Y As Single)PopupMenu a1, 0End SubC.Private Sub Form_MouseDown(Button As Integer, _Shift As Integer, X As Single, Y As Single)PopupMenu a1End SubD.Pri
26、vate Sub Form_MouseDown(Button As Integer, Shift As_Integer, X As Single, Y As Single)If(Button=vbLetfButton) Or (Button=vbRightButton)Then PopupMenu a1End Sub40.下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是_。 Private Sub Command1_Click() Dim Num(25)As Integer, Chr1 As String Chr1=UCase(InputBox(“
27、请输入字母字符串“) For k=1 To Len(Chr1) n=Asc(Mid(Chr1, k, 1)-Asc(“A“) If n=0 Then Num(n)=Num(n)+1 End If Next k m=Num(0) For k=1 To 25 If mNum(k)Then m=Num(k) End If Next k Print m End Sub（分数：2.50）A.3B.2C.1D.0二级 VISUAL+BASIC-96 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.线性表常采用的两种存储结构是_。（分数：2.50）A.散
28、列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储结构 D.线性存储结构和非线性存储结构解析：解析 线性表的存储通常要用两种存储结构：顺序存储结构和链式存储结构。2.软件需求分析阶段的工作，可以分为四个方面：需求获取、编写需求规格说明书、需求评审和_。（分数：2.50）A.阶段性报告B.需求分析 C.需求总结D.都不正确解析：解析 软件需求分析阶段的工作，可以概括为四个方面：需求获取、需求分析、编写需求规格说明书和需求评审。 需求获取的目的是确定对目标系统的各方面需求。涉及到的主要任务是建立获取用户需求的方法框架，并支持和监控需求获取的过程。 需求分析是对获取的需求进行分析和综合
29、，最终给出系统的解决方案和目标系统的逻辑模型。 编写需求规格说明书作为需求分析的阶段成果，可以为用户、分析人员和设计人员之间的交流提供方便，可以直接支持目标软件系统的确认，又可以作为控制软件开发进程的依据。 需求评审是对需求分析阶段的工作进行复审，验证需求文档的一致性、可行性、完整性和有效性。3.在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是_。（分数：2.50）A.需求分析 B.详细设计C.软件设计D.概要设计解析：解析 软件生命周期的主要活动阶段为：可行性研究和计划制定、需求分析、软件设计、软件实现、软件测试、运行和维护。其中需求分析是对开发软件提出的需求进行分
30、析并给出详细定义，即准确地确定软件系统的功能，编写软件规格说明书及初步的用户手册，提交评审。4.对建立良好的程序设计风格，下面描述正确的是_。（分数：2.50）A.程序应简单、清晰、可读性好 B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无解析：解析 程序设计应该简单易懂，语句结构应该简单直接，不应该为提高效率而把语句复杂化。5.下列工具中，不属于结构化分析的常用工具的是_。（分数：2.50）A.数据流图B.数据字典C.判定树D.N-S 图 解析：解析 结构化分析常用工具有数据流图、数据字典、判定树和判定表。6.在软件生产过程中，需求信息的来源是_。（分数：2.50
31、）A.程序员B.项目经理C.设计人员D.软件用户 解析：解析 软件需求是指用户对目标软件系统在功能、性能、设计约束等方面的要求，是由用户提出的。7.对关系 S 和 R 进行集合运算，结果中既包含 S 中的所有元组也包含 R 中的所有元组，这样的集合运算称为_。（分数：2.50）A.并运算 B.交运算C.差运算D.积运算解析：解析 关系的并运算是指由结构相同的两个关系合并，形成一个新的关系，新关系中包含两个关系中的所有元组；8.设有关键码序列(Q，G，M，Z，A，N，B，P，X，H，Y，S，T，L，K，E)，采用堆排序法进行排序，经过初始建堆后关键码值 B 在序列中的序号是_。（分数：2.50）
32、A.1B.3 C.7D.9解析：解析 建堆的算法：首先将要排序的所有关键码放到一棵完全二叉树的各个结点中(这时的二叉树不具备堆的特性)，然后，从 i=n/2(n 为结点的个数)的结点 K i 开始，逐步把以 K n/2 ，K n/2-1 ，K n/2-2 ，为根的子树排成堆，直到以 K 1 为根的树排成堆，就完成了建堆过程。此题中，n=16，i=16/2=8，即从第 8 个结点开始，建堆完成后如下图：所以经过初始建堆后关键码值 B 在序列中的序号是 3。 9.数据库的故障恢复一般是由_来执行恢复。（分数：2.50）A.电脑用户B.数据库恢复机制C.数据库管理员 D.系统普通用户解析：解析 数据
33、库一旦发生故障，需要及时进行故障恢复，并由数据库管理员负责执行故障恢复。10.下列选项中，不属于数据模型所描述的内容的是_。（分数：2.50）A.数据类型 B.数据操作C.数据结构D.数据约束解析：解析 数据模型描述的内容包含数据结构、数据操作和数据约束。11.在窗体上画一个命令按钮，然后编写如下时间过程_。 Print Sub Command1_Click() a=InputBox(“Enter the First interger“) b=InputBox(“Enter the Second interger“) Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入
34、对话框中分别输入 456 和 123，则输出结果是（分数：2.50）A.579B.123C.456D.123456 解析：解析 InputBox 函数返回的是字符串格式的用户输入的数据，因此本题中，最后变 a 和变量 b 中存储的是字符串“456“和“123“，因此表达式 b+a，就是将这两个字符串连接起来，称为字符串“123456“。12.确定一个控件在窗体上的位置的属性是_。（分数：2.50）A.Width 或 HeightB.Width 和 HeightC.Top 或 LeftD.Top 和 Left 解析：解析 本题考查对象的基本属性。Height 和 Width 属性决定了控件的高度
35、和宽度，而 Top 和 Left属性决定了控件在窗体中的位置属性。13.以下_控件没有 Caption 属性。（分数：2.50）A.CommandButtonB.CheckBoxC.TextBox D.Label解析：解析 本题考查基本控件的常用属性。命令按钮(CommandButton)、复选框(CheckBox)以及标签(Label)都有标题(Caption)属性；而文本框没有 Caption 属性，只有 Text 属性。14.在窗体上有一个名称为 Command1 的命令按钮，并有如下程序： Private Sub Command1_Click() Static X As Integer
36、 Static Y As Integer Cls Y=1:Y=Y+5:X=5+X:Print X, Y End Sub 程序执行时，单击命令按钮 Command1 三次后，窗体上显示的结果为_。（分数：2.50）A.15 16B.5 6C.15 15D.15 6 解析：解析 本题考查静态变量。静态变量的值有继承性，上一次调用的结果在下一次调用时还是有效的。题目中每次调用 Y 的值都被重新赋值了，因此单击 3 次以后 Y 的值仍然是 6，而 X 每次调用的结果都保留，因此调用 3 次以后，结果为 15。15.表达式 Str(Len(“123“)+Str(77.7)的值是_。（分数：2.50）A.
37、3+77.7B.377.7 C.80.7D.12377.7解析：解析 本题考查字符串处理函数。Str 的功能是把数字转化为字符，Len 函数的功能是求字符串中字符的个数。题中“+”为字符串连接运算符。16.表达式 Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是_。（分数：2.50）A.-1 B.-2C.0D.1解析：解析 本题考查函数 Int 的功能，Int(x)的作用是取不大于 x 的最小的整数，Fix(x)则是简单的取整数部分。17.编写如下事件过程： Private Sub Form_MouseMove(Button As Integer,
38、 Shift As Interger, X As Single, Y As Single) If(ButtonAnd 3)=3 Then Print“AAAA“ End If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为_。（分数：2.50）A.按左键并移动B.按右键并移动C.同时按下左、右键并移动D.按什么键都不显示 解析：解析 鼠标单击时，鼠标键按下的参数 Button 可取 3 个值：按下左键时，Button 值为 1、按下右键时，Button 值为 2、按下中间键时，Button 值为 4。因此始终不能执行语句“Print“AAAA“”，也就不能输出“AA
39、AA”。18.窗体上有一个名称为 Cbl 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是_。（分数：2.50）A.Print Cbl.SelectedB.Print Cbl.List(Cbl.ListIndex) C.Print Cbl.Selected.TextD.Print Cbl.List(ListIndex)解析：解析 组合框的属性 ListIndex 返回当前所选项目的索引号，List(Index)属性返回指定索引号的列表项内容，因此返回当前选定的列表项应该用 Cbl.List(Cbl，ListIndex)。19.窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输
40、入 12345，单击命令按钮后的输出结果为_。 PriVate Sub Command1_Click() Dim A As Integer, B As Integer Text1.SelStart=2:Text1.SelLength=2 A=Val(Text1.SelText):B=Len(Text1.Text) Print A*B End Sub（分数：2.50）A.68B.115C.1700D.170 解析：解析 本题考查文本框的常见属性。文本框的 SelStart 属性和 SelLength 属性表示选中文本的开始位置和长度，第一个字符的位置为 0，SelText 表示选中的文本。Val
41、 把字符转化为数字。所以 A 为34，B 为 5，因此输出为 34*5=170。20.使用_方法，可清除列表框中所有的列表项。（分数：2.50）A.RemoveB.Clear C.RemoveItemD.Move解析：解析 本题考查列表框项目清除。在列表框中可以使用 RemoveItem 方法和 Clear 方法来清除项目，其中 RemoveItem 清除某一项，而 Clear 清除所有项。21.下列循环能正常结束的是_。（分数：2.50）A.x=5Dox=x+1Loop Until x0B.x=1Dox=x+2Loop Until x=10C.x=10Dox=x+1Loop Until x0
42、 D.x=6Dox=x-2Loop Until x=1解析：解析 本题考查 Do 型循环。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。由 Until 引出的循环条件为 False 时执行循环体，条件为 True 时退出循环：题目中选项 A 中循环变量逐渐增加，不可能小于 0，选项 B 中循环变量的步长为 2，初值为 1，不可能等于 10。而选项 C 中执行一次循环体，条件成立，退出循环。选项 D 和选项 B 相似，循环变量无法等于 1。22.程序运行时，当在空文本框中依次输入 1234
43、 时，窗体上显示的是_。 Private sub Text1_Change() Print Text1; End Sub（分数：2.50）A.1234B.12C.1121231234 D.10解析：解析 本题考查文本框的 Change 事件，Change 事件是每次文本框中的文本发生改变都要触发的事件，因此输入 1234 后，Change 事件触发了 4 次，每次都是把文本框的现有的内容输出，依次输出为1121231234。23.在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是_。 Private Sub Form_Load() For i=1 To 10 sum=sum+
44、i Next i Print “Sum=“; sum End Sub（分数：2.50）A.在窗体上输出 55B.在窗体上输出 sum=55C.出错D.窗体上不输出 解析：解析 本题考查 Load 事件运行。当装入窗体事件触发时，通常用于对属性和变量初始化，一般不使用 Print 方法，若想 Print 方法在 Form_Load 事件过程中起作用，必须设置窗体的 AutoRedraw 为True，否则 Print 方法不起作用。24.在窗体上画两个名称分别为 Hscroll1、Hscroll2 的滚动条控件；6 个名称分别为Label1、Label2、Label3、Label4、Label5、
45、Label6 的标签，其中，Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动条 Value 属性值，Label3 显示A*B 的计算结果，如图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现求积功能的事件过程是_。 （分数：2.50）A.Private Sub Command1_Click()Label3.Caption=Str(Val(Label1.Caption)*Val(Label
46、2.Caption)End SubB.Privae Sub Command1_Click()Label3.Caption=HScroll1.Value * HScroll2.ValueEnd SubC.Private Sub Command1_Click()Label3.Caption=HScroll1*HScrcll2End SubD.Pfivate Sub Command1_Click()Label3.Caption=HScroll1.Text * HScroll2.TextEnd Sub 解析：解析 本题考查滚动条的属性。滚动条 Value 属性表示滑块的位置值，为数值型；而标签的Cap
47、tion 为字符串型。因此，要将滚动条的 Value 属性值显示在标签上，需要进行类型转换(将数值型数据转换成字符串型数据)。25.设 a=6，则执行 x=IIf(a5, -1, 0)后，x 的值为_。（分数：2.50）A.5B.6C.0D.-1 解析：解析 本题考查 IIf 函数。IIf 函数可用于执行简单的条件判断操作，其格式为：result=IIf条件，True 部分，False 部分)，其中“result”是函数的返回值，“条件”是一个逻辑表达式。当“条件”为真时，IIf 函数返回“True 部分”的值；当“条件”为假时返回“False 部分”的值。“True 部分”或“False 部
48、分”可以是表达式、变量或其他函数。题目中 a 大于 5 成立，因此表达式值为-1。26.以下程序执行后，在窗体上输出的图案是_。 Form1.Cls For a=1 To 5 Print Space(5-a); String(a, “*“) Next a（分数：2.50）A.* B.*C.*D.*解析：解析 本题考查循环语句的分析。循环中共输出 5 行，每一行首先输出 5-a 个空格，然后输出 a个“*”号。a 的变化为 1 到 5，步长为 1。27.假定窗体上有一个标签，名为 Label。为了使该标签透明并且没有边框，则正确的属性设置为_。（分数：2.50）A.Label1.BackStyle=0Label1.BorderS
