二、填空題。

　　(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”。請填空使程序完整。