2003—2012全國計算機等級考試二級VB語言筆試試題及答案

1、2003年4月全國計算機等級考試二級vb語言筆試試題及答案一、選擇題(1)一(20)每小題2分，(21)一(30)每小題3分，共30題，70分)下列各題a)、b)、c)、d)四個選項中，只有一個選項是正確的，請將正確選項涂在答題卡的相應(yīng)位置上，答在試卷上不得分。 (1)以下不能在“工程資源管理器”窗口中列出的文件類型是 a)bas b)res c)fnn d)ocx (2)以下關(guān)于窗體的描述中，錯誤的是 a)執(zhí)行unloadfoml語句后，窗體fonnl消失，但仍在內(nèi)存中 b)窗體的ioad事件在加載窗體時發(fā)生 c)當窗體的enabled屬性為false時，通過鼠標和鍵盤對窗體的操作都被禁止

2、d)窗體的height、width屬性用于設(shè)置窗體的高和寬 (3)下列可作為v2sualbasic變量名的是 a)a#a b)4a c)?xy d)consta (4)設(shè)有如下的記錄類型 type student numberas string name as string age as integer end type 則正確引用該記錄類型變量的代碼是 a) studentname=”張紅” b) dim as student sname”張紅” c) dim s as type student d) dim s as type sname=”張紅” s.dame”張紅” (5)函數(shù)stri

3、ng(n，“str”)的功能是 a)把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串 b)返回由n個字符組成的字符串 c)從字符串中取出n個字符 d)從字符串中第n個字符的位置開始取子字符串 (6)將數(shù)學(xué)表達式cos2(a+b)+5e2寫成visual basic的表達式，其正確的形式是 a)cos(a+b)a2十5。exp(2) b)cos2(a+b)+5*exp(2) c)cos(a+b)2十5*ln(2) d)cos2(a+b)+5*ln(2) (7)在窗體上畫一個命令按鈕，名稱為commandl。單擊命令按鈕時，執(zhí)行如下事件過 程： prlvate sub commandlc1icko a$=software

4、 and hardware b$right(a$,8) c$=mid(a$,1，8) msgbox a$,b$,c$,1 end sub 則在彈出的信息框的標題欄中顯示的信息是 a)software and hardware b)software c)hardwafe d)1 (8)執(zhí)行如下語句： ainutbox(”today”，”tomorrow，”yesterday”,day before yesterday，5) 將顯示一個輸入對話框，在對話框的輸入?yún)^(qū)中顯示的信息是 a)today b)tomorrow c)yesterday d)day before yesterday (9)表示滾

5、動條控件取值范圍最大值的屬性是 a)max b)largechange c)value d)maxmin (10)在窗體上畫一個名稱為listl的列表框，一個名稱為labell的標簽。列表框中顯示 若干城市的名稱。當單擊列表框中的某個城市名時，在標簽中顯示選中城市的名稱。 下列能正確實現(xiàn)上述功能的程序是 a) private sub listl_click() b)private sub listl_c1ick() labellcaptionlist1.listlndex labellnanlelistllistindex end sub end sub 程序運行后，如果單擊命令按鈕，則在窗體

6、上顯示的內(nèi)容是 a)空白 b)錯誤提示 c)北京 d)上海 (15)假定有以下函數(shù)過程： function fun(s as string) as string dim s1 as string for i=1 to len(s) s1ucase(mid(s，i，1)十s1 next i funs1 end function 在窗體上畫一個命令按鈕，然后編寫如下事件過程： prlvate sub commmldl_click() dim str1 as string，str2 as string strlinputbox(”請輸入一個字符串”) str2=fun(strl) print str

7、2 end sub 程序運行后，單擊命令按鈕，如果在輸入對話框中輸入字符串“abcdefg”，則單擊“確 定”按鈕后在窗體上的輸出結(jié)果為 a)abcdefg b)abcdefg c)gfedcba d)gfedcba (16)設(shè)有語句 open c：testdat for output as#1 則以下錯誤的敘述是 a)該語句打開c盤根目錄下一個己存在的文件testdat b)該語句在c盤根目錄下建立一個名為testdat的文件 c)該語句建立的文件的文件號為1 d)執(zhí)行該語句后，就可以通過print#語句向文件testdat中寫入信息 (17)以下敘述中錯誤的是 a)用shell函數(shù)可以調(diào)用

