1、二级 VISUAL+BASIC 笔试-320 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.有如下程序：Function F(a As Integer)b = 0Static Cb = b + 1c = c + 2F = a + b + cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2For i=1 To 3Print F(（分数：2.00）A.；Next iEnd Sub2.下列关于队列的叙述正确的是（分数：2.00）A.在队列中只能插入数据B.在队列中只能删除
2、数据C.队列是先进先出的线性表D.队列是先进后出的线性表3.假定窗体的名称(Name 属性)为 Form1，则将窗体的标题设置为“等级考试”的语句为（分数：2.00）A.Form1=“等级考试“B.Caption=“等级考试“C.Form1Text=“等级考试“D.Form1Name=“等级考试“4.将 E-R 图转换到关系模式时，实体与联系都可以表示成（分数：2.00）A.属性B.关系C.键D.域5.算法指的是（分数：2.00）A.计算机程序B.解决问题的计算方法C.排序算法D.解题方案准确而完整的描述6.在窗体(Name 属性为 Form1)上画两个文本框(其 Name 属性分别为 Tex
3、t1 和 Text2)和一个命令按钮(Name属性为 Command1)，然后编写如下两个事件过程：Private Sub Command1_Click()A=Text1.Text+Text2.TextPrint aEnd SubPrivate SUb Form 胃 Load()Text1.Text= “ “Text2.Text=“ “End Sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入 33 和 44，然后单击命令按钮，则输出结果为（分数：2.00）A.77B.33+44C.3344D.44337.在窗体上画一个名称为 Commandl 的命令按钮，然
4、后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer，y As Integerx = 41： y = 54Call sub1(x，y)x = x + 1Print x； yEnd SubPrivate Sub sub1(n As Integer， ByVal m As Integer)n=n Mod 10m=m/10End Sub程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.41 54B.2 54C.1 3D.42 38.以下合法的变量名是（分数：2.00）A.Len1B.LenC.6LenD.Lena9.下列有关测
5、试的论述中，错误的是（分数：2.00）A.证明错误存在B.证明错误不存在C.发现程序中的错误D.提供诊断信息10.为了使文本框同时具有水平和垂直滚动条，应先将 MultiLine 属性设置为 True，然后再将 ScrollBars 属性设置为（分数：2.00）A.0B.1C.2D.311.关于 Move 方法，下列叙述正确的是（分数：2.00）A.用来移动窗体和控件，不能改变其大小B.“对象”是窗体时，移动基准以屏幕左边界和上边界为准C.Move 方法移动除计时器以外的所有标准控件D.“对象”是控件时，移动基准以屏幕左边界和上边界为准12.在窗体上画一个命令按钮，然后编写如下程序：Optio
6、n Base 1Private Sub Command1 Click()Dim Arr1(12)As Integer， Arr2(3)As IntegerDim Sum As IntegerSum = 2For i=1 To 12Arrl(i)= iNext iFor i=1 To 3Arr2(i)= Arrl(i*i)Next iFor i = 1 To 3Sum = Sum + Arr2(i)Next iPrint SumEnd Sub程序运行后，单击命令按钮，在窗体上的输出结果为（分数：2.00）A.16B.24C.32D.3613.对序列(7，19，24，13，31，8，82，18，4
7、4，63，5，29)进行一趟排序后得到的结果如下：(7，18，24，13，5，8，82，19，44，63，31，29)，则可以认为使用的排序方法是（分数：2.00）A.希尔排序B.插入排序C.快速排序D.选择排序14.以下关于 Visual Basic 程序模块的描述正确的是（分数：2.00）A.标准模块中的所有过程可以在整个工程文件的范围内被调用B.窗体模块 Form1 中的过程可以调用其他窗体中被声明为 Public 的通用过程C.如果工程文件中包含 sub Main 过程，则运行该工程文件时，一定先执行 sub Main 过程D.如果工程文件中不包含 sub Main 过程，则程序从第一
8、个创建的窗体开始运行15.下列工具中，需求分析常用的工具是（分数：2.00）A.PADB.PFDC.N-SD.DFD16.击窗体中的对象后，Visual Basic 将显示的窗口是（分数：2.00）A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口17.为了使标签覆盖背景，应将 BackStyle 属性设置为（分数：2.00）A.0B.1C.TrueD.False18.在窗体上画两个文本框(其名称分别为 Textl 和 Text2)和一个命令按钮(其名称为 Command1)，然后编写如下两个事件过程：Private Sub Command1_Click()Text1.Text=“Micr
9、osoft Visual Basic“End SubPrivate Sub Text1_Change()Text2.Text=UCase(Text1.Text)End Sub程序运行后，单击命令按钮，则在 Text2 文本框中显示的内容是（分数：2.00）A.Microsoft Visual BasicB.microsoft visual basicC.MICROSOFT VISUAL BASICD.空字符串19.设已经建立如下表的菜单结构：标题 名称 层次数据库操作 Db 1添加记录 Tj 2查询记录 Cx 2按姓名查询 Xm 3按学号查询 Xh 3删除记录 Delete 2在窗体上还有一个
10、名称为 c1 的命令按钮，要求在运行时，单击命令按钮则将菜单项“按姓名查询”设置为无效，下面正确的事件过程是（分数：2.00）A.Private Sub c1 Click()CxXmEnabled=FalseEnd SubB.Private Sub c1 Click()DbCxXmEnabled=FalseEnd SubC.Private Sub c1 Click()XrnEnabled=FalseEnd SubD.Private Sub c1 Click()MeDbCxXmEnabled=FalseEnd Sub20.关于结构化程序设计原则和方法的描述错误的是（分数：2.00）A.选用的控制
11、结构只准许有一个入口和一个出口B.复杂结构应该用嵌套的基本控制结构进行组合嵌套来实现C.不允许使用 GOTO 语句D.语言中没有的控制结构，应该采用前后一致的方法来模拟21.在窗体上画两个文本框(其 Name 属性分别为了 ext1 和 Text2)和一个命令按钮(其 Name 属性为Command1)，然后编写如下事件过程：Private Sub Command1_Click()x = 0： n = 0Do Until x = 30x = (n + 2)* (n + 3)n = n + 1LoopText1Text = Str(n)Text2Text = Str(x)End Sub程序运行后
12、，单击命令按钮，在两个文本框中显示的值分别为（分数：2.00）A.2 和 30B.2 和 240C.3 和 50D.4 和 3022.下面列出的条目中，哪些是数据库技术的主要特点数据的结构化 数据的冗余度小较高的数据独立性 程序的标准化（分数：2.00）A.、和B.和C.、和D.都是23.设有如下变量声明 Dim timel As Date，为变量 time1 正确赋值的表达式是（分数：2.00）A.time1=#11:34:04#B.time1=Format(Time，“yy:mm:dd“)C.time1=#“11:34:04“#D.fime1=Format(“hh:mm:ss“，Tim24
13、.假定有下面的程序段：For i=1 To 3For j = 1 To iFor k=j To 3Print “i = “；i，“j=“；i，“k =“；kNext kNext jNext i这是一个三重循环程序，在这个程序中，外层、中层和内层循环的循环次数是（分数：2.00）A.3、6 和 14B.3、8 和 16C.3、4 和 12D.3、9 和 1825.某线性表采用顺序存储结构，每个元素占 4 个存储单元，首地址为 200，则第 12 个元素的存储地址为（分数：2.00）A.248B.247C.246D.24426.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过
14、程：Private Sub Command1_Click()a = 0For m=1 To 10a = a + 1b = 0For j=1 To 10a = a + 1b = b + 2Next jNext mPrint a，bEnd Sub程序运行时，单击命令按钮 Command1 后，窗体上显示的结果为（分数：2.00）A.10 20B.20 110C.110 20D.200 11027.在窗体上画一个名称为 Timer1 的计时器、一个名称为 Command1 的命令按钮和一个名称为 Labell 的标签。程序如下：Private Sub Command1_Click()Timer1En
15、abled=TrueTimer1Interval=1000End SubPrivate Sub Timerl_timer()LabellCaption=TimeEnd Sub当运行程序后，单击命令按钮，将在标签中显示的内容为（分数：2.00）A.TimeB.TrueC.1000D.10：06：5528.Visual Basic 预先设置好的，能够被对象识别的动作是（分数：2.00）A.方法B.事件C.对象D.属性29.在窗体中添加一个命令按钮，名称为 Commandl，然后编写如下程序：Private Sub Command1_Click()Dim a As Integer，b As Stri
16、ng，C As Integera = 1234 : b = Str(（分数：2.00）A.c = Len(B.两个标签，其名称分别为 Label1 和Label2。编写程序，使得程序运行后，在文本框 Text2 中输入小写字母，能转换为比此字母的 ASCII 码小4 的大写字母，结果显示在文本框 Text1 中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是（分数：2.00）A.Private Sub Form Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd SubPrivate Sub Text2_KeyDown
17、(KeyCode As Integer，Shift As Integer)Text1Text=Chr(KeyCode-4)End SubB.Private Sub Form_Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer)Text1Text=Text1Text+Chr(KeyCode-4)End SubC.Private Sub Form_Load()ShowText1Text=“ “Text2Text=“
18、“Text2SetFocusEnd SubPrivate Sub Text2_Click(KeyCode As Integer，Shift As Integer)Text1Text=Text1Text+Chr(KeyCOde-4)End SubD.Private Sub Form_Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd SubPrivate Sub Text2_Click(KeyCode As Integer，Shift As Integer)Text1Text=Chr(KeyCode-4)End Sub32.一棵有 16 个结
19、点的完全二叉树，对它按从上到下，从左至右给结点编号，则对于编号为 7 的结点 X，它的父结点及右子结点的编号分别为（分数：2.00）A.2，14B.2，15C.3，14D.3，1533.下列叙述中正确的是（分数：2.00）A.只有窗体才是 Visual Basic 中的对象B.只有控件才是 Visual Basic 中的对象C.窗体和控件都是 Visual Basic 中的对象D.窗体和控件都不是 Visual Basic 中的对象34.在窗体上画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1 Click()Dim aa=Array(1，
20、 2， 3， 4)j = 1For i = 4 To 1 Step -1s = s + a(i)* ji = j * 10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果为（分数：2.00）A.4321B.12C.34D.123435.为了在程序运行时，使被遮的窗口又重现，用窗体的 Picture 属性设置的背景图像会自动重画，设置值为 True 的属性是（分数：2.00）A.ScaleB.AutoRedrawC.ResizeD.AutoSize二、填空题(总题数：15，分数：30.00)36.如下图所示的二叉树，若按后序遍历，则其输出序列为 【1】 。（分数：
21、2.00）填空项 1:_37.在长度为 n 的线性表中顺序查找元素 x 时，成功查找的平均查找长度为 【2】 。（分数：2.00）填空项 1:_38.在面向对象的方法中，一个对象请求另一个对象为其服务是通过发送 【3】 来完成的。（分数：2.00）填空项 1:_39.软件开发环境是全面支持软件开发全过程的 【4】 集合。（分数：2.00）填空项 1:_40.给出了数据库物理存储结构与物理存取方法称为数据库的 【5】 。（分数：2.00）填空项 1:_41.响应某个事件后所执行的操作通过一段程序代码来实现，这样的一段程序代码叫做 【6】 。（分数：2.00）填空项 1:_42.在程序执行闲置循环
22、过程中，程序的控制权被系统占用。若要获得控制权，可以使用一个语句，这样用户可以在获得系统的控制权后进行其他操作，这个语句是 【7】 。（分数：2.00）填空项 1:_43.要求打开随机文件“c:/Example.txt”文件，文件号为 1，实现的语句是 【8】 。（分数：2.00）填空项 1:_44.程序如下：Private Sub Form_Click()Const PI=3.14159Dim r As Single，S As SingleR=InputBox(“请输入圆的半径“，“输入数据“，“50“)S = PI*r*rPrint “S=“；Format(S，“#，#.#“)End Su
23、b 程序运行后，单击窗体，将显示一个输入对话框，输入数据 35，单击“确定”按钮后，输出结果为 【9】 。（分数：2.00）填空项 1:_45.在窗体上画一个列表框，然后编写如下两个事件过程：Private Sub Form_Click()List1RemoveItem 1List1Removeltem 3List1RemoveItem 1End SubPrivate Sub Form Load()List1AddItem “ItemA“List1AddItem “ItemB“List1AddItem “ItemC“List1AddItem “ItemD“List1AddItem “ItemE
24、“End Sub运行上面的程序，然后单击窗体，列表框中所显示的项目为 【10】 。（分数：2.00）填空项 1:_46.计时器事件之间的间隔通过 【11】 属性设置。（分数：2.00）填空项 1:_47.下列过程的功能是：用来计算并输出 S=1+1/2+1/3+1/100 的值，请完善下列程序。Furiction SumD (n As Integer)As Singles = 1i = 1 Doi = i + 1s = s + 1 / iLoop Until 【12】 SumD = sEnd FunctionPrivate Sub Form Click()sum1=SumD(100)Print
25、 “sum1=“； sum1End Sub（分数：2.00）填空项 1:_48.语句 Static x(7，8)As Double 定义了 【13】 个元素。（分数：2.00）填空项 1:_49.下列程序运行后，在窗体上打印的结果是 【14】 。Private Sub test(a， b，c)a = a + 1： b = b + 2：C = C + 3End SubPrivate Sub Command1 Click()x = 1：v = 2：z = 3Call test(x，y + 3， (z)Print “Main:“；x；y；zEnd Sub（分数：2.00）填空项 1:_50.编写如下
26、通用过程：Sub proc(By Val num As Long，ByRef ren As Long)Dim k As LongK = 1num=Abs(num)Do While numk= k *(num Mod 10)num=num/ 10Loopren=kEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1 Click()Dim n As Long， r As Longn=InputBox(“请输入一个整数“)n = CLng(n)proc n，rPrint rEnd Sub程序运行后，单击命令按钮，在输入对话框中输入 345，输出结果是
27、【15】 。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-320 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.有如下程序：Function F(a As Integer)b = 0Static Cb = b + 1c = c + 2F = a + b + cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2For i=1 To 3Print F(（分数：2.00）A.；Next iEnd Sub解析：分析 由于在于函数 F 中，变量 c 是静态
28、变量。当两次单击命令按钮时，共 6 次调用函数 F，每次调用时，变量 c 值增加 2，而变量 a 和 b 每次调用时其值均为 2 和 1。最终在窗体上显示的内容为：2+1+8=11，2+1+10=13，2+1+12=15。2.下列关于队列的叙述正确的是（分数：2.00）A.在队列中只能插入数据B.在队列中只能删除数据C.队列是先进先出的线性表 D.队列是先进后出的线性表解析：分析 队列是只能在表的一端进行插入并在另一端进行删除操作的线性表。队列的操作是按“先进先出”的原则进行的，因此队列又称先进先出或后进后出线性表。3.假定窗体的名称(Name 属性)为 Form1，则将窗体的标题设置为“等级
29、考试”的语句为（分数：2.00）A.Form1=“等级考试“B.Caption=“等级考试“ C.Form1Text=“等级考试“D.Form1Name=“等级考试“解析：分析 Caption 属性用来定义窗体标题。启动 Visual Basic 或执行“工程”菜单中的“添加窗体”命令后，窗体使用的是默认标题(如 Form1、 Form2)。用 Caption 属性可以将窗体标题改为所需要的名字，该属性既可通过属性窗口设置，也可以在事件过程中通过程序代码设置。4.将 E-R 图转换到关系模式时，实体与联系都可以表示成（分数：2.00）A.属性B.关系 C.键D.域解析：分析 将 E-R 图转换
30、成指定 RDBMS 中的关系模式是数据库逻辑设计的主要工作。从 E-R 图到关系模式的转换是比较直接的，实体与联系都可以表示成关系。5.算法指的是（分数：2.00）A.计算机程序B.解决问题的计算方法C.排序算法D.解题方案准确而完整的描述 解析：分析 算法是指解题方案准确而完整的描述。算法不等于程序，也不等于计算方法，更不是排序算法。6.在窗体(Name 属性为 Form1)上画两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(Name属性为 Command1)，然后编写如下两个事件过程：Private Sub Command1_Click()A=Text1.
31、Text+Text2.TextPrint aEnd SubPrivate SUb Form 胃 Load()Text1.Text= “ “Text2.Text=“ “End Sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入 33 和 44，然后单击命令按钮，则输出结果为（分数：2.00）A.77B.33+44C.3344 D.4433解析：分析 对于该题，初学者一般都会认为选项 A 是答案，这是因为还没有建立数值和字符的概念。在文本框中的内容，在形式上无论是数值还是字符，实际上它都是字符。本题中的加号(+)对字符来讲是起到连接的作用，所以输出的是“3344”
32、。7.在窗体上画一个名称为 Commandl 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer，y As Integerx = 41： y = 54Call sub1(x，y)x = x + 1Print x； yEnd SubPrivate Sub sub1(n As Integer， ByVal m As Integer)n=n Mod 10m=m/10End Sub程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.41 54B.2 54 C.1 3D.42 3解析：分析 在 Function(参数
33、表列)过程中，“参数表列”指明了调用时传送给过程的参数类型和个数，每个参数的格式为：ByValByRef变量名()As 数据类型其中系统默认为 ByRef，它指明参数传送是以传地址进行的，实际参数变量的值会由于过程中对形参的操作而改变。而 ByVal 则不同，参数传送，是以传值传送的，实际参数变量的值不再由于过程中对形参的操作而改变，本题目中过程 sub1 的参数 n 是传地址引用，而参数m 是传值引用，因此 x 的值改变，x=21/10+1=2；而 y 值不改变，仍为 54。答案为选项 B。8.以下合法的变量名是（分数：2.00）A.Len1 B.LenC.6LenD.Lena解析：分析 V
34、rmal Basic 中规定变量名的首字符必须是字母，不能包含%、两个标签，其名称分别为 Label1 和Label2。编写程序，使得程序运行后，在文本框 Text2 中输入小写字母，能转换为比此字母的 ASCII 码小4 的大写字母，结果显示在文本框 Text1 中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是（分数：2.00）A.Private Sub Form Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer，Sh
35、ift As Integer)Text1Text=Chr(KeyCode-4)End SubB.Private Sub Form_Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer)Text1Text=Text1Text+Chr(KeyCode-4)End Sub C.Private Sub Form_Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd Sub
36、Private Sub Text2_Click(KeyCode As Integer，Shift As Integer)Text1Text=Text1Text+Chr(KeyCOde-4)End SubD.Private Sub Form_Load()ShowText1Text=“ “Text2Text=“ “Text2SetFocusEnd SubPrivate Sub Text2_Click(KeyCode As Integer，Shift As Integer)Text1Text=Chr(KeyCode-4)End Sub解析：分析 当在文本框 Text2 中输入小写字母时，能触发的是
37、KeyDown 事件，而不能触发 Click 事件，所以选项 C 和 D 是错误的。选项 A 的文本框中每次只能显示一个字符，而选项 B 是正确的答案。32.一棵有 16 个结点的完全二叉树，对它按从上到下，从左至右给结点编号，则对于编号为 7 的结点 X，它的父结点及右子结点的编号分别为（分数：2.00）A.2，14B.2，15C.3，14D.3，15 解析：分析 根据完全二叉树性质 6，按从上到下，从左至右给结点编号，若 k1，则父结点编号为 INT(k/2)，所以第 7 号结点的父结点编号是 3。若 2kn，则编号为 k 的左子结点编号为 2k；否则该结点无左子结点(显然也没有右子结点)
38、。若 2k+1n，则编号为 k 的右子结点编号为 2k+1；否则该结点无右子结点。因此编号为 7 的结点的右子结点编号为 15。33.下列叙述中正确的是（分数：2.00）A.只有窗体才是 Visual Basic 中的对象B.只有控件才是 Visual Basic 中的对象C.窗体和控件都是 Visual Basic 中的对象 D.窗体和控件都不是 Visual Basic 中的对象解析：分析 Visual Basic 中有两种最基本的对象就是窗体和控件。34.在窗体上画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1 Click()Dim
39、 aa=Array(1， 2， 3， 4)j = 1For i = 4 To 1 Step -1s = s + a(i)* ji = j * 10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果为（分数：2.00）A.4321B.12C.34D.1234 解析：分析 函数 Array 给数组 a 赋初值，结果为其元素值和下标一样。变量 s 的计算过程为：s =0、4、34、234、1234，最后输出 1234。变量 j 的计算过程为：j=1、10、100、1000、10000。35.为了在程序运行时，使被遮的窗口又重现，用窗体的 Picture 属性设置的背景图
40、像会自动重画，设置值为 True 的属性是（分数：2.00）A.ScaleB.AutoRedraw C.ResizeD.AutoSize解析：分析 AutoRedraw 属性控制屏幕图像的重建，主要用于多窗体程序设计中。二、填空题(总题数：15，分数：30.00)36.如下图所示的二叉树，若按后序遍历，则其输出序列为 【1】 。（分数：2.00）填空项 1:_ （正确答案：DBFHGECA）解析：分析 后序遍历的过程是：首先遍历左子树，然后遍历右子树，最后访问根结点，并且，在遍历左、右子树时，仍然先遍历左子树，然后遍历右子树，最后访问根结点。因此，这棵二叉树的后序遍历序列为 DBFHGECA。
41、37.在长度为 n 的线性表中顺序查找元素 x 时，成功查找的平均查找长度为 【2】 。（分数：2.00）填空项 1:_ （正确答案：(n+1)/2）解析：分析 假设在每个位置查找概率相等，即 p1=p2=pn=1/n，若是从表尾向表头方向查找，则每个位置上查找比较次数为 Cn=1， Cn-1=2，C1=n。于是，成功查找的平均查找长度为：*38.在面向对象的方法中，一个对象请求另一个对象为其服务是通过发送 【3】 来完成的。（分数：2.00）填空项 1:_ （正确答案：消息）解析：分析 对象之间的相互作用和通信是通过消息来完成的。当对象 A 要执行对象 B 的方法时，对象A 发送一个消息到对
42、象 B。接受对象需要有足够的信息，以便知道要它做什么。通常，一个消息由下述 3部分组成：接收消息的对象的名称；消息标识符(消息名)；零个或多个参数。39.软件开发环境是全面支持软件开发全过程的 【4】 集合。（分数：2.00）填空项 1:_ （正确答案：软件工具）解析：分析 软件开发环境(或称软件工程环境)是全面支持软件开发全过程的软件工具集合。这些软件工具按照一定的方法或模式组织起来，支持软件生命周期内各个阶段和各项任务的完成。40.给出了数据库物理存储结构与物理存取方法称为数据库的 【5】 。（分数：2.00）填空项 1:_ （正确答案：内部级模式或物理模式）解析：分析 数据库系统在其内部
43、具有三级模式及二级映射。三级模式分别是概念级模式、内部级模式与外部级模式。概念级模式是数据库系统中全局数据逻辑结构的描述，是全体用户(应用)的公共数据视图。外部级模式也称子模式或用户模式，它是用户的数据视图，也就是用户所见到的数据模式，它由概念级模式推导而出。内部级模式又称物理模式，它给出了数据库物理存储结构与物理存取方法。41.响应某个事件后所执行的操作通过一段程序代码来实现，这样的一段程序代码叫做 【6】 。（分数：2.00）填空项 1:_ （正确答案：事件过程）解析：分析 响应某个事件后所执行的操作通过一段程序代码来实现，这样的一段程序代码叫做事件过程(Event Procedure)。
44、42.在程序执行闲置循环过程中，程序的控制权被系统占用。若要获得控制权，可以使用一个语句，这样用户可以在获得系统的控制权后进行其他操作，这个语句是 【7】 。（分数：2.00）填空项 1:_ （正确答案：DoEvents）解析：分析 Visual Basic 提供了一个 DoEvents 语句。当执行闲置循环时，可以用它将控制权交给周围环境使用，然后回到原来程序继续执行。43.要求打开随机文件“c:/Example.txt”文件，文件号为 1，实现的语句是 【8】 。（分数：2.00）填空项 1:_ （正确答案：Open “c：/Exampletxt“ For Random As#1）解析：分
45、析 与顺序文件不同，打开一个随机文件后，既可用于写操作，也可用于读操作。打开随机文件的一般格式为：Open“文件名称“For Random As #文件号 Len =记录长度44.程序如下：Private Sub Form_Click()Const PI=3.14159Dim r As Single，S As SingleR=InputBox(“请输入圆的半径“，“输入数据“，“50“)S = PI*r*rPrint “S=“；Format(S，“#，#.#“)End Sub 程序运行后，单击窗体，将显示一个输入对话框，输入数据 35，单击“确定”按钮后，输出结果为 【9】 。（分数：2.00
46、）填空项 1:_ （正确答案：S=3，848.45）解析：分析 本题用 Format 函数对数值进行格式化输出，要输出的数值存放在变量 S 中。 Format 函数的第一个参数对变量 S 进行了四舍五入处理，保留两位小数，第 3 位小数四舍五入，其值为 3 848.45。Format 函数的第二个参数是格式说明符，使用的说明符有“#”和“，”，保留两位小数，该函数的返回值为 3，848.45。45.在窗体上画一个列表框，然后编写如下两个事件过程：Private Sub Form_Click()List1RemoveItem 1List1Removeltem 3List1RemoveItem 1
47、End SubPrivate Sub Form Load()List1AddItem “ItemA“List1AddItem “ItemB“List1AddItem “ItemC“List1AddItem “ItemD“List1AddItem “ItemE“End Sub运行上面的程序，然后单击窗体，列表框中所显示的项目为 【10】 。（分数：2.00）填空项 1:_ （正确答案：ItemA ItemD）解析：分析 AddItem 方法用来在列表框中插入一行文本。RemoveItem 方法用来删除列表框中指定的项目，格式为：列表框RemoveItem 索引值其中“索引值”是从 0 开始的。本题中，先删除第 1 项(第二行)的内容“ItemB”，再删除第 3 项(第四行)的内容“ItemE”，再删除第 1 项(第二行)的内容“ItemC”，最后剩下“ItemA”和“ItemD”。46.计时器事件之间的间隔通过 【11】 属性设置。（分数：2.00）填空项 1:_ （正确答案：Interval）解析：分析 Interval 属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为 0 65535，因此其最大时间间隔不能超过 65 秒。 60000 毫秒为 1 分钟，如果将 Interval 属性设置为 1000，则表
