二、填空题。

　　(1)某二叉树有5个度为2的结点，则该二叉树中的叶子结点数为 。

　　(2)设一个队列的初始状态为空。现将元素A,B,C,D,E,F,5,4,3,2,1依次入队，然后再依次退队，则元素退队的顺序为 。

　　(3)对模块独立性度量的两个定性标准是耦合性与内聚性。描述模块间互相连接的紧密程度的是 。

　　(4)“软件系统”的系统结构图如下图所示：该系统的最大扇出数是 。

　　(5)数据库设计包括概念设计、 和物理设计。

　　(6)设有如下程序：

　　Option Base 0

　　Private Sub Command1_Click()

　　Dim 或【arr】

　　Dim i As Integer

　　arr = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)

　　For i = 0 To 3

　　Print arr

　　Next

　　End Sub

　　当运行程序，并单击命令按钮后，窗体上显示5 4 3 2。请填空，使程序能够完成此项功能。

　　(7)在窗体上建立一个有4个元素、名称为Label1的标签数组，下标从0开始，各元素的Caption属性值依次为“等”、“级”、“考”、“试”;再画一个名称为Timer1的计时器控件，其 Interval属性设为1000.窗体如图所示。

　　程序运行时，从左到右反复显示这4个字，但每次只显示1个。请填空，使程序实现上述功能。

　　Dim i As Integer

　　Private Sub Form_Load()

　　For i = 0 To 3

　　Label1(i).Visible = False

　　Next

　　End Sub

　　Private Sub Timer1_Timer()

　　If i 3 Then

　　Label1(i).Visible = True

　　If i = 0 Then

　　Label1(3).Visible =

　　Else

　　Label1 .Visible = False

　　End If

　　i = i + 1

　　Else

　　i = 0

　　End If

　　End Sub

　　(8)窗体上有一个名称为Combo1的组合框，其中已经添加了若干项目。程序运行时，单击Command1命令按钮，会把选中的项目从组合框中删除。请填空。

　　Private Sub Command1_Click()

　　Dim str As String

　　Dim i As Integer

　　str = RTrim( .Text)

　　If str > "" Then

　　For i = 0 To

　　If Combo1.List(i) = str Then Combo1.RemoveItem

　　Next i

　　End If

　　End Sub

　　(9)设命令按钮的单击事件过程如下：

　　Private Sub Command1_Click()

　　Open "e:\file1.txt" For As #1

　　Print #1, "Testing"

　　Close #1

　　Open "e:\file1.txt" For Append As #1

　　#1, "ABCDEF"

　　Close #1

　　End Sub

　　程序的功能是：建立一个名称为file1.txt的文件，写入字符串“Testing”，关闭文件后再次打开，再写入字符串“ABCDEF”。请填空使程序完整。

扫描/长按二维码帮助考试通关

2018年等考报考资讯

2018等考各科通关技巧

2018各科最新预测试卷

2018等考各科备考资料

微信搜索"考试吧"了解更多考试资讯、下载备考资料

　　相关推荐：

　　2018年全国计算机等级考试必做试题汇总(各科目)

　　2018年全国计算机等级考试复习知识点汇总(各科目)

　　2018计算机等级考试报名时间|各地报名入口|报名条件

　　2018年全国计算机等级考试时间|教材目录（2018年版）

　　2018全国计算机等级考试备考经验及应试技巧汇总

　　报名方法|考试内容|考试大纲|2018计算机等级考试科目

　　历年真题汇总|考试吧策划：2018年计算机等级考试报考指南