VB選擇判斷題題庫答案

第一章工程資源管理器窗口中包含的文件類型有（D）種A、2B、3C、4D、5VB集成的主窗口中不包括（A）屬性窗口B.標(biāo)題欄C.菜單欄D.工具欄TOC\o"1-5"\h\z.與傳統(tǒng)的程序設(shè)計(jì)語言相比，VB最突出的特點(diǎn)是（D）結(jié)構(gòu)化程序設(shè)計(jì)程序開發(fā)環(huán)境C.程序調(diào)試技術(shù)D.事件驅(qū)動編程機(jī)制.啟動VB進(jìn)入編程環(huán)境后，下列敘述中錯(cuò)誤的是（A）工具箱中只有內(nèi)部控件B.窗口中會自動建立名為F0RM1的窗體C.屬性窗口一定會同時(shí)打開D.只要存盤就會生成一個(gè)工程文件下列關(guān)于屬性設(shè)置的敘述錯(cuò)誤的是（A）控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的，用戶不能改變控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的，用戶可以改變控件的屬性既可以在屬性窗口中設(shè)置，也可以用程序代碼設(shè)置控件的屬性在屬性窗口中設(shè)置后，還可以用程序代碼為其設(shè)置新值6?應(yīng)用程序設(shè)計(jì)完成后，應(yīng)將程序文件保存，保存的文件是（A）只保存窗體文件即可B.只保存工程文件即可，先保存工程文件，之后再保存窗體文件先保存窗體文件（和標(biāo)準(zhǔn)模塊文件），之后再保存工程文件。7.啟動VB后，就意味著要建立一個(gè)新的（C）窗體B.程序C.工程D.文件8?下面不能打開屬性窗口的操作是（C）執(zhí)行“視圖”菜單中的“屬性窗口”命令單擊工具欄上的“屬性窗口”按鈕按ctrl+T快捷鍵D.按F4鍵。9.在正確安裝VB6.0后，可以通過多種方式啟動VB,以下（D）方式不能啟動VB通過“開始”菜單中的“程序”命令通過“我的電腦”找到VB6.EXE,雙擊該文件名通過“開始”菜單中的“運(yùn)行”命令進(jìn)入DOS方式，執(zhí)行VB6.EXE文件VB集成環(huán)境的大部分窗口都可以從主菜單項(xiàng)（B的下拉菜單找到相應(yīng)的打開命令編輯B.視圖C.格式D.調(diào)試下列（C方法不是VB6.0中打開工程的方法按CTRL+O組合鍵執(zhí)行“文件”菜單中的“打開工程”命令按ALT+O組合鍵單擊標(biāo)準(zhǔn)工具欄上的“打開工程”按鈕下列敘述中正確的是（BA.VB與BASIC沒有什么不同B.VB與BASIC的編程機(jī)制不同VB是過程設(shè)計(jì)語言D.VB與BASIC之間沒有什么聯(lián)系。VB是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語言，構(gòu)成對象的三要素是（B屬性、控件和方法B.屬性、事件和方法窗體、控件和過程D.控件、過程和模塊14．以下說法正確的是（D）對象屬性只能在“屬性窗口”中設(shè)置—個(gè)新的工程可以在“工程窗口”中建立必須先建立一個(gè)工程，才能開始設(shè)計(jì)應(yīng)用程序D.只能在“代碼窗口”中編寫程序代碼。15．下列說法中錯(cuò)誤是（B）應(yīng)用程序界面是窗體B.應(yīng)用程序的界面是對象每個(gè)應(yīng)用程序都要生成一個(gè)工程D.—個(gè)應(yīng)用程序由若干個(gè)VB文件組成以下選項(xiàng)中，不是可視化編程方法特點(diǎn)的是（C）不必運(yùn)行程序就能看到所要做的界面B.采用面向?qū)ο篁?qū)動事件的機(jī)制使用工程的概念來建立應(yīng)用程序D.將代碼和數(shù)據(jù)集成到一個(gè)獨(dú)立的對象中VB6.0集成開發(fā)環(huán)境可以（D）編輯、調(diào)試、運(yùn)行程序，但不能生成可執(zhí)行程序編輯、生成可執(zhí)行程序、運(yùn)行程序，但不能調(diào)試程序編輯、調(diào)試、生成可執(zhí)行程序，但不能運(yùn)行程序編輯、調(diào)試、運(yùn)行程序，也能生成可執(zhí)行程序下列不屬于VB特點(diǎn)的是（C）A.對象的鏈接與嵌入B.結(jié)構(gòu)化程序設(shè)計(jì)C.編寫跨平臺應(yīng)用程序D.事件驅(qū)動程序編程機(jī)制在VB環(huán)境下，當(dāng)寫一個(gè)新的VB程序時(shí)，所做的第一件事是（B）A?編寫代碼B.新建一個(gè)工程C.打開屬性窗口D?進(jìn)入VB環(huán)境下面關(guān)于VB6.0工具欄的說法不正確的是（B）A.工具欄的位置可以任意改變B.工具欄一定在菜單欄下方C.工具欄可以隱藏D.VB有多個(gè)工具欄（二）判斷題（對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”）（T）VB的企業(yè)版包括專業(yè)版的全部功能。（F）一個(gè)對象對應(yīng)一個(gè)事件，一個(gè)事件對應(yīng)一個(gè)事件過程（T）在程序設(shè)計(jì)階段，雙擊某個(gè)控件，所打開的窗口是代碼窗口（F）方法是預(yù)先定義好的、能夠被對象識別的動作（F）對象屬性只能在“屬性窗口”中設(shè)置（T）按ctrl+R進(jìn)入工程資源管理器窗口（T）工程資源管理器管理文件主要有6類，即窗體文件（.frm）、標(biāo)準(zhǔn)模塊文件（.bas）、類模塊文件（.els）、工程文件（.vbp）、工程組文件（.vbg）和資源文件（.res）（T）按ctrl+G進(jìn)入立即窗口。（F）按F7進(jìn)入程序運(yùn)行窗口。（F）應(yīng)用程序的界面是對象。第二章（一）選擇題1、以下不是VisualBasic的特點(diǎn)的選項(xiàng)是（B）。A、可視編程B、算法設(shè)計(jì)C、事件驅(qū)動D、面向?qū)ο?、VB的工程資源管理器可管理多種類型的文件，下面敘述不正確的是（C）A、窗體文件的擴(kuò)展名為.frm,每個(gè)窗體對應(yīng)一個(gè)窗體文件B、標(biāo)準(zhǔn)模塊是一個(gè)純代碼性質(zhì)的文件，它不屬于任何一個(gè)窗體C、用戶通過類模塊來定義自已的類，每個(gè)類都用一個(gè)文件來保存，其擴(kuò)展名為basD、資源文件是一種純文本文件，可以用簡單的文字編輯器來編輯3、一個(gè)工程中包含兩個(gè)名稱分別為Forml、Form2的窗體、一個(gè)名稱為Func的標(biāo)準(zhǔn)模塊。假定在Form1、Form2和Func中分別建立了自定義過程，其定義格式為：Forml中定義的過程：PrivateSubFunl（）EndSubForm2中定義的過程PrivateSubFun2()EndSubFunc中定義的過程PrivateSubFun3()EndSub在調(diào)用上述過程的程序中，如果不指明窗體或模塊的名稱，則以下敘述中正確的是（D）A、上述三個(gè)過程都可以在工程中的任何窗體或模塊中被調(diào)用B、Funl和Fun2過程能夠在工程中各個(gè)窗體或模塊中被調(diào)用C、上述三個(gè)過程都只能在各自被定義的模塊中調(diào)用D、只在Fun3過程能夠被工程中各窗體或模塊調(diào)用4、當(dāng)運(yùn)行程序時(shí)，系統(tǒng)自動執(zhí)行啟動窗體的某個(gè)事件過程。這個(gè)事件過程是（A）A、LoadB、ClickC、UnloadD、GotFocus5、VisualBasic是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語言，構(gòu)成對象的三要素是（B）A、設(shè)計(jì)、控件和事件B、屬性、事件和方法C、窗體、控件和過程D、控件、過程和模塊6、以下敘述中錯(cuò)誤的是（C）A、打開一個(gè)工程文件時(shí)，系統(tǒng)自動裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件B、保存VisualBasic程序時(shí)，應(yīng)分別保存窗體文件及工程文件C、VisualBasic應(yīng)用程序只能以解釋方式執(zhí)行D、事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)7、在設(shè)計(jì)階段，當(dāng)雙擊窗體上的某個(gè)控件時(shí)，所打開的窗口是（C）A、工程資源管理器窗口B、工具箱窗口C、代碼窗口D、屬性窗口8、以下敘述中正確的是（A）A、窗體的Name屬性指定窗體的名稱，用來標(biāo)識一個(gè)窗體B、窗體的Name屬性的值是顯示在窗體標(biāo)題欄中的文本C、可以在運(yùn)行期間改變對象的Name屬性的值D、對象的Name屬性值可以為空9、以下敘述中錯(cuò)誤的是（C）A、一個(gè)工程中只能有一個(gè)SubMain過程B、窗體的Show方法的作用是將指定的窗體裝入內(nèi)存并顯示該窗體C、窗體的Hide方法和Unload方法的作用完全相同D、若工程文件中有多個(gè)窗體，可以根據(jù)需要指定一個(gè)窗體為啟動窗體10、以下關(guān)于窗體的描述中，錯(cuò)誤的是（A）A、執(zhí)行UnloadForml語句后，窗體Forml消失，但仍在內(nèi)存中