8、能夠在windows下運行的應(yīng)用程序 b)用shell函數(shù)可以調(diào)用可執(zhí)行文件，也可以調(diào)用visualbasic的內(nèi)部函數(shù) c)調(diào)用shell函數(shù)的格式應(yīng)為：shell() d)用shell函數(shù)不能執(zhí)行dos命令 (18)以下關(guān)于過程及過程參數(shù)的描述中，錯誤的是 a)過程的參數(shù)可以是控件名稱 b)用數(shù)組作為過程的參數(shù)時，使用的是“傳地址”方式 c)只有函數(shù)過程能夠?qū)⑦^程中處理的信息傳回到調(diào)用的程序中 d)窗體可以作為過程的參數(shù) (19)在窗體上畫一個名稱為txta的文本框，然后編寫如下的事件過程： private sub txta_keypress(keyascii as integer) en

9、d sub 若焦點位于文本框中，則能夠觸發(fā)keypress事件的操作是 a)單擊鼠標 b)雙擊文本框 c)鼠標滑過文本框 d)按下鍵盤上的某個鍵 (20)目錄列表框的path屬性的作用是 a)顯示當前驅(qū)動器或指定驅(qū)動器上的路徑 b)顯示當前驅(qū)動器或指定驅(qū)動器上的某目錄下的文件名 c)顯示根目錄下的文件名 d)只顯示當前路徑下的文件 (21)假定有如下事件過程： private sub form_mousedown(button as integer,shift as integer, x as single，y as single) if button2 then popupmenu popf

10、orm end if end sub 則以下描述中錯誤的是 a)該過程的功能是彈出一個菜單 b)popform 是在菜單編輯器中定義的彈出式菜單的名稱 c)參數(shù)x、y指明鼠標的當前位置 d)button=2 表示按下的是鼠標左鍵 (22)以下能夠正確計算n!的程序是 二級visual basic語言程序設(shè)計試卷第5頁 (共15頁) a) private sub commandl_click() n5:x1 do x=x*1 ii十1 loop while in print x end sub b) private sub commandl_click() n5: x1：i=1 do xx*1

11、ii十1 loop while in print x end sub c)private sub commandl_click() n=5：x1：i1 do x=x*1 ii十1 loop while i、13和 14處將程序補充完整。 private sub combol_ (keyascii as integer) 1f keyascii13 then fori0 to combo1listcount1 1f combo1text_ 13 ihen label2caption”輸入項己在組合框中” exit sub end lf next i label2caption“已成功添加輸入項”

12、 combo1_ 14 combo1text end lf end sub (10)設(shè)有如下程序 private sub search(a()as variant，byval key as variant，index%) dim i forilbound(a)to ubound(a) if keya(i) then indexi exit sub end if next i index-1 end sub private sub form_load() show dtm b() as variant dim n as integer barray(1，3，5，7，9，11，13，15) cal

13、l search(b，11，n) printt n end sub 程序運行后，輸出結(jié)果是_。2003年4月全國計算機等級考試二級visual basic筆試答案一、選擇題1-5：dadbb 6-10：accad 11-15：dbbdd 16-20：abcda 21-25：dcbbc 26-30：ccdca二、填空題(1) 組合框(2) 順序訪問方式(3) 9(4) picture1.picture=loadpicture(d:pica.jpg)(5) timer(6) rnd和x mod 5和x(7) 30和70(8) 123456789(9) keypress和combo1.list(i)

14、和additem(10) 52003年9月全國計算機等級考試二級vb語言筆試試卷（考試時間90分鐘，滿分100分） 一、 選擇題（1）（20）每小題2分，（21）（30）每小題3分，共70分）（1）以下敘述中錯誤的是a）visual basic 是事件驅(qū)動型可視化編程工具b）visual basic應(yīng)用程序不具有明顯的開始和結(jié)束語句c）visual basic工具箱中的所有控件都具有寬度（width）和高度（height）屬性d）visual basic中控件的某些屬性只能在運行時設(shè)置（2）以下敘述中錯誤的是a）在工程資源管理器窗口中只能包含一個工程文件及屬于該工程的其他文件 b）以.bas為

15、擴展名的文件是標準模塊文件c）窗體文件包含該窗體及其控件的屬性d）一個工程中可以含有多個標準模塊文件（3）以下敘述中錯誤的是a）雙擊鼠標可以觸發(fā)dblclick事件b）窗體或控件的事件的名稱可以由編程人員確定c）移動鼠標時，會觸發(fā)mousemove事件d）控件的名稱可以由編程人員設(shè)定（4）以下不屬于visual basic系統(tǒng)的文件類型是a）.frm b）.bat c）.vbg d）.vbp（5）以下敘述中錯誤的是a）打開一個工程文件時，系統(tǒng)自動裝入與該工程有關(guān)的窗體、標準模塊等文件b）保存visual basic程序時，應(yīng)分別保存窗體文件及工程文件c）visual basic應(yīng)用程序只能以解

