2016年全國計算機等級考試二級筆試試卷

(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