【正文】 ___（ 11） ____。采用這個(gè)方法提高了 軟件的 （ 3） 。 A． 提高程序的可讀性 B． 減少程序所占內(nèi)存 C． 提高程序的執(zhí)行效率 D． 體現(xiàn)程序員的專業(yè)水平 31. 下面語(yǔ)句執(zhí)行后，立即從一個(gè) Sub過(guò)程中退出的是 ______。 A. 1 B. 1 C. True D. False 24. 下列程序執(zhí)行后，在文本框中輸入“ a”，輸出結(jié)果是 ______。 A. 用戶必須重新設(shè)置所有屬性的值，否則屬性值為空 B. 任何屬性的值都可以由用戶進(jìn)行隨意設(shè)置 C. 屬性值只能在屬性窗口中設(shè)置 ，也可以使用系統(tǒng)的默認(rèn)值 ， b的結(jié)果為 ______。 A. 循環(huán)的集合 B. 地址的集合 C. 路徑的集合 D. 目標(biāo)的集合 8. 在數(shù)據(jù)管理技術(shù)發(fā)展過(guò)程中，文件系統(tǒng)與數(shù)據(jù)庫(kù)系統(tǒng)的主要區(qū)別是數(shù)據(jù)庫(kù)系統(tǒng)具有 ______。 s End Sub 筆試模擬試卷三 一、選擇題（每小題 2 分，共 70 分） 1. 算法分析的目的是 ______。 6．下列程序段的執(zhí)行結(jié)果為 ______(6) __________ A=2 B=5 If A * B 1 Then B=B 1 Else B=1 Print B A 0 7．四個(gè)字符串 39。 Dim a(1 To 6) For i=LBound(a, 1) To UBound(a, 1) a(i) =i Next i Print a(LBound(a, 1) ) 。 A. 單選按鈕 B. 圖片框 C. 通用對(duì)話框 D. 文本框 _______ 。 A． Private Sub Pro3(x As Double,y As Single) B． Private Sub Pro3(Arr(3),Option x,Option y) C． Private Sub Pro3(ByRef x,ByVal y,Arr( )) D． Private Sub Pro3(ParamArray Arr( )) 1 個(gè)工程，其中的窗體名稱為 Form1。 A． SetFocus B. GotFocus C. LostFocus D. 不存在 12. 對(duì)窗體編寫如下事件過(guò)程： Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) 圖 6－ 1 If Button = 2 Then 39。 A. ABCDEF B. DBEAFC C. ABDECF D. DEBFCA 4．在面向?qū)ο蠓椒ㄖ?，一個(gè)對(duì)象請(qǐng)求另一對(duì)象為其服務(wù)的方式是通過(guò)發(fā)送 ______。請(qǐng)?jiān)? (8) 和 (9) 處填入適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。 A. 15 16 B. 15 6 C. 15 15 D. 5 6 35. 設(shè) a=3,b=5，則以下表達(dá)式值為真的是 __ _。 ，會(huì)產(chǎn)生錯(cuò)誤的語(yǔ)句是 ______。 Private Sub Command1_Click() Dim A As Integer,B As Boolean,C As Integer,D As Integer A=20/3 : B=True : C=B : D=A+C Debug. Print A, D, A=A + C End Sub A. 7 6 False B. False C. 7 6 A=6 D. 7 8 A=8 20. 在 Visual Basic 中最基本的對(duì)象是 ___ ___， 它是應(yīng)用程序的基石 ， 也是其他控件的容器。 在過(guò)程中用 ReDim語(yǔ)句定義的動(dòng)態(tài)數(shù)組，其下標(biāo)的上下界可為賦了值的變量。 、 TextBox、 PictureBox 、 PictureBox、 Frame 、 TextBoX、 Label 、 TextBox、 ListBox ，下面列控件中可以顯示圖片的控件有 :__ __。 A. 在隊(duì)列中只能插入數(shù)據(jù) B. 在隊(duì)列中只能刪除數(shù)據(jù) C. 隊(duì)列是先進(jìn)先出的線性表 D. 隊(duì)列是先進(jìn)后出的線性表 4. 對(duì)長(zhǎng)度為 N的線性表進(jìn)行順序查找，在最壞情況下所需要的比較次數(shù)為 ______。 A. N+1 B. N C. (N+1)/2 D. N/2 5. 信息隱蔽的概念與下述哪一種概念直接相關(guān) ______。 、 、 、 5 、 語(yǔ)句 If I=1 Then J=1，下列說(shuō)法正確的是 ______。 在過(guò)程中，可以使用 Dim、 Private和 Static語(yǔ)句定義數(shù)組。 A. 文本框 B. 命令按紐 C. 窗體 D. 標(biāo)簽 Inta、 B St、 D 分別定義為 Integer 類型、 Boolean類型、 String類型和 Date 類型，下列賦值語(yǔ)句中，正確的是 ______。 (1) Const A As Integer=25 (2) Public St As String*8 (3) Redim B(3) As Integer (4) Dim Const X As Integer=10 A. (1)(2) B.(1)(3) C.(1)(2)(3) D.(2)(3)(4) 29. 單選按紐（ OptionButton）用于一組互斥的選項(xiàng)中。 A. a=b And b10 B. (ab)Or(b0) C. (a0)Eqv(b0) D. (3+5a)And(b0) 二、填空題 ( 每空 2 分，共 30 分） __(1) ____結(jié)構(gòu)和數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)。 Private Sub Form_Click() Dim x As Single,amax As Single,amin As Single x=InputBox(“ Enter a score” ) amax=x amin=x Do While (8) If xamax Then Amax=x End If If (9) Then Amin=x End If x=InputBox(“ Enter a score” ) Loop Print” Max=” 。 A. 調(diào)用語(yǔ)句 B. 命令 C. 口令 D. 消息 5．檢查軟件產(chǎn)品是否符合需求定義的過(guò)程稱為 ______。識(shí)別右鍵 Print AAA End If End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Print BBB End Sub 程序運(yùn)行后，如果單擊鼠標(biāo)右鍵，則輸出結(jié)果為 _______ 。之后又添加了 1個(gè)名為 Form2 的窗體，并希望程序執(zhí)行時(shí)先顯示 Form2窗體，那么，他需要做的工作是 _______ 。 A. 一個(gè)工程可以包含多個(gè)窗體文件 B. 在一個(gè)窗體文件中定義的通用過(guò)程不能被其他窗體調(diào)用 C. 窗體和標(biāo)準(zhǔn)模塊需要分別保存為不同類型的磁盤文件 D. 用 Dim定義的窗體層變量只能在該窗體中使用 _______ 。 a(UBound(a, 1) ) A. 0 0 B. 5 0 C. 1 6 D. 0 6 a(2 to 3,2 to 3)賦值的語(yǔ)句片段為 _______ 。FORTRAN,BASIC,PASCAL,DBASE比較的結(jié)果最小的是 _____(7) ___ 8． A=678 ： B=” 910”： C= A amp。 A. 找出數(shù)據(jù)結(jié)構(gòu)的合理性 B. 找出算法中輸入和輸出之間的關(guān)系 C. 分析算法的易懂性和可靠性 D. 分析算法的效率以求改進(jìn) 2. n個(gè)頂點(diǎn)的強(qiáng)連通圖的邊數(shù)至少有 ______。 A. 數(shù)據(jù)無(wú)冗余 B. 數(shù)據(jù)可共享 C. 專門的數(shù)據(jù)管理軟件 D. 特定的數(shù)據(jù)模型 9. 分布式數(shù)據(jù)庫(kù)系統(tǒng)不具有的特點(diǎn)是 ______。 Private Sub Command1_Click() a = 300 b = 20 a = a + b b = a b a = a b print b End Sub A. 20 B. 300 C. 30 D. 200 ______。 Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print KeyCode End Sub A. 97 B. 65 C. 0