16、釋方式執(zhí)行d）事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)（6）以下能正確定義數(shù)據(jù)類型telbook的代碼是a）type telbook b）type telbookname as string*10 name as string*10telnum as integer telnum as integerend type end telbookc）type telbook d）typedef telbookname string*10 name string*10telnum integer telnum integerend type telbook end type（7）以下聲明語句中錯誤的是a）

17、const var1=123 b）dim var2 = abcc）defint a-z d）static var3 as integer（8）設(shè)窗體上有一個列表框控件list1，且其中含有若干列表項。則以下能表示當前被選中的列表項內(nèi)容的是a）list1.list b）list1.listindex c）list1.index d）list1. text（9）程序運行后，在窗體上單擊鼠標，此時窗體不會接收到的事件是a）mousedown b）mouseup c）load d）click（10）設(shè)a=10，b=5，c=1，執(zhí)行語句print a b c后，窗體上顯示的是a）true b）false

18、 c）1 d）出錯信息 2004年4月全國計算機等級考試二級vb語言筆試試題及答案一、選擇題（(1)(20)每小題2分，(21)(30)每小題3分，共70分）下列各題 a) 、b)、c)、d)四個選項中，只有一個選項是正確的，請將正確選項涂寫在答題卡相應(yīng)位置上，答在試卷上不得分。(1) 在窗體上畫一個名稱為command1的命令按鈕，然后編寫如下事件過程： private sub command1_click() move 500，500 end sub 程序運行后，單擊命令按鈕，執(zhí)行的操作為a) 命令按鈕移動到距窗體左邊界、上邊界各500的位置b) 窗體移動到距屏幕左邊界、上邊界各500的位

19、置c) 命令按鈕向左、上方向各移動500d) 窗體向左、上方向各移動500(2) 在窗體上有若干控件，其中有一個名稱為text1的文本框。影響text1的tab順序的屬性是a) tabstop b)enabledc) visible d)tabindex(3) 以下定義數(shù)組或給數(shù)組元素賦值的語句中，正確的是(4) 在窗體上畫一個名稱為list1的列表框，為了對列表框中的每個項目都能進行處理，應(yīng)使用的循環(huán)語句為a) for i=0 to list1.listcount-1nextb) for i=0 to listcount-1nextc) for i=1 to list1.listcountn

20、extd) for i=1 to listcountnext(5) 以下case語句中錯誤的是a) case 0 to 10 b) case is%26gt;10c) case is%26gt;10 and is%26lt;50 d) case 3,5,is%26gt;10(6) 以下關(guān)于圖片框控件的說法中，錯誤的是a) 可以通過print方法在圖片框中輸出文本b) 清空圖片框控件中圖形的方法之一是加載一個空圖形c) 圖片框控件可以作為容器使用d) 用stretch屬性可以自動調(diào)整圖片框中圖形的大小(7) 執(zhí)行語句s=len(mid(visualbasic,1,6)后，s的值是a) visua

21、l b) basic c) 6 d) 11(8) 以下敘述中錯誤的是a) 下拉式菜單和彈出式菜單都用菜單編輯器建立b) 在多窗體程序中，每個窗體都可以建立自己的菜單系統(tǒng)c) 除分隔線外，所有菜單項都能接收click事件d) 如果把一個菜單項的enabled屬性設(shè)置為false，則該菜單項不可見(9) 在窗體上畫一個命令按鈕，其名稱為command1，然后編寫如下事件過程： private sub command1_click() a = 12345print format$(a, 000.00)end sub程序運行后，單擊命令按鈕，窗體上顯示的是a) 123.45 b) 12345.00 c

22、) 12345 d)00123.45(10) 以下敘述中錯誤的是a) 一個工程可以包括多種類型的文件b) visual basic應(yīng)用程序既能以編譯方式執(zhí)行，也能以解釋方式執(zhí)行c) 程序運行后，在內(nèi)存中只能駐留一個窗體d) 對于事件驅(qū)動型應(yīng)用程序，每次運行時的執(zhí)行順序可以不一樣 (11) 以下關(guān)于函數(shù)過程的敘述中，正確的是a) 函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關(guān)系b) 在函數(shù)過程中，過程的返回值可以有多個c) 當數(shù)組作為函數(shù)過程的參數(shù)時，既能以傳值方式傳遞，也能以傳址方式傳遞d) 如果不指明函數(shù)過程參數(shù)的類型，則該參數(shù)沒有數(shù)據(jù)類型(12) 以下關(guān)于變量作用域的敘述中，正確的是a) 窗體

