VB考試真題二含答案

1、本卷共有3道大題:一、單項(xiàng)選擇題（40道小題，共40分）1、下列說(shuō)法中，不正確的說(shuō)法是( D )。（1分） A、窗體是對(duì)象 B、窗體必須有Name屬性 C、窗體可以縮放或移動(dòng) D、單擊窗體內(nèi)的控件可以執(zhí)行Form_Click事件過(guò)程2、如果Visual Basic環(huán)境中缺少某個(gè)窗口，一般應(yīng)該從主菜單的( D )下拉菜單中尋找并打開。（1分） A、編輯 B、文件 C、調(diào)試 D、視圖3、下列說(shuō)法中，正確的說(shuō)法是( B )。（1分） A、窗體名稱和該窗體文件名必須一致 B、窗體名稱和該窗體文件名可以不相同 C、窗體名稱和該窗體文件名不能使用漢字 D、窗體名稱不能使用漢字、但該窗體文件名能使用漢字4、

2、命令行Command1.Caption="Command1"，其中Command1、"Command1"分別代表的是( B )。（1分） A、命令、標(biāo)題 B、控件名稱、Caption屬性值 C、對(duì)象、控件名稱 D、標(biāo)題、標(biāo)題的值5、Unload事件是在( A )時(shí)發(fā)生的。（1分） A、窗體關(guān)閉 B、對(duì)話框關(guān)閉 C、文本框失去焦點(diǎn) D、改變文本框的內(nèi)容6、所謂默認(rèn)屬性是指不用指定控件的屬性名就可以代表其屬性。一個(gè)文本框控件Text1的默認(rèn)屬性是( B )。（1分） A、Name B、Text C、Top D、FontSize7、命令按鈕Command1的C

3、aption屬性為“退出x”，如果將命令按鈕的快捷鍵設(shè)為Alt+x，應(yīng)修改Caption屬性為( A )。（1分） A、在x前插入& B、在x后插入& C、在x前插入# D、在x后插入#8、要使標(biāo)簽控件在顯示時(shí)不覆蓋其背景內(nèi)容，可以對(duì)標(biāo)簽控件的( D )屬性進(jìn)行設(shè)置。（1分） A、BackColor B、BorderStyle C、ForeColor D、BackStyle9、為使計(jì)時(shí)器控件每隔1秒產(chǎn)生一個(gè)計(jì)時(shí)器事件（Timer），則應(yīng)將其Interval屬性值設(shè)置為( D )。（1分） A、1 B、100 C、10 D、100010、只能用來(lái)顯示字符信息的控件是( B )。（

4、1分） A、文本框 B、標(biāo)簽框 C、圖片框 D、圖像框11、在4個(gè)字符“D”、“z”、“A”、“9”中，其ASCII碼值最大的是( B )。（1分） A、“D” B、“z” C、“A” D、“9”12、如果邏輯與(And)運(yùn)算的結(jié)果為“真”，與它所連接的兩個(gè)條件必須是( C )。（1分） A、前一個(gè)為“真”，后一個(gè)為“假” B、前一個(gè)為“假”，后一個(gè)為“假” C、前一個(gè)為“真”，后一個(gè)為“真” D、前一個(gè)為“假”，后一個(gè)為“真”13、能表示身高T超過(guò)1.7米且體重W小于62.5千克的人的布爾表達(dá)式是( C )。（1分） A、T>1.7 And W<=62.5 B、T>=1.7

5、 Or W>=62.5 C、T>1.7 And W<62.5 D、T>1.7 Or W<62.514、表達(dá)式 5/4*65 Mod 2 的值是( B )。（1分） A、0 B、1 C、2 D、315、設(shè)有程序段Print -20;:Print -16，則輸出結(jié)果為( A )。（1分） A、-20 -16 B、-36 C、-20-16 D、出錯(cuò)16、下列標(biāo)識(shí)符中，屬于合法變量名的標(biāo)識(shí)符是( D )。（1分） A、X-3 B、4y C、n$1 D、bAC17、設(shè)a=1，b=2，c=3，d=4，下面邏輯表達(dá)式的值為真的是( )。（1分） A、Sqr(d)>b B、

