1、【HNCE網上考試系統V9.6】 本套軟件使用權屬于：鄭州大學考試課程：考試時間：100分鐘 考場:第一考場 考試日期：2013.05.24考號：姓名：剩余時間：99:42保存交卷退出幫助本卷共有3道大題：、單項選擇題（50道小題，共50分）VB系統提供的事件是（）1、在Visual Basic中，系統為每個對象預先定義好了一系列的事件。下列事件中，不屬于（1分）Click()MyFirst()B、DChange()DblClick()2、下列不屬于VB三種模式的是（）模式。（1分）B、運行D中斷3、有程序代碼：Picture1.Picture = LoadPicture("C:Pi

2、ct.bmp"),貝U： Picture1、Picture 和 LoadPicture 分別代表()。(1分)對象、對象、方法、值屬性、值B、D對象、屬性、方法對象、屬性、函數事件驅動后臺作業rA、事件rrC、方法r5、（）是對象的一個基本要素，它描述了對象在程序中的外觀特點。（1 分）屬性事件程序6、下列敘述中，錯誤的是（）。（1分）VB是可視化程序設計語言VB是面向過程的程序設計語VB采用事件驅動編程機制VB應用程序可以以編譯方式7、有程序代碼如下：Text1.Text ="歡迎學習VB程序設計"，_則Text1、Text、"歡迎學習VB程序設計&q

3、uot;分別代表（）。執行（1 分）.言rA、對象、值、屬性rB、對象、屬性、值rC、對象、方法、屬性rD屬性、對象、值8、在設計窗體時，如果窗體上沒有顯示網格會感到不方便,使用“編輯”菜單上的相關使用“工具”菜單上的相關使用“格式”B、使用“工程”D（）可以使網格出現。（1 分）菜單上的相關菜單上的相關9、在VB程序中，逐語句調試的操作鍵是 （）。（1分）rA、F8 鍵 1B、F9 鍵rC、F2 鍵CD F1鍵10、VB應用程序在（）模式下不能編輯代碼和設計界面。（1分）B、D中斷以上均不能11、通過（）窗口可以在設計時直觀的調整窗體在屏幕上的位置。（1分）B、D窗體布局窗口屬性窗口F8,則

4、（）。（1 分）12、在Visual Basic的中斷模式下，按下功能鍵B、執行中斷時的下一個模塊結束當前的運行（）。（1 分）13、在設計模式下，雙擊窗體上的一個控件，則會打開A、屬性窗口B、工程資源窗口C、代碼窗口16、以下敘述中，錯誤的是（）(1 分)窗體文件包含該窗體及其控B、在工程資源管理器窗口可以D源文件窗體布局窗口rA、工程資源管理器窗口r 1B、工具箱窗口rC、代碼窗口CD屬性窗口14、在設計階段，當雙擊窗體上的某個控件時，所打開的窗口是（）。（1 分）rA、運行一個應用程序rB、運行一個窗體rC、打開被選中對象的屬性窗口廠1D打開被選中對象的代碼窗口15、在工具欄中有一個“啟

5、動”按鈕，這個按鈕的作用是（）。（1 分）包含多個工程文件及屬于該工程的其他文件17、如果在一個工程中移除了一個窗體，則（）。（1分）A、工程不再包含這個窗體，但該窗體文件并沒有被刪除工程不再包含這個窗體，該B、窗體文件被刪除以上說法都不對C、該窗體文件從內存清除，工程仍然包含這個窗體CA、frmcCC、batr18、在VB中，保存一個編寫好的程序，“工程名”是以()vbpbas作為擴展名的。（1分）rA、窗體的形狀及其特征rrC、窗體及其控件的屬性r窗體中控件的形狀及其特性運行窗體的代碼19、窗體文件中的信息是（）和其他信息。（1分）20、VB是一種面向（）的程序設計設計語言。（1分）rA、

6、過程C 1B、用戶rC、對象rD方法21、Visual Basic可以開發基于（）環境的應用程序。（1分）rA、WindowsrB、DosrC、LinuxcD Unix22、有如下兩個過程 S1 和 S2： Sub S1（ByVal x , ByVal y ）: t = x: x = y: y = t: End Sub: Sub S2（x, y） : t =x: x = y: y = t : End Sub,下列關于S1和S2的說法，正確的是（）。（1分）A、調用過程S1可以實現交換兩 廠B、調用過程S2可以實現交換兩個變量值，而S2不能個變量值，而S1不能CC、調用過程S1和S2都可以實D調

7、用過程S1和S2都不能實現交換兩個變量值現交換兩個變量值23、閱讀下列程序:Sub Med(x%, ByVal y%): x = 3 * x: y = x + y: End Sub: Private Sub Form_Click(): Dim a%,運行后，單擊窗體，輸出結果為 （）。（1分）B、D3 179 17rA、DimcrC、ByValr24、在定義過程時，若將參數傳遞方式指定為傳值方式，應該用關鍵字VarByadr（）。（1 分）25、下列關于過程的說法中，正確的說法是（）。（1分）A、所有在過程中定義的變量在過程調用后均不保存值C、用Private定義的過程里的所有變量都是Priv

8、ate型的變量B、有變量都是Static型的變量用Static定義的過程里的所用Public定義的過程里面的所有變量都是非全局Public型的變量26、下列關于變量的說法，不正確的是 （）。（1分）A、局部變量是指那些在過程中B、局部變量的作用域僅限于聲用Dim語句或Static 語句聲明的變量明它的過程C、靜態局部變量是在過程中用D靜態局部變量在聲明它的過B、D窗體模塊的通用聲明段窗體模塊或標準模塊的通用Static 語句聲明的程執行完畢后就被釋放了27、過程的作用域分為（）。（1分）rA、窗體級和局部級CB、模塊級和局部級rC、窗體/模塊級和全局級rD窗體/模塊級和局部級28、在窗體的“通

9、用”處用 Private定義的變量，其作用域是（）。（1 分）rA、局部變量rB、窗體/模塊級變量rC、全局變量rD靜態變量29、在一個應用程序中，若同在一個窗體模塊中的三個事件過程要借助一個變量進行通訊，則此變量應聲明為（）。（1分）CA、全局級變量CB、窗體/模塊級變量CC、局部變量CD靜態變量30、使用Public Const語句聲明一個全局的符號常量時，應該將該語句放在（）。（1 分）31、VB中有三種類型的模塊，分別是類模塊、（）。（1分）A、窗體模塊和標準模塊C、函數模塊和標準模塊B、過程模塊和窗體模塊D全局模塊和標準模塊32、用Static關鍵字能定義的變量是（）。（1分）局部變

10、量全局變量C、窗體級變量D局部變量和全局變量33、以（）保留字開始的為事件過程。（1分）A、SubB、 Event34、在聲明一個過程中必須有的是 （）。（1分）rA、Private 關鍵字1rB、SUB關鍵字rC、返回值類型說明rD參數35、以（）保留字開始的為子過程。（1分）rA、SubrB、EventrC、FunctionrD Property36、Function函數過程用的結束語句是（）。（1分）rA、 End SubrB、Exit SubrC、End FunctionrD Exit FunctionC、FunctionProperty兩種過程參數的傳遞方式不Sub過程不可以Sub過

11、程的過程名不能返回B、Function過程可以有參數,D Sub過程可以使用Call語句37、Sub過程與Function過程最根本的區別是（）。（1分）值，而Function過程能通過過程名返回值或直接使用過程名調用，而Function過程不可以38、以下關于窗體的敘述中，錯誤的是（）。（1分）A、一個VB工程中可以有多個窗體，但最多只能有一個窗體作為啟動窗體B、窗體之間可以通過在通用段聲明Public類型的變量來傳遞數據C、窗體啟動之初可以呈現為最大化、最小化或正常（保持設計時大小）等三種狀態39、以下關于窗體的描述正確的是 （）。（1分）D只有啟動窗體才有菜單A、只有用于啟動的窗體可以有

12、菜單B、窗體和其中所有控件的事件過程代碼都放在窗體文件中C、窗體名字和存盤的窗體文件D開始運行時窗體的位置只能名必須相同是設計階段時顯示的位置40、以下敘述中，錯誤的是（）。（1 分）一個工程中只能有一個 Sub窗體的 Hide方法和 Unload方法的作用完全相同A、一個應用程序可以只有一個窗體動窗體B、一個應用程序通常由多個窗D個應用程序只能有一個啟ShowInputB、LoadActivate44、使用（）方法可隱藏窗體，但不從內存中釋放。（1 分）rA、 ShowrC、HideDLoadUnLoadB、窗體的Show方法的作用是將指定的窗體裝入內存并顯示該窗體lrID若工程文件中有多個

13、窗體，可以根據需要指定一個窗體為啟動窗體41、下列敘述中，錯誤的敘述是 （）。（1分）C、一個窗體一定對應一個窗體文件，所以一個應用程序只能包含一個窗體42、一旦裝載窗體，系統自動觸發的第一個事件是（）。（1分）rA、ClickrB、DblclickrC、InitializerD Load43、把一個窗體裝入內存的語句是（）。（1分）45、程序運行時，不是由系統觸發的事件是（）。（1分）InitializeLoadB、ClickD ActivateA、可以在文件名中使用*和?46、關于Visual Basic6.0文件的命名原則，下列說法正確的是（）。（1分）B、支持文件名為任意長度C、與Wi

14、ndows命名方式不一致支持傳統的命名方式：8位主文件名，3位擴展名47、以下關于文件的敘述中，錯誤的是（）。（1分）按數據的編碼方式，文件可隨機文件每條記錄的長度可48、下列關于Close的說法中，錯誤的是（）。（1 分）Close用來關閉文件當讀寫操作結束后，必須將B、Close可以釋放與文件相關聯D Close中的“文件號”是必選（1 分）Output As #149、用（）語句可以讀入磁盤上的順序文件“C:Sequ.txtB、F= "C:Sequ.txt" ： Open "F"For Input As #1As #1D OpenCSequ.txt

15、 For Output50、設有語句 Open "Datafile.txt" For Output As #1，以下敘述錯誤的是（）。（1 分）B、該語句可以在當前目錄下創建一個名為Datafile.txt 的文件CD如果當前目錄下文件Datafile.txt不存在，系統顯示出錯信息1、*輸出100以內能同時被3和5整除的數*程序代碼如下：Private Sub Command1_Click（）For=1 to 100If i mod 3=0i mod 5=0 then print iNext iEnd Sub(4 分)2、*輸岀九九乘法表的左下角 程序代碼如下：Priva

16、te Sub Command1_Click() Dim se As StringPrint Tab(35);"九九乘法表'For=1 To 9For j = 1 to ise = i & " x "& j & "=" & i*jPrint Tab(j - 1) * 9 + 1);Next jPrintNext iEnd Sub(4 分)3、*用隨機函數產生n個1099之間的隨機整數存入一維數組A,通過鍵盤輸入 X,然后在數組中查找。如果找到了,就把這個數從數組中刪去；如果沒有找到，則給出“無可刪除的元素”

17、信息。Private Sub Form_Click()Dim n As Integer, a(100) As IntegerDim x As Integer, i As IntegerDim k As Integer, flag As Booleann = lnputBox("N=")Fori = 1 To a(i) = Int(90 * Rnd + 10)Print a(i);Next i : Printx = InputBox("X=") : Print "X=" xflag = FalseFor i = 1 To nIf a(i

18、) = x ThenTruek = iExit ForEnd IfNext iIf Not flag ThenPrint "無可刪除的元素ElseFor i = k To n - 1a(i) = a(i + 1)Next i: n = n - 1For i = 1 To nPrint a(i);Next iEnd IfEnd Sub(4 分)4、*對10個100以內的整數，用選擇法按遞增順序排序。 程序代碼如下：Private Sub Command1_Click ()Dim a(10) As lnteger,t%Fori = 1 To 10a(i)= int(rnd*101)Pri

19、nt a(i);Next iPrintFor I = 1 To 9For j = i+1 To 10If a(i)>a(j) then t=a(i): a(i) =a(j): a(j) =tNext jNext iFori = 1 To 10Print a(i);Next iEnd Sub(4 分)5、6、*用子過程輸出Fibonacci (斐波那契)數列(1、1、2、3、5、8)的前20項及前20項的和 *隨機生成一個4行4列元素為三位整數的是下三角方陣，計算所有元素之和 程序代碼如下：Private Sub Command1_Click()Dim R(1 To 4, 1 To 4)

20、As IntegerDim i%, j%. Sum%Sum = 0Fori = 1 To 4Forj = 5 - iTo 4R(i, j) = lnt(900 * Rnd + 100)Print Tab(j - 1) * 6); R(i, j);+ R(i, j)Next jPrintNext iPrint SumEnd Sub(a, b, c)(4 分)c = a + ba = bb = c End Sub（4 分）7、*設計一前景背景色互換程序，如圖v1-2.jpg*單擊命令按鈕“換”，互換窗體中文本框的前景色和背景色。'1-2.jpgPrivate Sub Form_Load（）Textl =“大象無形大音希聲”End SubPrivate Sub Command1_Click（）Dim t As VariantDim i As Integeri = MsgBox（" 確定換嗎？