23、中凡被聲明為private的變量只能在某個指定的過程中使用b) 全局變量必須在標準模塊中聲明c) 模塊級變量只能用private關(guān)鍵字聲明d) static類型變量的作用域是它所在的窗體或模塊文件(13) 確定一個控件在窗體上的位置的屬性是a) width和height b) width或heightc) top和left d) top或left (14) 在窗體上畫一個名稱為text1的文本框和一個名稱為command1的命令按鈕，然后編寫如下事件過程 private sub command1_click() text1.text = visual me.text1 = basic text

24、1 = programend sub程序運行后，如果單擊命令按鈕，則在文本框中顯示的是a) visual b) basic c) program d) 出錯(15) 以下關(guān)系表達式中，其值為false的是a) abcabc b) thetheyc) visual=ucase(visual) d) integerint(16) 語句print 5/4*65 mod 2的輸出結(jié)果是a) 0 b)1 c) 2 d) 3(17) 在窗體上畫一個文本框、一個標簽和一個命令按鈕，其名稱分別為text1、label1和command1，然后編寫如下兩個事件過程：private sub command1_cl

25、ick() strtext = inputbox(請輸入) text1.text = strtextend subprivate sub text1_change() label1.caption = right(trim(text1.text), 3)end sub程序運行后，單擊命令按鈕，如果在輸入對話框中輸入abcdef，則在標簽中顯示的內(nèi)容是a)空 b) abcdef c) abc d) def(18) 在窗體上畫一個名稱為command1的命令按鈕，然后編寫如下事件過程：private sub command1_click()x = -5if sgn(x) then y = sgn(

26、x 2)else y = sgn(x)end ifprint yend sub程序運行后，單擊命令按鈕，窗體上顯示的是a) -5 b) 25 c) 1 d) -1(19) 一個工程中含有窗體form1、form2和標準模塊model1，如果在form1中有語句pubilc x as integer，在model1中有語句pubilc y as integer，則以下敘述中正確的是a) 變量x、y的作用域相同 b) y的作用域是model1c) 在form1中可以直接使用x d) 在form2中可以直接使用x和y(20) 在窗體上畫一個名稱為drive1的驅(qū)動器列表框，一個名稱為dir1的目錄列

27、表框。當改變當前驅(qū)動器時，目錄列表框應(yīng)該與之同步改變。設(shè)置兩個控件同步的命令放在一個事件過程中，這個事件過程是a）drive1_change b) drive1_clickc) dir1_click d) dir1_change (21) 在窗體上畫一個命令按鈕（其name屬性為command1），然后編寫如下代碼:option base 1private sub command1_click() dim a s = 0 a = array(1,2,3,4) j = 1 for i = 4 to 1 step -1 s = s + a(i) * j j = j * 10 next i prin

28、t send sub運行上面的程序，單擊命令按鈕，其輸出結(jié)果是a) 4321 b) 1234 c) 34 d) 12(22) 在窗體上畫一個名稱為text1的文本框，要求文本框只能接收大寫字母的輸入。以下能實現(xiàn)該操作的事件過程是a) private sub text1_keypress(keyascii as integer) if keyascii 90 then msgbox 請輸入大寫字母 keyascii = 0 end ifend subb) private sub text1_keydown(keycode as integer, shift as integer) if keyc

29、ode 90 then msgbox 請輸入大寫字母 keycode = 0 end ifend subc) private sub text1_mousedown(button as integer, shift as integer, x as single, y as single) if asc(text1.text) 90 then msgbox 請輸入大寫字母 end ifend subd) private sub text1_change() if asc(text1.text) 64 and asc(text1.text) sqr(i) then print i next iend sub該事件過程的功能是a) 輸出n以內(nèi)的奇數(shù) b) 輸出n以內(nèi)的偶數(shù)c) 輸出n以內(nèi)的素數(shù) d) 輸出n以內(nèi)能被j整除的數(shù)(27) 在以下描述中正確的是a) 標準模塊中的任何過程都可以在整個工程范圍內(nèi)被調(diào)用b) 在一個窗體模塊中可以調(diào)用在其他窗體中被定義為public的通用過程c) 如果工程中包含sub main過程，則程序?qū)⑹紫葓?zhí)行該過程d) 如果工程中不包含sub main過程，則程序一定首先執(zhí)行第一個建立的窗體(28) 在窗體上畫一個名稱為command1的命令按鈕，然后編寫如下通用過程和命令按鈕的事件過程：private function f(m as