B、窗體的Load事件在加載窗體時(shí)發(fā)生C、當(dāng)窗體的Enabled屬性為False時(shí)，通過鼠標(biāo)和鍵盤對窗體的操作都被禁止D、窗體的Height、Width屬性用于設(shè)置窗體的高和寬11、為了保存一個(gè)VB應(yīng)用程序，下列正確的是（C）A、只保存窗體文件（.frm）B、只保存工程文件（.vbp）C、分別保存工程文件和窗體文件D、分別保存工程文件和標(biāo)準(zhǔn)模塊文件（.bas）12、假定窗體的名稱為（Name屬性）為forml,則把窗體的標(biāo)題設(shè)置為“VBTEST”的語句正確的是（B）A、orm1=“VBTEST”B、Caption=“VBTEST”C、form1.test=“VBTEST”D、=“VBTEST”13、當(dāng)一個(gè)工程含有多個(gè)窗體時(shí)，其中的啟動窗體是（D）A、啟動VB時(shí)建立的窗體B、第一個(gè)添加的窗體C、最后一個(gè)添加的窗體工程屬性D、在工程屬性對話框中指定的窗體14、同時(shí)改變一個(gè)活動控件的高度和寬度，正確的操作是（A）A、拖拉控件4個(gè)角上的某個(gè)小方塊B、只能拖拉位于控件右下角的小方塊C、只能拖拉位于控件左下角的小方塊D、不能同時(shí)改變控件的高度和寬度15、如果要向工具箱中加入控件的部件，可以利用“工程”菜單中的（A）命令A(yù)、引用B、部件C、工程屬性D、加窗體16、下列敘述中正確的是（C）A、所有應(yīng)用程序都是由窗體開始執(zhí)行的B、在多文檔系統(tǒng)中，每個(gè)窗體都是平等的C、VB的每一個(gè)窗體和控件都存在一個(gè)預(yù)定義的事件集D、改變窗體的標(biāo)題也就是改變其屬性窗口中的Name屬性17、創(chuàng)建VB應(yīng)用程序的主要步驟是：①創(chuàng)建應(yīng)用程序界面②設(shè)置控件③設(shè)置屬性D、①②③④DD、①②③④D、.vblTOC\o"1-5"\h\zA、①③④B、①②④C、②③④A、.vbgB、A、.vbgB、.vbpC、.vbw19、VB中控件主要分為3類，下面哪一種不是VB中的控件類（D）A、標(biāo)準(zhǔn)控件B、ActiveXC、可插入對象D、外部控件20、以下敘述中錯(cuò)誤的是（A）A、事件過程是響應(yīng)特定事件的一段程序B、不同的對象可以具有相同名稱的方法C、對象的方法是執(zhí)行指定操作的過程D、對象事件的名稱可以由編程者指定（二）判斷題（對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”）1、（F）以.BAS為擴(kuò)展名的文件是類模塊文件。2、（F）窗體模塊和標(biāo)準(zhǔn)模塊都是只由代碼組成。3、（F）程序運(yùn)行前必須先保存。4、（F）不同控件的相同屬性的只讀性相同。5、（T）不同事件觸發(fā)是有先后順序的。6、（F）窗體的Show方法和Load語句具有相同的功能7、（F）所有屬性都可以在屬性窗口設(shè)置。8、（T）可以用程序代碼窗體上畫控件。

9、（F）“事件驅(qū)動“程序中的事件的含義是用戶操作事件。10、（T）用戶不可以自定義標(biāo)準(zhǔn)控件的事件，但可以用類的方法來自定義控件及其事件、方法。11、（F）窗體包含的代碼全部由事件過程組成。第三章（一）選擇題1、下面的四個(gè)VB6.0表達(dá)式語法正確的是（D）。A、a>b．find．b<>cB、a>bcC、a>bAND<>cD、a>bANDb<>c2、骰子是一個(gè)正六面體，用1-6這六個(gè)數(shù)分別代表這六面，擲一次骰子出現(xiàn)的數(shù)可表示為（D）。A、INT（RND（6）+1）B、INT（RND*6）C、INT（RND*7）D、INT（RND*6+1）3、Print方法可以輸出多個(gè)表達(dá)式，若使用標(biāo)準(zhǔn)格式輸出，各表達(dá)式的分隔符應(yīng)是（B）。A、空格B、逗號C、冒號D、分號4、以下關(guān)于MsgBox的敘述中，錯(cuò)誤的是（C）A、MsgBox函數(shù)返回一個(gè)整數(shù)B、通過MsgBox函數(shù)可設(shè)置信息框中圖標(biāo)和按鈕的類型C、MsgBox語句沒有返回值D、MsgBox函數(shù)的第二個(gè)參數(shù)是一個(gè)整數(shù)，該參數(shù)只能確定對話框中顯示的按鈕數(shù)量5、編寫如下程序：PrivateSubForm_Click（）a$=”54321”:b$=“abcde”Forj=lTo5PrintMid$（a$，6-j，1）+Mid$（b$，j，1）；NextjPrintEndSub程序運(yùn)行后，單擊窗體，其輸出結(jié)果為（D）。A、alb2c3d45eB、a5b4c3d2elC、eld2c3b4a5D、la2b3c4d5e6、在窗體上畫一個(gè)文本框、一個(gè)標(biāo)簽和一個(gè)命令按鈕，其名稱分別為Text1、Labe11和Command1，然后編寫如下兩個(gè)事件過程：PrivateSubCommandl_Click()strText=InputBox(“請輸入”)Text1．Text=strTextEndSubPrivateSubText1_Change()）。Labe11．Caption=Right(Trim(Text1.Text)，3)EndSub）。A、空B、abcdefC、abcD、de7、可以同時(shí)刪除字符前導(dǎo)和尾部空白的函數(shù)是（C)A、LtrimB、RtrimC、TrimD、Mid8、表達(dá)式4+5\6*7／8Mod9的值是（B）。A、4B、5C、6D、7程序運(yùn)行后，如果在對話框中輸入abcdef，則在標(biāo)簽中顯示的內(nèi)容是（D執(zhí)行以下程序段后，變量c$的值為（）。9、D

