一、填空題(每空2分,共30分)
(1)對下列二叉樹進行中序遍歷的結果 【1】 。
(2)按照軟件測試的一般步驟,集成測試應在 【2】 測試之後進行。
(3)軟件工程三要素包括方法、工具和過程,其中, 【3】 支持軟件開發的各個環節的控制和管理。
(4)數據庫設計包括概念設計、 【4】 和物理設計。
(5)在二維表中,元組的 【5】 不能再分成更小的數據項。
(6)在窗體上畫一個文本框、一個標籤和一個命令按鈕,其名稱分別爲Text1、Label1和Command1,然後編寫如下兩個事件過程:
Private Sub Command1_Click( )
S$=InputBox("請輸入一個字符串")
=S$
End Sub
Private Sub Text1_Change( )
ion=UCase(Mid(, 7))
End Sub
程序運行後,單擊命令按鈕,將顯示一個輸入對話框,如果在該對話框中輸入字符串“VisualBasic”,則在標籤中顯示的內容是 【6】 。
(7)在窗體上畫一個命令按鈕,其名稱爲Command1,然後編寫如下事件過程:
Private Sub Command1_Click( )
a$="National Computer Rank Examination"
n=Len(a$)
s=0
For i=1 To n
b$=Mid(a$, i, 1)
If b$="n" Then
s=s+1
End If
Next i
Print s
End Sub
程序運行後,單擊命令按鈕,輸出結果是 【7】 。
(8)爲了在運行時把d:pic文件夾下的圖形文件a.jpg裝入圖片框Picture1,所使用的語句爲 【8】 。
(9)設有如下程序:
Private Sub Form_Click( )
Cls
a$="ABCDFG"
For i=1 To 6
Print Tab(12-i); 【9】
Next i
End Sub
程序運行後,單擊窗體,結果如圖所示,請填空
(10)在窗體上畫一個命令按鈕,其名稱爲Command1,然後編寫如下代碼:
Option Base 1
Private Sub Command1_Click( )
Dim Arr
Arr=Array(43, 68, -25, 65, -78, 12, -79, 43, -94, 72)
pos=0
neg=0
For k=1 To 10
If Arr(k)>0 Then
【10】
Else
【11】
End If
Next k
Print pos, neg
End Sub
以上程序的`功能是,計算並輸出數組Arr中10個數的正數之和pos與負數之和neg,請填空。
(11)在窗體上畫一個名爲Command1的命令按鈕,然後編寫如下程序:
Private Sub Command1_Click( )
Dim i As Integer
Sum=0
n=InputBox("Enter a number")
n=Val(n)
For i=1 To n
Sum= 【12】
Next i
Print Sum
End Sub
Function fun(t As Integer)As Long
p=1
For i=1 To t
p=p*i
Next i
【13】
End Function
以上程序的功能是,計算1!+2!+3!+…+n!,其中n從鍵盤輸入,請填空。
(12)在窗體上畫一個文本框,名稱爲Text1,然後編寫如下程序:
Private Sub Form_Load( )
Open "d:temp" For Output As #1
=""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If UCase()= 【14】 Then
Close #1
End
Else
Write #1, 【15】
=""
End If
End If
End Sub
以上程序的功能是:在D盤temp文件夾下建立一個名爲dat.txt的文件,在文本框中輸入字符,每次按回車鍵都把當前文本框中的內容寫入文件dat.txt,並清除文本框中的內容:如果輸入“END”,則不寫入文件,直接結束程序。請填空。
【參考答案】
(1)DBXEAYFZC
(2)單元
(3)過程
(4)邏輯設計
(5)分量
(6)BASIC
(7)4
(8)Picture1.picture=
"d:pica.jpg"或
Picture1.Picture=
LoadPicture("d:pica.jpg")
(9)Right(a$,i)或者Mid(a$,7-i)
(10)pos=pos+Arr(k)
(11)neg=neg+Arr(k)
(12)sum+fun(i)
(13)fun=p
(14)END
(15)或Text1