6、d>c And b>a C、Abs(a-d)<c D、Not(c-b)<b18、若變量a和b的值分別是6和8，則Sqr(a*a+b*b)的結(jié)果是( )。（1分） A、 6 B、 8 C、 10 D、 1419、設(shè)m,n是整數(shù)，且n>m，在以下能將x賦值為一個(gè)mn之間(含m,n)任意整數(shù)即滿足nxm的是( )。（1分） A、x=Int(Rnd*(n-m+1)+m B、x=Int(Rnd*n)+m C、x=Int(Rnd*m)+n D、x=Int(Rnd*(n-m)+m20、能刪除字符串前導(dǎo)和尾隨空格的函數(shù)是( C )。（1分） A、LTrim() B、RTrim()

7、 C、Trim() D、LCase()21、若 x=5，執(zhí)行程序段：Print "x=" x + 1: Print "x=" x + 2: Print "x=" x + 3 后，變量 x 的值是( A )。（1分） A、5 B、6 C、7 D、822、下列關(guān)于語(yǔ)句 If y = 1 Then x = 1 的說(shuō)法中，正確的說(shuō)法是( )。（1分） A、x = 1 和 y = 1 均為賦值語(yǔ)句 B、x = 1 和 y = 1 均為關(guān)系表達(dá)式 C、x = 1 為關(guān)系表達(dá)式，y = 1 為賦值語(yǔ)句 D、x = 1 為賦值語(yǔ)句，y = 1 為關(guān)系

8、表達(dá)式23、執(zhí)行 a = InputBox("Today", "Tomorrow", "Yesterday", , , "Day before yesterday", 5)，在對(duì)話框的標(biāo)題區(qū)顯示的信息是( B )（1分） A、Today B、Tomorrow C、Yesterday D、Day before yesterday24、對(duì)話框InputBox作為函數(shù)的返回值一般為( A )。（1分） A、Integer B、String C、Variant D、Long25、語(yǔ)句 For i = -3 To 20 St

9、ep 0 的循環(huán)次數(shù)為( D )。（1分） A、23 B、20 C、錯(cuò)誤提示 D、無(wú)數(shù)次（死循環(huán)）26、下列關(guān)于“Do While 條件 : 循環(huán)體 : Loop”這種循環(huán)結(jié)構(gòu)的敘述中，正確的敘述為( C )。（1分） A、如果“條件”為常數(shù)0，則一次循環(huán)體也不執(zhí)行 B、如果“條件”為常數(shù)-1，則一次循環(huán)體也不執(zhí)行 C、如果“條件”為常數(shù)-1，則只執(zhí)行一次循環(huán)體 D、如果“條件”為常數(shù)0，則執(zhí)行無(wú)限次循環(huán)體27、設(shè)變量n為整型，執(zhí)行“n = "ab123"”賦值語(yǔ)句后，n中的結(jié)果為( D )。（1分） A、數(shù)值123 B、字符串a(chǎn)b123 C、語(yǔ)法錯(cuò)誤 D、提示“類型不匹配

10、”錯(cuò)誤28、已知：Option Base 1，Dim A(0 To 5, 0 To 5) As Integer，則數(shù)組A的元素個(gè)數(shù)是( C )。（1分） A、10 B、12 C、25 D、3629、一個(gè)數(shù)組中的所有元素具有相同的數(shù)據(jù)類型，只有( D )的類型可以例外。（1分） A、String B、Single C、Integer D、Variant30、已知：Option Base 0，Dim A()，n% = 7，則下列操作中，錯(cuò)誤的操作是( )。（1分） A、ReDim A(n) B、ReDim A(n-8) C、ReDim A(n+2) D、ReDim Preserve A(n)31、

11、已知：Option Base 1，Dim a() As Integer, Dim b(-1 to 2) As Integer，如果執(zhí)行 a = b ，則數(shù)組a的下界是( )。（1分） A、-1 B、0 C、1 D、232、事件過(guò)程是在( D )時(shí)執(zhí)行的代碼段。（1分） A、窗體調(diào)用 B、單擊窗體 C、雙擊窗體 D、響應(yīng)事件33、若變量Temp為全局變量，在過(guò)程Form_Click內(nèi)又定義了局部變量Temp，在窗體名默認(rèn)的情況下，能在過(guò)程Form_Click內(nèi)訪問(wèn)全局變量Temp的形式是( C )。（1分） A、Temp B、Form.Temp C、Form1.Temp D、Form_Click

12、.Temp34、當(dāng)形參用簡(jiǎn)單變量表示而且不需要返回值時(shí)，相應(yīng)的實(shí)參可以是( D )。（1分） A、表達(dá)式 B、數(shù)組元素 C、變量或常量 D、常量、變量、數(shù)組元素、函數(shù)、表達(dá)式35、在窗體的“通用”段聲明變量時(shí)，不能使用( D )關(guān)鍵字。（1分） A、Dim B、Static C、Public D、Private36、以下敘述中，錯(cuò)誤的敘述是( C )。（1分） A、打開一個(gè)工程時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件 B、保存Visual Basic程序時(shí)，應(yīng)分別保存窗體文件及工程文件 C、Visual Basic應(yīng)用程序只能以解釋方式執(zhí)行 D、事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)3

13、7、在Show方法中，“模式”的默認(rèn)值為( )。（1分） A、0 B、1 C、2 D、Null38、下列對(duì)于順序文件的描述中，正確的描述是( C )。（1分） A、每個(gè)記錄長(zhǎng)度相同 B、可以隨機(jī)訪問(wèn)其中的記錄 C、必須按照順序訪問(wèn) D、可以向文件中插入記錄39、使用 Write #1, "abc", "def", 123 語(yǔ)句后，打開該被寫入的文件，則文件中的內(nèi)容是( B )。（1分） A、"abc","def",123 B、abc def 123 C、"abc" "def"

14、 123 D、abc,def,12340、設(shè)有語(yǔ)句Open "c:Test.Dat" For Output As #1，則以下錯(cuò)誤的敘述是( D )。（1分） A、該語(yǔ)句在C盤根目錄下建立一個(gè)名為Test.Dat的文件 B、該語(yǔ)句建立的文件的文件號(hào)為1 C、執(zhí)行該語(yǔ)句后，就可以通過(guò) Print # 語(yǔ)句向文件Test.Dat中寫入信息 D、執(zhí)行該語(yǔ)句后，就可以通過(guò) Input # 語(yǔ)句從文件Test.Dat中讀出信息二、填空題（5道小題，共30分）1、* 求T=2×4×6×8××30 * 程序段如下： T = 1 For I

15、 = 2 To 30 T = T * I Next I Print "乘積為: " T（6分）_2、* 利用數(shù)組求裴波那契數(shù)列1,1,2,3,5,.的前20項(xiàng)。 * 程序段如下： Private Sub Command啟動(dòng)_Click() Dim a(20) As Integer, i As Integer a(1) = 1: a(2) = 1 Print a(1); a(2); For i = 3 To 20 a(i)= a(i - 1) + a(i - 2) Print a(i); Next i: Print End Sub（6分）_3、* 程序功能是實(shí)現(xiàn)矩陣轉(zhuǎn)置，即將

16、M×N的矩陣的行和列互換。 * 如將下列矩陣A轉(zhuǎn)換為B 1 2 135 A = 3 4 B = 5 6 2 4 6 * 程序代碼如下： Option Base 1 Private Sub Form_Click() Dim A(3, 2),B(2, 3) For I = 1 To 3 For J = 1 To 2 A(I, J) = (I - 1) * 2 + J Print A(I, J); Next J Print Next I For I = 1 To 2 For J = 1 To 3 B(I, J) = (J-1)*2+I Print B(I, J); Next J Print

17、 Next I End Sub（6分）_4、* 設(shè)計(jì)一個(gè)用于求一維數(shù)組中的最小值的子過(guò)程。 * 程序代碼如下： Private Sub min(s() Dim i As Integer, a As Integer, b As Integer a = LBound(s) b = UBound(s) m = s(a) For i = a To b If s(i) < m Then m = s(i) End If Next i Print m End Sub（6分）_5、* 若在D:盤根目錄下有文本文件zhengda3.txt，統(tǒng)計(jì)該文件的記錄個(gè)數(shù)。 * 程序段如下： Private Sub

18、Form_Load() Open "d:zhengda3.txt" For Input As #1 n = 0 Do Input #1, a n = n + 1 Loop Until EOF(1) Print "n=" n Close #1 End Sub（6分）_三、編程題（3道小題，選作2道，每道15分，共30分）1、* 編寫一個(gè)計(jì)算某數(shù)的平方、絕對(duì)值的平方根、立方和絕對(duì)值的立方根程序，如圖 K_613.jpg 所示。 * 界面要求： * 使用文本框，命令按鈕完成。 * 運(yùn)行要求： * 1、在第一個(gè)文本框中輸入任意整數(shù)； * 2、求出該數(shù)的平方、絕對(duì)值的平方根、立方和絕對(duì)值的立方根，在文本框中顯示; * 3、一個(gè)命令按鈕用來(lái)清除文本框的文字，另一個(gè)命令按鈕完成計(jì)算。 * （此題要求上載窗體文件，不要求填寫程序運(yùn)行結(jié)果）（下載文件“k_613.jpg”）下載方法：在鏈接上右擊打開彈出菜單，選擇“目標(biāo)另存為”。（15分）（本題不要求填寫運(yùn)行結(jié)果）