a$="VisualBasicProgramming”b$="Quick”c$=b$&UCase(Mid$(a$，7，6))&Right$(a$,12)B、QuickBasicProgrammingD、QuickBASICProgrammingA、VisualBasicProgrammingCB、QuickBasicProgrammingD、QuickBASICProgrammingA、VisualBasicProgrammingC、QUICKBasicProgramming10、執(zhí)行如下語句：a=InputBox(“Today","Tomorrow","Yesterday",”"Daybeforeyesterday",5)將顯示一個(gè)對話框，在對話框的輸入?yún)^(qū)中顯示的信息是(CA、TodayB、TomorrowC、Yesterday11、執(zhí)行如下兩條語句后，窗體上顯示的是(Da=8.4326PrintFormat(a，“$00,")A、0,008.43B、$8.43C、8.43)。D、Daybeforeyesterday)。12、VisualBasic邏輯運(yùn)算符Xor、Or、Eqv、And中，級別最高的運(yùn)算符是(A、XorB、Or13、InputBox函數(shù)默認(rèn)的返回值類型為(A、數(shù)值B、字符串C、邏輯14、［多選題］下列可以作為VB6.0的變量名是(D、$0,008.43D)D、AndC、EovB)D、數(shù)值或字符串(視輸入的數(shù)據(jù)而定)D)。A、PrintAB、a?bC、123abD、IntegerE、ab15、用于去掉一個(gè)字符串的右邊的空白部分的函數(shù)是(A)A、RTrim$()B、Right$()C、Asc()D、Time$()16、下面(D)不是VisualBasic的數(shù)據(jù)類型。A、SingleB、ObjectC、CurrencyD、Boo117、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：PfivateSubCommand1_Click()StaticyAsIntegerClsFori=OTO2X=X+yy=y+3NextPrintx,yEndSub程序運(yùn)行后，連續(xù)二次單擊Commandl按鈕后，窗體上顯示的是(B)。A、99B、3618C、3012D、632718、在窗體上畫一個(gè)文本框，然后編寫如下事件過程：PrivateSubTextl_KeyPress(KeyAsciiAsInteger)DimcharAsStringchar=Chr(KeyAscii)KeyAscii=Asc(UCase(char))Textl．Text=String(6，KeyAscii)EndSub程序運(yùn)行后，如果在鍵盤上輸入字母“a”，則文本框中顯示的內(nèi)容為(D)。A、aB、AC、aaaaaaaD、AAAAAAA19、符號％是聲明(A)類型變量的類型定義符。A、IntegerB、VariantC、SingleD、String20、VB6.0表達(dá)式COS(0)+ABS(1)+INT(RND(1))的值是(D)。A、1B、-1C、OD、2(二)判斷題(對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”)1、(T)用戶定義類型中的元素可以是任何數(shù)據(jù)類型，如變長字符串型，整型等。2、(T)用X、Y、Z表示三角形的三條邊，條件“三角形任意兩邊之和大于或等于第三邊”的布爾表達(dá)式可以用:X+Y>ZAndY+Z>XAndX+Z>Y。3、(F)下述說法是否正確：局部變量的作用域可以超出所定義的過程。4、(F)表達(dá)式Int(-Sqr(3.6))的值是-1。5、(F)取模運(yùn)算符的優(yōu)先級別高于整除運(yùn)算符。6、(F)在VB6.0中，單精度數(shù)可表示最多8位有效數(shù)字的數(shù)。7、(F)算術(shù)運(yùn)算符中優(yōu)先級別第二高的是乘法和除法運(yùn)算符。8、(T)經(jīng)過說明的符號常量只是常數(shù)值的名稱，不能在程序代碼中修改它的值。9、(F)在VB6.0中，變量"Hello"與變量"HELLO"指的是不同的兩個(gè)變量名。10、(T)語句PrintFormat$(32548.5,"000,000.00")輸出結(jié)果是032,548.50。11、(F)表達(dá)式Int(Rnd*4+0.5)可能的全部值是1,2,3,4。12、(T)靜態(tài)變量是一種局部變量，當(dāng)原過程再次被執(zhí)行時(shí)，靜態(tài)變量的初值是上一次過程調(diào)用后的值。13、(T)Variant是一種特殊的數(shù)據(jù)類型，Variant類型變量可以存儲除了定長字符串?dāng)?shù)據(jù)及自定義類型外的所有系統(tǒng)定義類型的數(shù)據(jù)。Variant類型變量還可具有Empty、Error和Null等特殊值。14、(T)VB的Double類型數(shù)據(jù)可以精確表示其數(shù)值范圍內(nèi)的任何實(shí)數(shù)。15、(F)MsgBox語句沒有返回值。16、(T)函數(shù)InputBox的前3個(gè)參數(shù)分別是輸入對話框的提示信息、標(biāo)題以及默認(rèn)值。17、(F)函數(shù)MsgBox的前3個(gè)參數(shù)分別表示默認(rèn)按鈕、按鈕樣式以及圖標(biāo)樣式。18、(T)用DIM定義數(shù)值變量時(shí)，該數(shù)值變量自動賦初值為0。19、(F)一個(gè)表達(dá)式中若有多種運(yùn)算，在同一層括號內(nèi)，計(jì)算機(jī)按函數(shù)運(yùn)算一邏輯運(yùn)算一關(guān)系運(yùn)算一算術(shù)運(yùn)算的順序?qū)Ρ磉_(dá)式求值。20、(T)賦值語句的功能是計(jì)算表達(dá)式值并轉(zhuǎn)換為相同類型數(shù)據(jù)后為變量或控件屬性賦值。第四章(一)選擇題1、假定窗體上有一標(biāo)簽，名為Label1，為了使該標(biāo)簽透明并且沒有邊框，則正確的屬性設(shè)置為(B)A、Label1.BackStyle=0B、Label1.BackStyle=1C、Label1.BackStyle=TrueD、Label1.BackStyle=False2、比較圖片框(PictureBox)和圖像框(Image)的使用，正確的描述是(D)A、兩類控件都可以設(shè)置AutoSize屬性，以保證裝入的圖形可以自動改變大小B、兩類控件都可以設(shè)置Stretch屬性，使得圖形根據(jù)物件的實(shí)際大小進(jìn)行拉伸調(diào)整，保證顯示圖形的所有部分C、當(dāng)圖片框(PictureBox)的AutoSize自屬性為Flase時(shí)，只在裝入圖元文件(*.wmf)時(shí)，圖形才能自動調(diào)整大小以適應(yīng)圖片框的尺寸D、當(dāng)圖像框(Image)的Stretch屬性為True時(shí)，圖像框會自動改變大小以適應(yīng)圖形的大小，使圖形充滿圖像框3、若要求在文本框中輸入密碼時(shí)在文本框中顯示#號，應(yīng)在此文本框的屬性窗口中設(shè)置(C)A、Text屬性值為#B、Caption屬性值為#C、PasswordChar屬性值為#D、PasswordChar屬性值為真TOC\o"1-5"\h\z4、設(shè)置復(fù)選框或單選按鈕標(biāo)題對齊方式的屬性是(A)A、AlignB、AlignmentC、SortedD、value5、為了使標(biāo)簽中的內(nèi)容居中顯示，應(yīng)把Alignment屬性設(shè)置為(C)A、0B、1C、2D、36、假定窗體上有一個(gè)文本框，名為Txtl,為了使該文本框的內(nèi)容能夠換行，并且具有水平和垂直滾動條，正確的屬性設(shè)置為(A)A、Txtl.MultiLine=TrueTxtl.ScrollBars=3B、Txtl.MultiLine=TrueTxtl.ScrollBars=0C、Txtl.MultiLine=FalseTxtl.ScrollBars=3D、Txtl.MultiLine=FalseTxtl.ScrollBars=07、在窗體中添加一個(gè)列表框Listl、一個(gè)組合框Combol、一個(gè)文本框Textl和一個(gè)命令按鈕，編寫如下代碼：PrivateSubForm_Load()Listl.AddItem"ll"Listl.AddItem"22"Listl.AddItem"33"Combol.AddItem"44"Combol.AddItem"55"Combol.AddItem"66"Textl.Text=""EndSub程序運(yùn)行后，單擊命令按鈕，要在文本框中顯示“2255”。能滿足要求的命令按鈕的程序代碼是(B)A、PrivateSubCommandl_Click()Textl.Text=Listl.ListIndex(l)+Combol.ListIndex(l)EndSubB、PrivateSubCommandl_Click()Combol.ListIndex=lListl.ListIndex=lTextl.Text=Listl.Text+Combol.TextEndSubC、PrivateSubCommandl_Click()Textl.Text=Listl.ListIndex(2)+Combol.ListIndex(2)EndSubD、PrivateSubCommandl_Click()Combol.ListIndex=2Listl.ListIndex=2Textl.Text=Listl.Text+Combol.TextEndSub8、VB為命令按鈕提供的Cancel屬性(D)A、用來指定命令按鈕是否為窗體的“取消”按鈕

