【正文】
的空間、輸入的初始數(shù)據(jù)所占的存儲空間及算法執(zhí)行過程中所需要的額外空間。 (3) D [解析] 循環(huán)隊列是將順序隊列首尾相連形成的,隨著插入元素或刪除元素的進行,其隊頭指針及隊尾指針是在不斷變化的,有時可能會出現(xiàn)隊頭指針大于隊尾指針的情況,也可能是隊尾指針大于隊頭指針,故答案為D)。棧頂元素總是后被插入的元素,也是最先被刪除的元素;棧底元素總是最先被插入的元素,也是最后才能被刪除的元素。根據(jù)各種結構的定義可知二叉樹是一種非線性結構。 Private Sub Command1_Click() Text1= Number=FreeFile Open c:\ For Input As Number Do While NotEOF( [14] ) Line Input Number,s =+ [15] +Chr(13) +Chr(10) Loop Close Number End Sub2009年9月筆試試卷參考答案及解析 一、選擇題 (1) C [解析] 根據(jù)數(shù)據(jù)結構中各數(shù)據(jù)元素之間前后關系的復雜程度,一般將數(shù)據(jù)結構分為兩大類型:線性結構與非線性結構。程序運行后,如果單擊命令按鈕,則可打開磁盤文件c:\,并將文件中的內容(多行文本) 顯示在文本框中。事件過程及2個函數(shù)過程如下: Private Sub Command1_Click() Dim x As Integer,y A8 Integer,z X=3 y=5 z=fy(y) Print fx(fx(x) ),y End Sub Function fx(ByVal a As Integer) a=a+a fx=a End Function Function fy(ByRef a As Integer) a=a+a fy=a End Function 運行程序并單擊命令按鈕,則窗體上顯示的兩個值依次是 [12] 和 [13] 。有如下程序段: If s>=90 Then Leve1=A Else If s>=75 Then Leve1=B Else If s>=60 Then Leve1=C Else Leve1=D End If 下面用Select Case結構改寫上述程序,使兩段程序所實現(xiàn)的功能完全相同,請?zhí)羁铡? Private Sub Command1_Click() If = Then MsgBox 請輸入半徑! ElseIf Not IsNumeric( [6] ) Then MsgBox 請輸入數(shù)值數(shù)據(jù)! Else r=Val( [7] ) [8] .Print 圓的面積是 amp。程序運行時,在Form1中名稱為Text1的文本框中輸入______個數(shù)值(圓的半徑),然后單擊命令按鈕“計算并顯示”(其名稱為Command1),則顯示Form2窗體,且根據(jù)輸入的圓的半徑計算圓的面積,并在Form2的窗體上顯示出來,如圖2所示。其中可以作為主關鍵字的是______。 (4) 在數(shù)據(jù)庫技術中,實體集之間的聯(lián)系可以是一對一或一對多或多對多的,那么“學生”和“可選課程”的聯(lián)系為______。 (2) 程序流程圖中的菱形框表示的是______。正確的修改方案是把For k=0 To A) For k= To 0 Step1 B) For k=0 To C) For k=1 To D) For k=1 To 二、填空題 請將每空的正確答案寫在[1]~[15]引序號的橫線上。若編寫以下程序來實現(xiàn)此功能: Private Sub Command1_Click() Dim n%,k% n=Len() For k=0 To If Left((k),n) = k End lf Next k End Sub 在調試時發(fā)現(xiàn),如輸入“陳”,可以正確刪除所有姓“陳”的項目,但輸入“劉”,則只刪除了“劉邦”、“劉備”兩項,結果如圖 2所示。為得到與題目要求相符的結果,下面修改方案中正確的是 A) 把計時器的Interval屬性設置為1 B) 把For k= To Step 100和Next k兩行刪除 C) 把For k= To Step 100改為For k= To Step 100 D) 把If +< Then改為If < Then (34) 下列有關文件的敘述中,正確的是 A) 以Output方式打開一個不存在的文件時,系統(tǒng)將顯示出錯信息 B) 以Append方式打開的文件,既可以進行讀操作,也可以進行寫操作 C) 在隨機文件中,每個記錄的長度是固定的 D) 無論是順序文件還是隨機文件,其打開的語句和打開方式都是完全相同的 (35) 窗體如圖1所示。要求程序運行后,圓每秒向右移動100,當圓遇到 Line2時則停止移動。) B) 退出(amp。y End Sub 運行程序后單擊命令按鈕,窗體上顯示的是 A) 100 100 B) 100 120 C) 110 100 D) 110 120 (29) 設a、b都是自然數(shù),為求a除以b的余數(shù),某人編寫了以下函數(shù): Function fun(a As Integer,b As Integer) While a>b a=ab Wend fun=a End Function 在調試時發(fā)現(xiàn)函數(shù)是錯誤的。HC000amp。 39。為紅色 Else =amp。amp。HPPamp。mumb End Sub ,第3次調用時輸出的是 A) 2 1 B) 2 3 C) 6 1 D) 6 3 (23) 在窗體上畫1個命令按鈕,并編寫如下事件過程: Private Sub Command1_Click() For i=5 To 1 Print Int(i) ; Next i End Sub 運行程序,單擊命令按鈕,窗體上顯示的內容為 A) 5 4 3 2 1 1 B) 4 4 3 2 1 C) 4 3 2 1 1 D) 4 4 3 2 1 1 (24) 在窗體上畫1個命令按鈕,并編寫如下事件過程: Private Sub Command1_Click() Dima(3,3) For