全國二級VB考試筆試模擬試題1(06年4月).doc_第1頁
全國二級VB考試筆試模擬試題1(06年4月).doc_第2頁
全國二級VB考試筆試模擬試題1(06年4月).doc_第3頁
全國二級VB考試筆試模擬試題1(06年4月).doc_第4頁
全國二級VB考試筆試模擬試題1(06年4月).doc_第5頁
已閱讀5頁,還剩6頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認(rèn)領(lǐng)

文檔簡介

全國計算機等級考試筆試模擬試題(一)一、選擇題(每小題2分,共70分)下列各題A)、B)、C)、D)四個選項中,只有一個選項是正確的。請將正確選項填涂在答題卡相應(yīng)位置上,答在試卷上不得分。(1)下列選項中不屬于結(jié)構(gòu)化程序設(shè)計方法的是 。A) 自頂向下 B) 逐步求精 C) 模塊化 D) 可復(fù)用(2)兩個或兩個以上模塊之間關(guān)聯(lián)的緊密程度稱為 。A) 耦合度 B) 內(nèi)聚度 C) 復(fù)雜度 D) 數(shù)據(jù)傳輸特性(3)下列敘述中正確的是 。A) 軟件測試應(yīng)該由程序開發(fā)者來完成 B) 程序經(jīng)調(diào)試后一般不需要再測試C) 軟件維護只包括對程序代碼的維護 D) 以上三種說法都不對(4)按照“后進先出”原則組織數(shù)據(jù)的數(shù)據(jù)結(jié)構(gòu)是 。A) 隊列 B) 棧 C) 雙向鏈表 D) 二叉樹(5)下列敘述中正確的是 。A) 線性鏈表是線性表的鏈?zhǔn)酱鎯Y(jié)構(gòu) B) 棧與隊列是非線性結(jié)構(gòu)C) 雙向鏈表是非線性結(jié)構(gòu) D) 只有根結(jié)點的二叉樹是線性結(jié)構(gòu)(6)對如下二叉樹ABCDEF 進行后序遍歷的結(jié)果為 。A) ABCDEF B) DBEAFC C) ABDECF D) DEBFCA(7)在深度為7的滿二叉樹中,葉子結(jié)點的個數(shù)為 。A) 32 B) 31 C) 64 D) 63(8)“商品”與“顧客”兩個實體集之間的聯(lián)系一般是 。A) 一對一 B) 一對多 C) 多對一 D) 多對多(9)在E-R圖中,用來表示實體的圖形是 。A) 矩形 B) 橢圓形 C) 菱形 D) 三角形(10)數(shù)據(jù)庫DB、數(shù)據(jù)庫系統(tǒng)DBS、數(shù)據(jù)庫管理系統(tǒng)DBMS之間的關(guān)系是 。A) DB包含DBS和DBMS B) DBMS包含DB和DBSC) DBS包含DB和DBMS D) 沒有任何關(guān)系(11)以下關(guān)于Visual Basic特點的敘述中,錯誤的是 。A) Visual Basic是采用事件驅(qū)動編程機制的語言B) Visual Basic程序既可以編譯運行,也可以解釋運行C) 構(gòu)成Visual Basic程序的多個過程沒有固定的執(zhí)行順序D) Visual Basic程序不是結(jié)構(gòu)化程序,不具備結(jié)構(gòu)化程序的三種基本結(jié)構(gòu)(12)以下敘述中,錯誤的是 。A) 一個Visual Basic應(yīng)用程序可以含有多個標(biāo)準(zhǔn)模塊文件B) 一個Visual Basic工程可以含有多個窗體文件C) 標(biāo)準(zhǔn)模塊文件可以屬于某個指定的窗體文件D) 標(biāo)準(zhǔn)模塊文件的擴展名是.bas(13)以下敘述中,錯誤的是 。A) 在Visual Basic中,對象所能響應(yīng)的事件是由系統(tǒng)定義的B) 對象的任何屬性既可以通過屬性窗口設(shè)定,也可以通過程序語句設(shè)定C) Visual Basic中允許不同對象使用相同名稱的方法D) Visual Basic中的對象具有自己的屬性和方法(14)設(shè)有如下語句:Dim a,b As Integerc = VisualBasicd = #8/20/2007#以下關(guān)于這段代碼的敘述中,錯誤的是 。A) a被定義為Integer類型變量 B) b被定義為Integer類型變量C) c中的數(shù)據(jù)是字符串 D) d中的數(shù)據(jù)是日期類型(15)以下能從字符串VisualBasic中直接取出子字符串Basic的函數(shù)是 。A) Left B) Mid C) String D) Instr(16)設(shè)a=4,b=3,c=2,d=1,下列表達(dá)式的值是 。ab+1 Or c=10,Is90 Then Exit For NextEnd Sub對于該事件過程,以下敘述中錯誤的是 。A) a數(shù)組中的數(shù)據(jù)是30個100以內(nèi)的整數(shù) B) 語句For Each arrItem In a有語法錯誤C) If arrItem Mod 7=0語句的功能是輸出數(shù)組中能夠被7整除的數(shù)D) If arrItem90語句的作用是當(dāng)數(shù)組元素的值大于90時退出For循環(huán)(22)設(shè)有命令按鈕Command1的單擊事件過程,代碼如下:Private Sub Command1_Click() Dim a(3,3)As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i*j+i Next j Next i Sum=0 For i=1 To 3 Sum=Sum+a(i,4-i) Next i Print SumEnd Sub運行程序,單擊命令按鈕,輸出結(jié)果是 。A) 20 B) 7 C) 16 D) 17(23)在窗體上畫1個名稱為Command1的命令按鈕,然后編寫如下事件過程:Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 20 Then a=a-1 End If a=a+1 Next j Next i Print aEnd Sub程序運行后,單擊命令按鈕,輸出結(jié)果是。A) 0 B) 2 C) 3 D) 4(24)窗體上有名稱分別為Text1、Text2的2個文本框,有一個由3個單選按鈕構(gòu)成的控件數(shù)組Option1。程序運行后,如果單擊某個單選按鈕,則執(zhí)行Text1中的數(shù)值與該單選按鈕所對應(yīng)的運算(乘以1、10或100),并將結(jié)果顯示在Text2中。為了實現(xiàn)上述功能,在程序中的問號(?)處應(yīng)填入的內(nèi)容是 。Private Sub Option1_Click(Index As Integer)If Text1.TextThen Select Case ? Case 0 Text2.Text=Val(Text1.Text) Case 1 Text2.Text=Val(Text1.Text)*10 Case 2 Text2.Text=Val(Text1.Text)*100 End Select End IfEnd SubA) Index B) Option1.IndexC) Option1(Index) D) Option1(Index).Value(25)在窗體上畫1個命令按鈕,其名稱為Command1,然后編寫如下程序:Private Sub Command1_Click() Dim a(10)As Integer Dim x As Integer For i=1 To 10 a(i)=8+i Next x=2 Print a(f(x)+x)End SubFunction f(x As Integer) x=x+3 f=xEnd Function程序運行后,單擊命令按鈕,輸出結(jié)果為 。A) 12 B) 15 C) 17 D) 18(26)以下關(guān)于過程的敘述中,錯誤的是 。A) 事件過程是由某個事件觸發(fā)而執(zhí)行的過程 B) 函數(shù)過程的返回值可以有多個C) 可以在事件過程中調(diào)用通用過程 D) 不能在事件過程中定義函數(shù)過程(27)在窗體上畫3個標(biāo)簽、3個文本框(名稱分別為Text1、Text2和Text3)和1個命令按鈕(名稱為Command1),編寫如下程序: Private Sub Form_Load() Text1.Text= Text2.Text= Text3.Text=End SubPrivate Sub Command1_Click() x=Val(Text1.Text) y=Val(Text2.Text) Text3.Text=f(x,y)End SubFunction f(ByVal x As Integer,ByVal y As Integer) Do While y0 tmp=x Mod y x=y y=tmp Loop f=xEnd Function運行程序,在Text1文本框中輸入36,在Text2文本框中輸入24,然后單擊命令按鈕,則在Text3文本框中顯示的內(nèi)容是 。A) 4 B) 6 C) 8 D) 12(28)窗體上有名稱分別為Text1、Text2的2個文本框,要求文本框Text1中輸入的數(shù)據(jù)小于500,文本框Text2中輸入的數(shù)據(jù)小于1000,否則重新輸入。為了實現(xiàn)上述功能,在以下程序中問號(?)處應(yīng)填入的內(nèi)容是 。Private Sub Text1_LostFocus() Call CheckInput(Text1,500)End SubPrivate Sub Text2_LostFocus() Call CheckInput(Text2,1000)End SubSub CheckInput(t As ?,x As Integer) If Val(t.Text)x Then MsgBox請重新輸入! End IfEnd SubA) Text B) SelText C) Control D) Form(29)在窗體上畫1個文本框,其名稱為Text1,然后編寫如下過程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode)End SubPrivate Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2)End Sub程序運行后,把焦點移到文本框中,此時如果敲擊“A”鍵,則輸出結(jié)果為 。A)A B)A C)A D)A A B C D(30)為了使列表框中的項目呈多列顯示,需要設(shè)置的屬性為 。A) Columns B) Style C) List D) MultiSelect(31)在窗體上畫1個命令按鈕,名稱為Command1,然后編寫如下程序:Dim Flag As BooleanPrivate Sub Command1_Click() Dim intNum As Integer intNum=InputBox(請輸入:) If Flag Then Print f(intNum) End IfEnd SubFunction f(X As Integer)As Integer If X10 Then Y=X Else Y=X+10 End If f=YEnd FunctionPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Flag=TrueEnd Sub運行程序,首先單擊窗體,然后單擊命令按鈕,在輸入對話框中輸入5,則程序的輸出結(jié)果為 。A) 0 B) 5 C) 15 D) 無任何輸出(32)在菜單編輯器中建立1個名稱為Menu0的菜單項,將其“可見”屬性設(shè)置為False,并建立其若干子菜單,然后編寫如下過程:Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=1 Then PopupMenu Menu0 End IfEnd Sub則以下敘述中錯誤的是 。A) 該過程的作用是彈出一個菜單B) 單擊鼠標(biāo)右鍵時彈出菜單C) Menu0是在菜單編輯器中定義的彈出菜單的名稱D) 參數(shù)X、Y指明鼠標(biāo)當(dāng)前位置的坐標(biāo)(33)窗體上有1個名稱為CD1的通用對話框,1個名稱為Command1的命令按鈕。命令按鈕的單擊事件過程如下:Private Sub Command1_Click() CD1.FileName= CD1.Filter=All Files|*.*|(*.Doc)|*.Doc|(*.Txt)|*.txt CD1.FilterIndex=2 CD1.Action=1End Sub關(guān)于以上代碼,錯誤的敘述是 。A) 執(zhí)行以上事件過程,通用對話框被設(shè)置為“打開”文件對話框B) 通用對話框的初始路徑為當(dāng)前路徑C) 通用對話框的默認(rèn)文件類型為*.Txt D) 以上代碼不對文件執(zhí)行讀寫操作(34)以下敘述中錯誤的是 。A) 用Shell函數(shù)可以執(zhí)行擴展名為.exe的應(yīng)用程序B) 若用Static定義通用過程,則該過程中的局部變量都被默認(rèn)為Static類型C) Static類型的變量可以在標(biāo)準(zhǔn)模塊的聲明部分定義D) 全局變量必須在標(biāo)準(zhǔn)模塊中用Public或Global聲明(35)以下關(guān)于文件的敘述中,錯誤的是 。A) 使用Append方式打開文件時,文件指針被定位于文件尾B) 當(dāng)以輸入方式(Input)打開文件時,如果文件不存在,則建立一個新文件C) 順序文件各記錄的長度可以不同D) 隨機文件打開后,既可以進行讀操作,也可以進行寫操作二、填空題(每空2分,共30分)請將每空的正確答案寫在答題卡【1】【15】序號的橫線上,答在試卷上不得分。(1)對長度為10的線性表進行冒泡排序,最壞情況下需要比較的次數(shù)為 【1】 。(2)在面向?qū)ο蠓椒ㄖ校?【2】 描述的是具有相似屬性與操作的一組對象。(3)在關(guān)系模型中,把數(shù)據(jù)看成是二維表,每一個二維表稱為一個 【3】 。(4)程序測試分為靜態(tài)分析和動態(tài)測試。其中 【4】 是指不執(zhí)行程序,而只是對程序文本進行檢查,通過閱讀和討論,分析和發(fā)現(xiàn)程序中的錯誤。(5)數(shù)據(jù)獨立性分為邏輯獨立性與物理獨立性。當(dāng)數(shù)據(jù)的存儲結(jié)構(gòu)改變時,其邏輯結(jié)構(gòu)可以不變,因此,基于邏輯結(jié)構(gòu)的應(yīng)用程序不必修改,稱為 【5】 。(6)下列語句的輸出結(jié)果是 【6】 。Print Format(Int(12345.6789*100+0.5)100,0000,0.00)(7)在窗體上畫1個命令按鈕,其名稱為Command1,然后編寫如下事件過程:Private Sub Command1_Click() Dim arr(1 To 100)As Integer For i=1 To 100 arr(i)=Int(Rnd*1000) Next i Max=arr(1) Min=arr(1) For i=1 To 100 If 【7】 Then Max=arr(i) End If If 【8】 Then Min=arr(i) End If Next i PrintMax=;Max,Min=;MinEnd Sub程序運行后,單擊命令按鈕,將產(chǎn)生100個1000以內(nèi)的隨機整數(shù),放入數(shù)組arr中,然后查找并輸出這100個數(shù)中的最大值Max和最小值Min,請?zhí)羁铡?8)在窗體上畫1個名稱為Command1的命令按鈕和2個名稱分別為Text1、Text2的文本框,然后編寫如下程序:Function Fun(x As Integer,ByVal y As Integer)As Integer x=x+y If x0 Then Fun=x Else Fun=y End IfEnd FunctionPrivate Sub Command1_Click() Dim a As Integer,b As Integer a=-10:b=5 Text1.Text=Fun(a,b) Text2.Text=Fun(a,b)End Sub程序運行后,單擊命令按鈕,Text1和Text2文本框顯示的內(nèi)容分別是 【9】 和 【10】 。(9)在窗體上畫1個命令按鈕和1個文本框,其名稱分別為Command1和Text1,然后編寫如下代碼:Dim SaveAll As StringPrivate Sub Command1_Click() Text1.Text=Left(UCase(SaveAll),4)End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序運行后,在文本框中輸入abcdefg,單擊

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論