B、用來指定命令按鈕的功能是停止一個(gè)程序的運(yùn)行C、用來指定命令按鈕的功能是關(guān)閉一個(gè)運(yùn)行程序D、用來指定命令按鈕的功能是中斷一個(gè)程序的運(yùn)行9、在窗體上畫一個(gè)名稱為Listl的列表框，一個(gè)名稱為Labell的標(biāo)簽。列表框中顯示若干城市的名稱。當(dāng)單擊列表框中的某個(gè)城市名時(shí)，在標(biāo)簽中顯示選中城市的名稱。下列能正確實(shí)現(xiàn)上述功能的程序是(D)A、PrivateSubListl_Click()Labell.Caption=Listl.ListEndSubB、PrivateSubListl_Click()IndexLabell．Name=Listl．ListIndexEndSubC、PrivateSubListl_Click()Labell．Name=Listl.TextEndSubD、PrivateSubListl_Click()Labell．Caption=Listl.TextEndSub10、為了在按下ESC鍵時(shí)執(zhí)行某個(gè)命令按鈕的Click事件過程，需要把該命令按鈕的一個(gè)屬性設(shè)置為True,這個(gè)屬性是(C)A、valueB、DefaultC、CancelD、Enabled11、設(shè)組合框Combo1中有3個(gè)項(xiàng)目，則以下能刪除最后一項(xiàng)的語句是(C)A、A、Combo1.RemoveItemTextB、Combo1.RemoveItem2C、C、Combo1.RemoveItem3D、Combo1.RemoveItemCombo1.Listcount12、12、ComboBox組合框的類型由(A)屬性確定。A、A、StyleB、ItemDataC、IMEMode13、設(shè)定文本框內(nèi)的文字內(nèi)容是否允許修改的屬性是(B)D、DragModeA、TextBA、TextB、LockedC、PasswordCharD、Multiline14、在運(yùn)行階段，要在文本框Text1獲得焦點(diǎn)時(shí)選中文本框中所有內(nèi)容，對應(yīng)的事件過程是(A)A、PrivateSubText1_GotFocus()ext1.SelStart=0Text1.SelLength=Len(Text1.text)EndSubB、PrivateSubText1_LostFocus()Text1.SelStart=0Text1.SelLength=Len(Text1.text)EndSubC、PrivateSubText1_Change()Text1.SelStart=0Text1.SelLength=Len(Text1.text)EndSubD、PrivateSubText1_SetFocus()Text1.SelStart=0Text1.SelLength=Len（Text1.text）EndSub15、Cls方法可清除窗體或圖片框中的信息是（C）A、Picture屬性設(shè)置的背景圖案B、在設(shè)計(jì)時(shí)放置的控件C、程序運(yùn)行時(shí)產(chǎn)生的圖形和文字D、以上方法都對16、如果列表框（Listl）中沒有被選定的項(xiàng)目，則執(zhí)行Listl.RemoveltemListl.ListIndex語句的結(jié)果是（C）A、移去第一項(xiàng)B、移去最后一項(xiàng)C、移去最后加入列表一項(xiàng)D、以上都不對17、只有將組合框的Style屬性設(shè)置為（B）時(shí)，才能觸發(fā)DblClick事件？A、0B、lC、2D、318、為了在按下回車鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過程，需要把該命令按鈕的一個(gè)屬性設(shè)置為True，這個(gè)屬性是（A）。A、ValueB、DefaultC、CancelD、visible19、在窗體上畫一個(gè)列表框和一個(gè)文本框，然后編寫如下兩個(gè)事件過程：PrivateSubForm_Load（）List1.AddItem"357"List1.AddItem"246"List1.AddItem"123"Listl.AddItem"456"Text1.Text=""EndSubPrivateSubList1_DblClick（）a=List1.TextPrinta+Text1.TextEndSub程序運(yùn)行后，在文本框中輸入“789”，然后雙擊列表框中的"456"，則輸出結(jié)果為（C）。A、1245B、456789C、789456D、020、在窗體（名稱為Form1）上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕，然后編寫一個(gè)事件過程。程序運(yùn)行以后，如果在文本框中輸入一個(gè)字符，則把命令按鈕的標(biāo)題設(shè)置為“計(jì)算機(jī)等級考試”以下能實(shí)現(xiàn)上述操作的事件過程是：（A）A、PrivateSubText1_Change（）Command1.Caption=”計(jì)算機(jī)等級考試”EndSubB、PrivateSubCommand1_Click（）Caption=”計(jì)算機(jī)等級考試”EndSubC、PrivateSubForm1_Click（）Text1.Caption=”計(jì)算機(jī)等級考試”EndSubD、PrivateSubCommand1_Click（）Text1.Text=”計(jì)算機(jī)等級考試”EndSub（二）判斷題（對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”）

(T)下拉組合框和簡單組合框(Style=O/l)時(shí)，允許用戶輸入那些不在列表中的選項(xiàng)。2．(F)三種方式的組合框都允許用戶輸入那些不在列表中的選項(xiàng)。(F)垂直滾動條的最上端代表最大值(MAX)，最下端代表最小值(MIN)。(T)能夠?qū)⑽谋究蚩丶[藏起來的屬性是visible。(T)能夠改變復(fù)選框中背景顏色的屬性是BackColor。(T)Timer控件在程序運(yùn)行時(shí)是不可見的。(F)如果文本框的Enabled屬性設(shè)為False，文本框的文本將變成灰色，用戶能將光標(biāo)置于文本框上，但是不能改變文本框中的內(nèi)容。(F)為了使標(biāo)簽框的內(nèi)容靠右顯示，應(yīng)把Alignment屬性設(shè)置為0。(T)圖像框有一個(gè)屬性，可以自動調(diào)整圖形的大小，以適應(yīng)圖像框的尺寸，這個(gè)屬性是Strentch。(T)一種控件組合了文本框和列表框的特性，這種控件是組合框。(F)為了防止用戶隨意將光標(biāo)置于控件上，應(yīng)將該控件的TabIndex屬性設(shè)置為0。12.(T)Button控件可以接收Click事件，但不會接收DBclick事件。第五章(一)選擇題1、以下能夠正確計(jì)算n!的程序是(C)。B、PrivateSubCommand1_Click()

n=5;k=1;i=1

DoX=X*i

B、PrivateSubCommand1_Click()

n=5;k=1;i=1

DoX=X*i

i=i+1

LoopWhilei<n

Printx

EndSubD、PrivateSubn=5:x=1:i=1Dox=x*ix=x*ii=i+1LoopWhilei<nPrintxEndSubC、PrivateSubCommand1_C1ick()Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1LoopWhilei<=ni=i+1LoopWhilei<=nPrintxLoopWhilei>nPrintxEndSubEndSubEndSub2、在窗體上畫一個(gè)名稱為Command1的命令按鈕，一個(gè)名稱為Label1的標(biāo)簽，然后編寫如下事件過程：PrivateSubCommand1_Click()S=0Fori=1To15x=2*i-1IfxMod3=0ThenS=S+1NextiLabel1.Caption=SEndSub程序運(yùn)行后，單擊命令按鈕，則標(biāo)簽中顯示的內(nèi)容是（B）。A、1B、5C、27D、453、在窗體上畫一個(gè)Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click（）x=0n=InputBox（""）Fori=1TonForj=1Toix=x+1NextjNextiPrintxEndSub程序運(yùn)行后，單擊命令按鈕，如果輸入3，則在窗體上顯示的內(nèi)容是（D）。A、3B、4C、5D、64、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click（）DimaAsInteger,sAsIntegera=8s=1Dos=s+aa=a-1LoopWhilea<=0Prints;aEndSub程序運(yùn)行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是（C）。A、79B、340C、97D、死循環(huán)5、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click（）DimnumASIntegernum=1DoUntilnum>6Printnum；num=num+2.4LoopEndSub程序運(yùn)行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是（B）。A、13.45.8B、135C、147D、無數(shù)據(jù)輸出6、設(shè)有以下循環(huán)結(jié)構(gòu)Do循環(huán)體LoopWhilev條件〉則以下敘述中錯(cuò)誤的是（A）。A、若“條件”是一個(gè)為0的常數(shù)，則一次也不執(zhí)行循環(huán)體B、“條件”可以是關(guān)系表達(dá)式、邏輯表達(dá)式或常數(shù)C、循環(huán)體中可以使用ExitDo語句D、如果“條件”總是為True，則不停地執(zhí)行循環(huán)體7、設(shè)有如下程序：PrivateSubCommand1_Click()DimsumASDouble,XASDoublesum=0n=0Fori=1to5x=n/in=n+1sum=sum+xNextEndSub該程序通過For循環(huán)計(jì)算一個(gè)表達(dá)式的值，這個(gè)表達(dá)式是(C)。A、1+1/2+2/3+3/4+4/5B、1+1/2+2/3+3/4C、1/2+2/3+3/4+4/5D、1+1/2+1/3+1/4+1/58、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()Forn=1To20IfnMod3<>0Thenm=m+n\3NextnPrintnEndSub程序運(yùn)行后，如果單擊命令按鈕，則窗體上顯示的內(nèi)容是(C)。A、15B、18C、21D、249、在窗體上畫一個(gè)名稱為Command1的命令按鈕和兩個(gè)名稱分別為Text1、Text2的文本框，然后編寫如下事件過程：PrivateSubCommand1_Click()n=Text1.TextSelectCasenCase1To20x=10Case2,4,6x=20CaseIs<10x=30Case10x=40EndSelectText2.Text=XEndSub程序運(yùn)行后，如果在文本框Text1中輸入10，然后單擊命令按鈕，則在Text2中

顯示的內(nèi)容是(A)。A、10B、20C、30D、4010顯示的內(nèi)容是(A)。A、10B、20C、30D、4010、在窗體上畫一個(gè)名稱為Commandl的命令按鈕和一個(gè)名稱為Textl的文本框，然后編寫如下事件過程：PrivateSubCommand1_Click()n=Val(Text1.Text)Fori=2TonForj=2ToSqr(i)IfiModj=0ThenNextjIfj>Sqr(i)ThenPrintiNextiEndSub該事件過程的功能是(A、輸出n以內(nèi)的奇數(shù)C、輸出n以內(nèi)的素?cái)?shù)ExitFor）。B、輸出n以內(nèi)的偶數(shù)D、輸出n以內(nèi)被j整除的數(shù)11、在窗體上畫一個(gè)命令按鈕(其Name屬性為Commandl)，然后編寫如下代碼：OptionBase1PrivateSubCommandl_Click()Dimas=Oa=Array(l,2,3,4)i=lForj=4TolStep-ls=s+a(i)*ii=i*l0NextiPrintSEndSub運(yùn)行上面的程序，單擊命令按鈕B、l234以下Case語句中錯(cuò)誤的是（A、432112、A、Case0To10B、CaseIs>1013、設(shè)有如下程序段：x=2Fori=1To10Step2x=x+iNext運(yùn)行以上程序后，x的值是(A、26B、27其輸出結(jié)果是（C、34）。D、12C)。C、CaseIs>10AndIs<50D、Case3,5,Is>10BC、38）。D、5714、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程PrivateSubCommand1_Click（）StaticXASIntegerCls

Fori=1To2y=y+xx=x+2NextA、415、Printx,yEndSub程序運(yùn)行后，連續(xù)三次單擊Command1按鈕后B2A、415、Printx,yEndSub程序運(yùn)行后，連續(xù)三次單擊Command1按鈕后B2B、1218窗體上顯示的是）。C、12A、16、［多選題］下列程序段的執(zhí)行結(jié)果可以為（X=Int（Rnd+4+0.5）SelectCasexCase5Print"優(yōu)秀"Case4Print"良好"Case3Print"中"Case2Print"及格"CaseElsePrint"不及格"EndSelect中B、優(yōu)秀設(shè)有如下程序：C、不及格30BDD、良好D、4）。E、及格PrivateSubCommand1_Click（）DimcAsInteger,dAsIntegerc=4d=InputBox（"請輸入一個(gè)整數(shù)"）DoWhiled>0Ifd>cThenc=c+1EndIfd=InputBox（"請輸入一個(gè)整數(shù)"）LoopPrintc+dEndSub3、4、5、3、4、5、6、7、8、D、9）。B、119、）。B、11C、10AC、1017、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下程序OptionBase1PrivateSubCommand1_Click()DimcAsInteger,dAsIntegerd=0C=6x=array(2,4,6,8,10,12)Fori=1To6Ifx(i)>cThend=d+x(i)c=x(i)Elsed=d-cEndIfNextiPrintdEndSub程序運(yùn)行后，如果單擊命令按鈕，則在窗體上輸出的內(nèi)容為(C)。A、10B、16C、12D、2018、在窗體上畫一個(gè)命令按鈕和一個(gè)文本框，名稱分別為Commandl和Textl,然后編寫如下程序：PrivateSubCommand1_Click()a=InputBox("請輸入日期(1?31)")t="旅游景點(diǎn)："_&IIf(a>10Anda<=10,'長城","")_&IIf(a>10Andav=20,"故宮","")_&IIf(a>20Andav=31,"頤和園"，””)Text1.Text=tEndSub程序運(yùn)行后，如果從鍵盤上輸入16，則在文本框中顯示的內(nèi)容是(D)。A、旅游景點(diǎn)：長城故宮B、旅游景點(diǎn)：長城頤和園C、旅游景點(diǎn)：頤和園D、旅游景點(diǎn)：故宮19、下述程序段中，與其他3個(gè)程序段作用不同的是(A)。A、s=0i=0Whilei>100s=s+iWendB、s=0i=0Whilei<100i=i+1WendC、s=0i=1DoWhilei<100s=s+1LoopD、s=0i=0DoUntili>100s=s+1Loop20、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()c="ABCD"Forn=1To4PrintNextEndSub程序運(yùn)行后，單擊命令按鈕，要求在窗體上顯示如下內(nèi)容：DCDBCDABCD則在處應(yīng)填人的內(nèi)容為(B)A、Left(c,n)B、Right(c,n)C、Mid(c,n,1)D、Mid(c,n,n)(二)判斷題(對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”)1、(T)Ifx>yThenMax=xElseMax=y程序段是求兩個(gè)數(shù)中的最大數(shù)。2、(F)命令按鈕Command1的單擊事件代碼如下：PrivateSubCommand1_Click()DimIAsIntegerI=I+1EndSub單擊該按鈕3次,1的值為33、(T)VisualBasic具有三種基本的流程控制結(jié)構(gòu)：順序結(jié)構(gòu)、分支結(jié)構(gòu)和循環(huán)結(jié)構(gòu)。4、(F)閱讀下面的程序段：x=6y=3Ifx>yThent=xx=yy=xEndIf該程序的功能是：若x大于y的值，則交換x和y的值。5、(T)在for...next循環(huán)中，ExitFor子句是可選項(xiàng)，它可以放置在循環(huán)體語句中的任何位置。6、(T)End語句提供了一個(gè)強(qiáng)迫終止程序的運(yùn)行的方法，它可以放在任何事件過程中。7、(T)在VB編程語句中，利用GoTo語句可以構(gòu)成循環(huán)結(jié)構(gòu)。8、(F)在VB編程語句中，GoTo語句中使用的“標(biāo)號”是一個(gè)以分號結(jié)尾的標(biāo)識符。9、(F)在VB編程語句中，GoTo語句比較容易理解，在實(shí)際編程中大力提倡使用GoTo語句。

10、(T)在Do....Loop循環(huán)語句中，若要強(qiáng)制退出該循環(huán)，使用的退出語句是ExitDo.11、(T)在For-Next循環(huán)中，其中step步長可以是正數(shù),負(fù)數(shù)或者零。12、(F)if6>5thenx=5endif是一條合法語句。13、(F)在Do-Loop[WhileIUntil]循環(huán)中，While關(guān)鍵字或Until關(guān)鍵字必須選擇其中之一。14、(T)閱讀下面的程序段：s=0Fori=1To3Step0s=s+ii=i+1Ifi=3ThenExitForEndIfNextPrints該程序運(yùn)行結(jié)果，s的值是3。15、(T)下面程序運(yùn)行時(shí)ForM=1To3ForN=0ToM-1NextNNextM內(nèi)層循環(huán)的循環(huán)總次數(shù)是6次。16、(F)For/Next循環(huán)正常(未執(zhí)行ExitFor)結(jié)束后，控制變量的當(dāng)前值等于終值。17、(F)在循環(huán)體內(nèi)，循環(huán)變量的值不能被改變。18、(T)Do/LoopWhile結(jié)構(gòu)中的循環(huán)體，至少被執(zhí)行一次。19、(F)Do/LoopUntil結(jié)構(gòu)的循環(huán)，是“先判斷、后執(zhí)行(循環(huán)體)”的循環(huán)結(jié)構(gòu)。20、(T)使用OnErrorGoTo語句并編寫相應(yīng)程序，可以捕獲程序中的編譯錯(cuò)誤。第六章一)選擇題1、要分配存放如下方陣的數(shù)據(jù)：TOC\o"1-5"\h\z數(shù)組聲明語句能實(shí)現(xiàn)(不能浪費(fèi)空間)的是(A、Dima(9)AsSingleCA、Dima(9)AsSingleC、Dima(-1To1,-5To-3)AsSingle2、10.數(shù)組聲明語句：Dima(3,-2To2,5)則數(shù)組a包含的元素的個(gè)數(shù)為(A、120B、753、設(shè)有如下程序OptionBase1PrivateSubCommandl_Click()B、Dima(3,3)AsSingleD、Dima(-3To1,-5To7)AsIntegerC、60D、13Dima(10)AsIntegerDimnAsIntegern=InputBox(“輸入數(shù)據(jù)”)Ifn<10ThenCallGetArray(a,n)EndIfEndSubPrivateSubGetArray(b()AsInteger,nAsInteger)Dimc(10)AsIntegerj=0Fori=1TOnb(i)=CInt(Rnd()*100)Ifb(i)/2=b(i)\2ThenJ=j+1c(j)=_b(i)EndIfNextPrimjEndSub以下敘述中錯(cuò)誤的是(C)。A、數(shù)組b中的偶數(shù)被保存在數(shù)組c中B、程序運(yùn)行結(jié)束時(shí)，在窗體上顯示的是c數(shù)組中元素的個(gè)數(shù)C、GetArray過程的參數(shù)n是按值傳送的D、如果輸入的數(shù)據(jù)大于10,則窗體上不顯示任何信息4、在窗體上畫一個(gè)名稱為Commandl的命令按鈕，然后編寫如下事件過程：OptionBaselPrivateSubCommandlClick()Dimaa=Array(1，2，3，4，5)Fori=1ToUBound(A.a(i)=a(i)+I-lNextPrinta(3)EndSub．程序運(yùn)行后，單擊命令按鈕，則在窗體上顯示的內(nèi)容是(B)。A、4B、5C、6D、75、閱讀程序OptionBaselPrivateSubForm_Click()Dimarr，SumSum=0arr=Array(1，3，5，7，9，ll，13，15，17，19)Fori=1TolOIfarr(i)/3：art(i)\3ThenSum=Sum+arr(i)EndIf

NextiPrintSumEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為(C)。A、13B、14C、27D、156、在窗體上畫一個(gè)名稱為Commandl的命令按鈕，然后編寫如下程序：010tionBaselPrivateSubCommandlClick()DimaAsVarianta=Array(1，2，3，4，5)Sum=0Fori=lTo5Sum=Sum+a(i)Nextix=Sum／5Fori=1TO5Ifa(i)>xThenPrinta(i)；NextiEndSub程序運(yùn)行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是(D)。A、12B、123C、345D、457、以下程序Dima8、a=Array(1,2,3,4,5,6,7)Fori=Lbound(A.a(i)=a(i)*a(i)NextiPrinta(i)輸出結(jié)果是8、a=Array(1,2,3,4,5,6,7)Fori=Lbound(A.a(i)=a(i)*a(i)NextiPrinta(i)輸出結(jié)果是A、49ToUbound(A.D0C、不確定在窗體上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕，然后編寫B(tài)、D、程序出錯(cuò)如下事件過程：PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=1To3Forj=2To4array1(i,j)=i+jNextjNextiText1.Text=array1(2,3)+array1(3,4)EndSub程序運(yùn)行后，單擊命令按鈕，在文本框中顯示的值是(D)A、15B、14C、13D、12

9、在窗體上畫四個(gè)文本框，并用這四個(gè)文本框建立一個(gè)控件數(shù)組，名稱為Textl(下標(biāo)從0開始，自左至右順序增大)，然后編寫如下事件過程：PrivateSubCommandl_Click()ForEachTextBoxInTextlTextl(i)=Textl(i).Indexi=i+lNextEndSub程序運(yùn)行后，單擊命令按鈕，四個(gè)文本框中顯示的內(nèi)容分別為(A)D、出錯(cuò)信息A、0l23B、l234C、0D、出錯(cuò)信息10、有如下程序：OptionBaselPrivateSubForm_Click()Dimarr,SumSum=0arr=Array(1,3,5,7,9,11,13,15,17,19)Fori=1To10Ifarr(i)/3=arr(i)\3ThenSum=Sum+arr(i)EndIfNextiPrintSumEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為(CA、25B、26C、27D、2811、在窗體上畫一個(gè)命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()Dima(5)AsStringFori=1To5a(i)=Chr(Asc("A")+(i-1))NextiForEachbInaPrintb;NextEndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是(AA、ABCDEBA、ABCDEB、12345C、abcdeD、出錯(cuò)信息12、已知有數(shù)組聲明：Dima(-1To3,2To5)Asinteger如下引用數(shù)組中的元素，正確的是AA、a(-1,2)B、a(4)C、a[-1,2]D、a(0,6)13、下列有關(guān)控件數(shù)組與一般控件的區(qū)別的敘述中，最合理的是(B)A、控件數(shù)組一定由多個(gè)同類型的控件組成，一般控件只有一個(gè)控件；B、控件數(shù)組的Index為0,而一般控件的Index為空；C、控件數(shù)組的Index為1,而一般控件的Index為0；D、控件數(shù)組的建立通過Dim語句聲明，而一般控件不必聲明。14、對窗體編寫如下代碼：OptionBase1PrivateSubForm_KeyPress(KeyAsciiAsInteger)a=Array(237,126,87,48,498)m1=a(1)m2=1IfKeyAscii=13ThenForI=2To5Ifa(I)>m1Thenm1=a(I)m2=IEndIfNextIEndIfPrintm1Printm2EndSub程序運(yùn)行后，按回車鍵，輸出結(jié)果為(A)A、4985B、4984C、484D、23715、在窗體上畫一個(gè)名稱為Label1的標(biāo)簽，然后編寫如下事件過程：PrivateSubForm_Click()Dimarr(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=2To4Forj=2To4arr(i,j)=i*jNextjNextiLabel1.Caption=Str(arr(2,2)+arr(3,3))EndSub程序運(yùn)行后，單擊窗體，在標(biāo)簽中顯示的內(nèi)容是(B)。A、12B、13C、18D、1516、閱讀程序：OptionBase1Dimarr()AsIntegerPrivateSubForm_Click()DimiAsInteger,jAsIntegerReDimarr(3,2)Fori=1To3Forj=1To2arr(i,j)=i*2+jNextjNextiReDimPreservearr(3,4)

Forj=3To4arr(3,j)=j+9NextjPrintarr(3,2)+arr(3,4)EndSub程序運(yùn)行后，單擊窗體，輸入結(jié)果為(AA、21B、13C、817、在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下程序：OptionBase1PrivateSubCommand1_Click()DimcAsInteger,dAsIntegerd=0c=6x=Array(2,4,6,8,10,12)Fori=1To6Ifx(i)>cThend=d+x(i)c=x(i)Elsed=d-cEndIfNextPrintdEndSub程序運(yùn)行后，如果單擊命令按鈕，則在窗體上輸出的內(nèi)容為(CA、10B、16C、1218、假定建立了一個(gè)名為Commandl的命令按鈕數(shù)組，則以下說法中錯(cuò)誤的是A、數(shù)組中每個(gè)命令按鈕的名稱(Name屬性)均為CommandlB、數(shù)組中每個(gè)命令按鈕的標(biāo)題(Caption屬性)都一樣C、數(shù)組中所有命令按鈕可以使用同一個(gè)事件過程D、用名稱Commandl(下標(biāo))可以訪問數(shù)組中的每個(gè)命令按鈕19、在窗體上畫一個(gè)名稱為Labell的標(biāo)簽，然后編寫如下事件過程：PrivateSubForm_Click()Dimarr(10，10)AsIntegerDimIAsInteger,jAsIntegerFori=2TO4Forj=2To4arr(i,j)=I*jNextjNextiLabell．Caption=Str(arr(2，2)+arr(3，3))EndSub程序運(yùn)行后，單擊窗體，在標(biāo)簽中顯示的內(nèi)容是(B)。D、25)。D、20B)。)。A、12B)。D、25)。D、20B)。)。20、閱讀程序：OptionBaselDimarr()AsIntegerPrivateSubForm_Click()DimIAsInteger,jAsIntegerReDimarr(3，2)Fori=1TO3Forj=1To2arr(i，j)=I*2+jNextjNextiReDimPreservearr(3，4)Fori=3To4arr(3，j)=j+9NextjPrintarr(3，2)+arr(3，4)EndSub程序運(yùn)行后，單擊窗體，輸入結(jié)果為(A)。A、121B、13C、8D、25(二)判斷題(對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”)1、(F)在VisualBasic中，用Dim定義數(shù)組時(shí)數(shù)組元素也自動也自動賦初值為零2、(F)optionBase語句在模塊中使用，用來顯式說明數(shù)組上界。3、(T)動態(tài)數(shù)組是元素個(gè)數(shù)在運(yùn)行時(shí)可以改變的數(shù)組4、(T)數(shù)組的引用通常是指對數(shù)組元素的引用，其方法是在數(shù)組后面的括號中指定下標(biāo)5、(F)ReDim語句可以在模塊級中使用6、(T)使用ReDim語句會使原來數(shù)組中的值丟失，可以在ReDim語句后加Preserve參數(shù)來保留數(shù)組中的數(shù)據(jù)。7、(F)用Erase語句清除動態(tài)數(shù)組，數(shù)組依然存在內(nèi)存。8、(F)可以使用Lbound函數(shù)來測試數(shù)組的下界值。9、(T)數(shù)組必須先定義后使用。10、(F)控件數(shù)組共用一個(gè)控件名，但具有不同的屬性，它們的事件過程也不相同。第七章(一)選擇題1．SUB過程與Function過程最根本的區(qū)別在于(D)sub過程可以使用call語句或直接使用過程名調(diào)用，而Function過程不可以Function過程可以有參數(shù)，sub過程不可以兩種過程參數(shù)的傳遞方式不同sub過程的過程名不能返回值，而Function過程能通過過程名返回值2．在代碼中定義了一個(gè)子過程subp(a,b)endsub下面(C)調(diào)用該過程的格式是正確的A.callpB.callp12,30C.callp(10,20)D.p(10,20)

3．下列程序輸出結(jié)果為(B)PrivateSubCommand1_Click()a%=10b%=5Changea,bPrinta,bEndSubPrivateSubChange（ByValaAsInteger,bAsInteger）Tmp=aa=bb=tmpEndSubA.55B.1010C.105D.510過程調(diào)用時(shí)，下列關(guān)于形參與實(shí)參之間數(shù)據(jù)傳遞的原則說法正確的是（D）按實(shí)參和形參同名的原則按實(shí)參和形參位置對應(yīng)的原則按實(shí)參和形參個(gè)數(shù)相同并且類型也對應(yīng)的原則按實(shí)參和形不僅位置對應(yīng)，而且類型也對應(yīng)的原則過程調(diào)用時(shí)，下列說法不正確的是（D）數(shù)組、記錄類型、對象參數(shù)只能是地址傳遞形參是值傳遞，對應(yīng)實(shí)參可以是表達(dá)式、常量、數(shù)組元素形參是地址傳遞，對應(yīng)實(shí)參只能是簡單變量形參是地址傳遞，對應(yīng)實(shí)參只能是表達(dá)式下面關(guān)于可選參數(shù)過程的說法不正確的是（C）通過optionnal指定可選的參數(shù)，可選參數(shù)必須在參數(shù)表的最后，其類型必須是Variant,可選參數(shù)必須在參數(shù)表的最后，其類型可以設(shè)置為integer過程中通過IsMissing函數(shù)測試是否已向可選參數(shù)傳送了實(shí)參值。下面關(guān)于可變參數(shù)過程的說法不正確的是（B）可變參數(shù)過程定義的格式為：sub過程名｛ParamArray數(shù)組名｝數(shù)組名是一個(gè)形式參數(shù)，下界必須設(shè)為1可變參數(shù)過程中不能有可選參數(shù)數(shù)組名是一個(gè)形式參數(shù)，只有名字和括號，其類型必須是Variant。下面說法不正確的是（A）對象參數(shù)過程的實(shí)參和形參的控件必須擁有同樣的屬性對象參數(shù)過程的形參的類型可以是form或controlshell函數(shù)和其他函數(shù)一樣，只能作為語句中的表達(dá)式為了防止遞歸調(diào)用的“棧溢出”，要設(shè)法使每遞歸調(diào)用一次，其中的參數(shù)要向終止方向收斂，能夠在有限步內(nèi)達(dá)到終止條件。D)D)B.subproc(n)asintegerD.functionproc(byvaln)

B)三個(gè)數(shù)A.subproc(byvaln())functionproc(proc)運(yùn)行下面程序的結(jié)果是(PrivateSubForm_Click()

Dima%a=2Fori=1To3Printf(a)NextiEndSubPrivateFunctionf(a%)b=0Staticcb=b+1c=c+2f=a+b+cEndFunctionA.456B.579C.468D.47911．下面程序的運(yùn)行結(jié)果是（A）PrivateSubForm_Click（）Dimx,yAsIntegerx=5:y=10ncx,yPrint"x=";x;"y=";yEndSubPrivateSubnc（ByVala%,b%）a=a+bb=aa=a*bEndSubA.515B.1515C.22515D.51012．下列敘述中正確的是（C）A.在窗體的form_load事件中定義的變量是全局變量局部變量的作用域可以超過所定義的過程在某個(gè)sub過程中定義的局部變量可以與其他事件過程中定義的局部變量同名，但其作用域只限于該過程）B.通用過程有用戶創(chuàng)建D.）B.通用過程有用戶創(chuàng)建D.通用過程完成特定任務(wù)C）13.下列各項(xiàng)中，不是通用過程特點(diǎn)的是（C通用過程不與任何特定事件相聯(lián)系C.通用過程可以由鼠標(biāo)激發(fā)14.以下關(guān)于過程和過程參數(shù)的描述中，錯(cuò)誤的是（過程的參數(shù)可以是控件的名稱用數(shù)組作為過程的參數(shù)時(shí)，使用的是“傳地址方式”只有函數(shù)過程能夠?qū)⑦^程中處理的信息傳回到調(diào)用的程序中D.sub過程可以無參數(shù)傳遞15.下列關(guān)于sub過程的敘述正確的是（B）A.一個(gè)sub過程必須有一個(gè)exitsub語句B.一個(gè)sub過程必須有一個(gè)endsub語句

C.在sub過程中可以定義一個(gè)function過程D.可以用goto語句強(qiáng)制退出sub過程16.以下敘述錯(cuò)誤的是（B）A.用shell函數(shù)可以調(diào)用能夠在windows下運(yùn)行的應(yīng)用程序用shell函數(shù)可以調(diào)用可執(zhí)行文件，也可以調(diào)用VB的內(nèi)部函數(shù)調(diào)用hell函數(shù)的格式應(yīng)為：〈變量名〉=shell（…）用shell函數(shù)不可以執(zhí)行DOS命令使用過程編寫程序是為了（A）使程序模塊化C.便于系統(tǒng)的編譯VB的過程有3種，它們是（C事件過程、子過程和函數(shù)過程C.屬性過程、子過程和函數(shù)過程下列程序的運(yùn)行結(jié)果是（C）PrivateSubForm_Click()Dima(1To4)AsIntegera(1)=5:a(2)=6:a(3)=7:a(4)=8pa()Fori=1To4PrintFormat(a(i),"#");NextiPrintEndSubPrivateSubp(b()AsInteger)Fori=1To4Step2b(i)=2*iNextiEndSubA.5678B.出錯(cuò)下列帶有兩重過程的運(yùn)行結(jié)果是(PrivateSubForm_Click()B.提高程序的運(yùn)行速度D.B.提高程序的運(yùn)行速度D.使程序易于閱讀）B.事件過程、屬性過程和函數(shù)過程D.通用過程、子過程和函數(shù)過程C.2668D.10121418B)a=2:b=3:c=4Printp2(c,b,a)EndSubPrivateFunctionp2(xAsInteger,yAsInteger,zAsInteger)p2=p1(z,y,x)+xEndFunctionPrivateFunctionp1(xAsInteger,yAsInteger,zAsInteger)p1=2*x+y+3*zEndFunctionA.21B.23C.17D.34(二)判斷題(對的在括號內(nèi)打“廠，錯(cuò)的在括號內(nèi)打“X”)(F)在通用過程中，要定義某參數(shù)是可變參數(shù)，在形參前要加的關(guān)鍵字是Optional

(F)每個(gè)過程可以有多個(gè)模塊(F)在同一過程中，數(shù)組與簡單變量允許同名(T)過程的定義不可以嵌套，但過程的調(diào)用可以嵌套(F)局部變量的作用域可以超出所定義的過程(F)公有變量聲明的位置只能在標(biāo)準(zhǔn)模塊的聲明部分(T)Function過程不能作為單獨(dú)的語句加以調(diào)用。(F)調(diào)用其他模塊中的過程時(shí)，被調(diào)用過程不必一定要是“共用的”(public限定或默認(rèn))過程(T)可變參數(shù)過程中不能有可選參數(shù)。(T)直線也可以作為參數(shù)傳遞到子過程。第八章(一)選擇題菜單編輯器設(shè)計(jì)的菜單控件在程序設(shè)計(jì)中的引用對象是(D)。A.菜單索引B.菜單標(biāo)題C.菜單快捷鍵D.菜單名稱為菜單項(xiàng)中某字母添加熱鍵的方法是(B)。在該字母前加“-”B.在該字母前加“&”C.在該字母前加“@”D.在該字母前加“#”在菜單編輯器中定義了一個(gè)名為op的菜單，在運(yùn)行時(shí)隱藏該菜單項(xiàng)，使用語句(D)A.op.visible=trueB.op.visible=falseC.op.enabled=trueD.op.enabled=falseTOC\o"1-5"\h\z下列不能打開菜單編輯器的操作是(A)?！安藛尉庉嬈鳌卑粹oCtrl+E“工具”菜單中的“菜單編輯器”命令)。使用菜單編輯器設(shè)計(jì)的菜單時(shí)，必須輸入的項(xiàng)是(C)。A.索引B.標(biāo)題下列有關(guān)子菜單的不正確說法是(A.索引B.標(biāo)題下列有關(guān)子菜單的不正確說法是(A.子菜單可以是分隔符C.菜單項(xiàng)的默認(rèn)索引號為1下列敘述不正確說法是(DC)。菜單項(xiàng)只響應(yīng)click事件每個(gè)菜單項(xiàng)都是一個(gè)單獨(dú)的對象)。A.下拉式菜單和彈出式菜單都用編輯器建立在多窗體程序中，每個(gè)窗體都可以建立自己的菜單系統(tǒng)除分隔線外，所有菜單項(xiàng)都能接收Click事件D.如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False，則該菜單項(xiàng)不可見。設(shè)置菜單中有一個(gè)菜單項(xiàng)為“Open”。若要為該菜單命令設(shè)置訪問鍵即按下Alt及字母O時(shí)，能夠執(zhí)行Open命令，則在菜單編輯器中設(shè)置Open命令的方式是(A)A.把Caption屬性設(shè)置為&OpenB.把Name屬性設(shè)置為O&penC.把Name屬性設(shè)置為&OpenD.把Caption屬性設(shè)置為O&pen下列有關(guān)菜單的不正確說法是(B)。在程序運(yùn)行過程中可以增加或減少菜單項(xiàng)如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False,則可刪除該菜單項(xiàng)彈出式菜單在菜單編輯器中設(shè)計(jì)利用控件數(shù)組可以實(shí)現(xiàn)菜單項(xiàng)的增加或減少下列敘述中錯(cuò)誤的是(C)。A.在程序運(yùn)行時(shí)，通用對話框控件是不可見的

B.在同一個(gè)程序中，用不同的方法(如ShowOpen或ShowSave等)打開的通用對話框具不同的作用C.調(diào)用通用對話框控件的ShowOpen方法，可以直接打開在該通用對話框中指定的文件D.調(diào)用通用對話框控件的ShowColor方法，可以打開顏色對話框在用通用對話框控件建立“打開”文件對話框或“保存”文件對話框時(shí)，如果需要指定文件列表框所列出的文件類型是文本文件，則正確的描述格式是(A)。A.“text(.text)l(*.text)”B.“文本文件(.txt)丨(.txt)”C.“text(.text)||(*.text)”D.“text(.text)(*.text)”設(shè)置菜單中有一個(gè)菜單項(xiàng)為“Open”。若要為該菜單命令設(shè)置訪問鍵即按下Alt及字母O時(shí)，能夠執(zhí)行Open命令，則在菜單編輯器中設(shè)置Open命令的方式是(A)。A.把A.把Caption屬性設(shè)置為&OpenC.把Name屬性設(shè)置為&Open在對象窗口中，彈出菜單只需(A.按下鼠標(biāo)右鍵B.雙擊鼠標(biāo)左鍵窗體設(shè)計(jì)器的作用是(A)。A.建立用戶界面C.顯示文字下列不是菜單名稱的正確解釋的是(A.顯示在菜單項(xiàng)上的字符串C.引用菜單屬性的對象(二)判斷題(對的在括號內(nèi)打“V”，錯(cuò)把Caption屬性設(shè)置為O&penD.把Caption屬性設(shè)置為O&penD)，就會彈出來。單擊鼠標(biāo)左鍵D.單擊鼠標(biāo)右鍵存放文本、聲音、圖片等文件編寫源程序代碼A)。設(shè)置菜單屬性的對象D.菜單項(xiàng)的"變量名"〕在括號內(nèi)打“X”)1、(T)通用對話框可以用來制作和顯示幫助對話框。2、(F)對話框的邊框不是固定的。3、(F)任何時(shí)候都可以使用“工具”菜單中的“菜單編輯器”命令打開菜單編輯器。4、(T)通用對話框是一種ActivX控件。5、(T)菜單項(xiàng)的增減可以通過控件數(shù)組來實(shí)現(xiàn)。6、(F)Open對話框不僅用來選擇一個(gè)文件，還可以打開、顯示文件。7、(T)要退出對話框，一定要單擊其中的某個(gè)按鈕，不能通過單擊對話框外部的某個(gè)地方來退出。8、(F)文件對話框的FileTitle屬性用于設(shè)置所選文件的路徑和文件名。9、(F)菜單編輯器設(shè)計(jì)的下拉菜單深度不能超過2層。10、(T)菜單控件沒有任何方法，只有一個(gè)單擊事件；每個(gè)菜單項(xiàng)都是一個(gè)單獨(dú)的對象第九章一)選擇題1.在窗體中添加一個(gè)文本框，然后編寫如下代碼：PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimcharAsStringchar=Chr(KeyAscii)KeyAscii=Asc(UCase(char))Text1.Text=String(3,KeyAscii)EndSub程序運(yùn)行后，如果在鍵盤上輸入字母“a”，則文本框中顯示的內(nèi)容為(D)A、aB、AC、aaaaD、AAAA2.在窗體中添加兩個(gè)文本框，其名稱為別為Te