Visual-Basic選擇題(專(zhuān)業(yè)基礎(chǔ)知識(shí))題庫(kù)

§2專(zhuān)業(yè)基礎(chǔ)知識(shí)§2.1Visualbasic程序開(kāi)發(fā)環(huán)境1.以下關(guān)于VB的敘述中，錯(cuò)誤的是BA)VB采用事件驅(qū)動(dòng)的編程機(jī)制B)如果程序中有Sub_Main過(guò)程時(shí)，則一定從該過(guò)程開(kāi)始執(zhí)行C)工程文件中包含多個(gè)窗體時(shí)，可以指定啟動(dòng)窗體D)VB程序既可以編譯執(zhí)行，也可以解釋執(zhí)行2.在VisualBasic中，不能關(guān)閉的窗口是BA)窗體設(shè)計(jì)器窗口B)工程窗口C)屬性窗口D)立即窗口3.VisualBasic集成環(huán)境由若干窗口組成，其中不能隱藏(關(guān)閉)的窗口是(A)。A)主窗口B)屬性窗口C)立即窗口D)窗體窗口4.為了用鍵盤(pán)打開(kāi)菜單和執(zhí)行菜單命令，第一步應(yīng)按的鍵是(A)。A)功能鍵F10或AltB)Shift＋功能鍵F4C)Ctrl或功能鍵F8D)Ctrl＋Alt5.下面操作中，不能正確保存正在編輯的工程的是CA)鼠標(biāo)右鍵單擊"工程資源管理器窗口"中該工程的圖標(biāo)，在彈出的菜單中選"保存工程"B)單擊"文件"菜單，在下拉菜單中選"保存工程"C)單擊"工程"菜單，在下拉菜單中選"保存工程"D)6.在VisualBasic標(biāo)準(zhǔn)工具欄中，"菜單編輯器"的圖標(biāo)是CA)B)C)D)7.以下不能作為容器使用的控件是AA)圖像框B)框架C)圖片框D)窗體8.以下關(guān)于VB文件的敘述中，錯(cuò)誤的是(B)。A)標(biāo)準(zhǔn)模塊文件不屬于任何一個(gè)窗體B)C)一個(gè)工程只有一個(gè)工程文件D)一個(gè)工程可以有多個(gè)窗體文件9.VB中有這樣一類(lèi)文件：該文件不屬于任何一個(gè)窗體，而且僅包含程序代碼，這類(lèi)文件的擴(kuò)展名是(B)。A).vbpB).basC).vbwD).frm10.類(lèi)模塊文件的擴(kuò)展名為BA).resB).clsC).vbpD).vbg11.以下敘述中正確的是(C)。A)在屬性窗口只能設(shè)置窗體的屬性B)在屬性窗口只能設(shè)置控件的屬性C)在屬性窗口可以設(shè)置窗體和控件的屬性D)在屬性窗口可以設(shè)置任何對(duì)象的屬性12.如果在VisualBasic集成環(huán)境中沒(méi)有打開(kāi)屬性窗口，下列可以打開(kāi)屬性窗口的操作是(D)。A)用鼠標(biāo)雙擊窗體的任何部位B)執(zhí)行"工程"菜單中的"屬性窗口"命令C)按Ctrl＋F4鍵D)按F4鍵13.在編輯VB應(yīng)用程序時(shí)，如果不小心關(guān)閉了屬性窗口，則可以單擊主窗口標(biāo)準(zhǔn)工具欄上的一個(gè)按鈕直接打開(kāi)屬性窗口，這個(gè)按鈕的圖標(biāo)是DA)B)C)D)14.下列打開(kāi)"代碼窗口"的操作中錯(cuò)誤的是(A)。A)按F4鍵B)單擊"工程資源管理器"窗口中的"查看代碼"按鈕C)雙擊已建立好的控件D)執(zhí)行"視圖"菜單中的"代碼窗口"命令15.如果要在窗體上畫(huà)一個(gè)標(biāo)簽，應(yīng)在工具箱窗口中選擇的圖標(biāo)是(B)。A)B)C)D)16.為了在窗體上畫(huà)一個(gè)文件列表框，應(yīng)先在工具箱窗口中選中的圖標(biāo)是CA)B)C)D)§2.2對(duì)象及其操作1.下面不屬于對(duì)象基本特點(diǎn)的是BA)標(biāo)識(shí)唯一性B)可復(fù)用性C)多態(tài)性D)封裝性2.以下關(guān)于VB對(duì)象屬性的敘述中，錯(cuò)誤的是BA)屬性是對(duì)象的特征B)對(duì)象的所有屬性值都可以在屬性窗口中設(shè)置C)不同對(duì)象可以具有同名的屬性D)對(duì)象的某些屬性可以在程序中設(shè)置3.以下操作中，不能改變窗體大小的是CA)設(shè)計(jì)階段，在"屬性"窗口設(shè)置相應(yīng)屬性B)運(yùn)行階段，用賦值語(yǔ)句修改相應(yīng)屬性C)運(yùn)行階段，調(diào)用窗體的Show方法D)運(yùn)行階段，調(diào)用窗體的Move方法4.以下關(guān)于事件、事件驅(qū)動(dòng)的敘述中，錯(cuò)誤的是(C)。A)事件是可以由窗體或控件識(shí)別的操作B)事件可以由用戶(hù)的動(dòng)作觸發(fā)C)一個(gè)操作動(dòng)作只能觸發(fā)一個(gè)事件D)事件可以由系統(tǒng)的某個(gè)狀態(tài)的變化而觸發(fā)5.在面向?qū)ο蟮某绦蛟O(shè)計(jì)中，可被對(duì)象識(shí)別的動(dòng)作稱(chēng)為(B)。A)方法B)事件C)過(guò)程D)函數(shù)6.以下關(guān)于VB特點(diǎn)的敘述中，錯(cuò)誤的是(C)。A)VB中一個(gè)對(duì)象可有多個(gè)事件過(guò)程B)VB應(yīng)用程序能以編譯方式運(yùn)行C)VB應(yīng)用程序從Form_Load事件過(guò)程開(kāi)始執(zhí)行D)在VB應(yīng)用程序中往往通過(guò)引發(fā)某個(gè)事件導(dǎo)致對(duì)對(duì)象的操作7.以下關(guān)于VB的敘述中，錯(cuò)誤的是(D)。A)VB采用事件驅(qū)動(dòng)方式運(yùn)行B)VB既能以解釋方式運(yùn)行，也能以編譯方式運(yùn)行C)VB程序代碼中，過(guò)程的書(shū)寫(xiě)順序與執(zhí)行順序無(wú)關(guān)D)VB中一個(gè)對(duì)象對(duì)應(yīng)一個(gè)事件8.以下關(guān)于方法的敘述中，錯(cuò)誤的是AA)在調(diào)用方法時(shí)，對(duì)象名稱(chēng)是必不可缺少的B)方法是一種特殊的過(guò)程或函數(shù)C)不同對(duì)象的方法可以同名D)方法可以帶有參數(shù)9.以下敘述中錯(cuò)誤的是(C)。A)VisualBasic是事件驅(qū)動(dòng)型可視化編程工具B)VisualBasic應(yīng)用程序不具有明顯的開(kāi)始和結(jié)束語(yǔ)句C)VisualBasic工具箱中的所有控件都具有寬度(Width)和高度(Height)屬性D)VisualBasic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置10.設(shè)工程文件中包名稱(chēng)分別為Form1、Form2的兩個(gè)窗體，且Form1的菜單屬性設(shè)置如下：窗體Form1中的程序如下：DimFlagAsBooleanPrivateSubForm_Load()Flag＝TrueEndSubPrivateSubmnu1_Click(indexAsInteger)IfIndex＝1ThenIfFlag＝TrueThenmnu1(1).Caption＝"隱藏窗體2"Flag＝FalseElsemnu1(1).Caption＝"顯示窗體2"Flag＝TrueEndIfEndIfIfIndex＝2ThenEndEndSub關(guān)于上述程序，以下敘述中錯(cuò)誤的是(D)。A)Index屬性的值可以用來(lái)區(qū)分控件數(shù)組元素B)Index為1的菜單項(xiàng)的標(biāo)題可能會(huì)改變C)兩個(gè)名稱(chēng)均為Mnu1的菜單項(xiàng)構(gòu)成一個(gè)控件數(shù)組D)11.設(shè)窗體、框架、圖片框（PictureBox）、圖像框（Image）的名稱(chēng)分別是Form1、Frame1、Picture1、Image1，有下面4條語(yǔ)句：①Form1.Print"VB"②Frame1.Print"VB"③Picture1.Print"VB"④Image1.Print"VB"其中正確的是CA)①和②B)②和③C)①和③D)③和④12.在設(shè)計(jì)窗體時(shí)雙擊窗體的任何地方，可以打開(kāi)的窗口是(A)。A)代碼窗口B)屬性窗口C)工程資源管理器窗口D)工具箱窗口13.為了使窗體的大小可以改變，必須把它的BorderStyle屬性設(shè)置為(B)。A)1B)2C)3D)414.為了使窗體左上角不顯示控制框，需設(shè)置為False的屬性是(C)。A)VisibleB)EnabledC)ControlBoxD)Caption15.假定已在窗體上畫(huà)了多個(gè)控件，其中有一個(gè)被選中，為了在屬性窗口中設(shè)置窗體的屬性，預(yù)先應(yīng)執(zhí)行的操作是(A)。A)單擊窗體上沒(méi)有控件的地方B)單擊任意一個(gè)控件C)雙擊任意一個(gè)控件D)單擊屬性窗口的標(biāo)題欄16.設(shè)窗體名稱(chēng)為frmTest，為了在程序代碼中將窗體的標(biāo)題改為"等級(jí)考試"，其代碼應(yīng)該是AA)frmTest.Caption="等級(jí)考試"B)Form1.Caption="等級(jí)考試"C)frmTest.Title="等級(jí)考試"D)Form1.Title="等級(jí)考試"17.為了在運(yùn)行時(shí)能顯示窗體左上角的控制框（即系統(tǒng)菜單），應(yīng)執(zhí)行的操作是BA)把窗體的ControlBox屬性設(shè)置為False，其他屬性任意B)把窗體的ControlBox屬性設(shè)置為T(mén)rue，并且把BorderStyle屬性設(shè)置為1到5中的一個(gè)數(shù)C)把窗體的ControlBox屬性設(shè)置為T(mén)rue，并且把BorderStyle屬性設(shè)置為0D)把窗體的ControlBox屬性設(shè)置為Fale，并且把BorderStyle屬性設(shè)置為1到5中的一個(gè)數(shù)18.為了通過(guò)屬性窗口設(shè)置窗體的ControlBox屬性值，下列正確的操作是DA)直接鍵入True或FalseB)利用彈出的對(duì)話(huà)框設(shè)置屬性值C)選擇ControlBox，然后按回車(chē)鍵D)雙擊ControlBox屬性條19.以下關(guān)于窗體的敘述中，錯(cuò)誤的是AA)執(zhí)行UnloadForm1語(yǔ)句后，窗體Form1被隱藏，但仍在內(nèi)存中B)當(dāng)窗體的Enabled屬性為False時(shí)，窗體不響應(yīng)鼠標(biāo)、鍵盤(pán)的操作C)當(dāng)窗體的KeyPreview屬性為T(mén)rue時(shí)，則窗體能優(yōu)先響應(yīng)鍵盤(pán)事件D)窗體的Load事件在加載窗體時(shí)觸發(fā)20.對(duì)于窗體而言，在運(yùn)行期間對(duì)其值改變無(wú)效的屬性是DA)CaptionB)EnabledC)AutoRedrawD)BorderStyle21.下列描述中錯(cuò)誤的是DA)窗體是對(duì)象B)窗體必須有Name屬性C)窗體可以拖放和移動(dòng)D)在設(shè)計(jì)階段雙擊一個(gè)控件可以打開(kāi)屬性窗口22.窗體上有三個(gè)水平滾動(dòng)條，名稱(chēng)分別為HSRed、HSGreen和HSBlue，取值范圍均是0～255，代表顏色的三種基色。改變滾動(dòng)框的位置，可以改變?nèi)N基色的值，從而改變窗體的背景色，如下圖所示。程序代碼如下：Dimcolor(3)AsIntegerPrivateSubForm_Load()Callfill(color())EndSubPrivateSubfill(c()AsInteger)Form1.BackColor＝RGB(c(1)，c(2)，c(3))EndSubPrivateSubHSRed_Change()Callfill(color())EndSubPrivateSubHSGreen_Change()Callfill(color())EndSubPrivateSubHSBlue_Change()Callfill(color())EndSub關(guān)于以上程序，如下敘述中錯(cuò)誤的是(C)。A)color是窗體級(jí)整型數(shù)組B)改變?nèi)魏我粋€(gè)滾動(dòng)條滾動(dòng)框的位置，窗體的背景色將立刻隨之改變C)3個(gè)滾動(dòng)條Change事件過(guò)程中只設(shè)置了一個(gè)color數(shù)組元素的值，調(diào)用fill過(guò)程失敗D)fill函數(shù)定義中的形式參數(shù)是數(shù)組型參數(shù)23.在程序運(yùn)行時(shí)，下面的敘述中正確的是(C)。A)用鼠標(biāo)右鍵單擊窗體中無(wú)控件的部分，會(huì)執(zhí)行窗體的Form_Load事件過(guò)程B)用鼠標(biāo)左鍵單擊窗體的標(biāo)題欄，會(huì)執(zhí)行窗體的Form_Click事件過(guò)程C)只裝入而不顯示窗體，也會(huì)執(zhí)行窗體的Form_Load事件過(guò)程D)裝入窗體后，每次顯示該窗體時(shí)，都會(huì)執(zhí)行窗體的Form_Click事件過(guò)程24.設(shè)窗體的名稱(chēng)為Form1，標(biāo)題為Win，則窗體的MouseDown事件過(guò)程的過(guò)程名是(C)。A)Form1_MouseDownB)Win_MouseDownC)Form_MouseDownD)MouseDown_Form125.以下關(guān)于窗體的敘述中，錯(cuò)誤的是(B)。A)Hide方法能隱藏窗體，但窗體仍在內(nèi)存中B)使用Show方法顯示窗體時(shí)，一定觸發(fā)Load事件C)移動(dòng)或放大窗體時(shí)，會(huì)觸發(fā)Paint事件D)雙擊窗體時(shí)，會(huì)觸發(fā)DblClick事件26.若要把一個(gè)窗體從內(nèi)存中刪除，應(yīng)該使用的方法是AA)UnLoadB)HideC)LoadD)Show27.在程序運(yùn)行時(shí)，不會(huì)引發(fā)窗體Resize事件的操作是CA)使用了窗體的"還原"按鈕B)使用Move方法改變了窗體的大小C)使用Move方法改變了窗體的位置D)通過(guò)鼠標(biāo)拖動(dòng)邊框調(diào)整了窗體的大小28.下面不響應(yīng)鍵盤(pán)事件的對(duì)象是DA)窗體B)按鈕C)復(fù)選框D)標(biāo)簽29.編寫(xiě)如下程序：PrivateSubForm_Click()Print"Welcome！"EndSubPrivateSubForm_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Print"歡迎！"EndSubPrivateSubForm_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Print"熱烈歡迎！"EndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為(A)。A)歡迎！熱烈歡迎！Welcome!B)歡迎！Welcome！熱烈歡迎！C)Welcome！歡迎！熱烈歡迎！D)Welcome！熱烈歡迎！歡迎！30.下列敘述中，錯(cuò)誤的是AA)控件數(shù)組元素的下標(biāo)不能重復(fù)，且必須是連續(xù)的B)控件數(shù)組中所有元素的類(lèi)型必須是相同的C)窗體的Load事件發(fā)生在所有因用戶(hù)操作而引發(fā)的事件之前D)一個(gè)窗體中，只能有一個(gè)命令按鈕的Cancel屬性被設(shè)置為T(mén)rue31.在VisualBasic中，所有標(biāo)準(zhǔn)控件都具有的屬性是(B)。A)CaptionB)NameC)TextD)Value32.為了把ActiveX控件加到工具箱中，首先應(yīng)采取的操作是AA)執(zhí)行"工程"菜單中的"部件"命令B)執(zhí)行"視圖"菜單中的"工具箱"命令C)執(zhí)行"工具"菜單中的"選項(xiàng)"命令D)執(zhí)行"工程"菜單中的"引用"命令33.能夠用于標(biāo)識(shí)對(duì)象名稱(chēng)的屬性是(A)。A)NameB)CaptionC)ValueD)Text34.假定窗體上有一個(gè)名稱(chēng)為txtMac的文本框，則執(zhí)行語(yǔ)句txtMac="MyText"后的結(jié)果為BA)把字符串"MyText"存入變量txtMac中B)在文本框txtMac中顯示字符串"MyText"C)把文本框txtMac的Name屬性設(shè)置為MyTextD)把文本框txtMac的Value屬性設(shè)置為MyText35.VisualBasic為每種控件規(guī)定了一個(gè)默認(rèn)屬性，在設(shè)置默認(rèn)屬性時(shí)，不必給出屬性名。下列控件中默認(rèn)屬性為T(mén)ext的控件是BA)框架（Frame）B)組合框（ComboBox）C)標(biāo)簽（Label）D)形狀（Shape）36.編寫(xiě)如下程序：PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerDimarr()AsIntegern=InputBox("請(qǐng)輸入數(shù)值：")ReDimarr(n)Fori=1ToUBound(arr)arr(i)=iNextFori=1ToUBound(arr)\2temp=arr(i)arr(i)=arr(n-i+1)arr(n-i+1)=tempNextFori=1ToUBound(arr)Printarr(i);NextEndSub程序運(yùn)行后，單擊命令按鈕Command1，并在輸入對(duì)話(huà)框中輸入7，輸出結(jié)果為AA)7654321B)1234567C)3214765D)432156737.編寫(xiě)如下程序：PrivateSubCommand1_Click()DimaAsInteger,iAsIntegera=2Fori=1To3Printfun_s(a);NextiEndSubFunctionfun_s(aAsInteger)AsIntegerDimbAsIntegerStaticcAsIntegera=a+1b=b+1c=c+1fun_s=a+b+cEndFunction程序運(yùn)行后，單擊命令按鈕Command1，輸出結(jié)果為CA)456B)567C)579D)46838.默認(rèn)屬性是某種控件最常用或最重要的屬性，在VisualBasic中設(shè)置這樣的屬性時(shí)，不必給出屬性名。下列中默認(rèn)屬性不是Value的控件是DA)垂直滾動(dòng)條（VscrollBar）B)復(fù)選框（CheckBox）C)命令按鈕（CommandButton）D)列表框（ListBox）39.窗體上有一個(gè)名稱(chēng)為Combo1的組合框，引用Combo1中最后一個(gè)列表項(xiàng)應(yīng)使用的表達(dá)式是AA)Combo1.List(Combo1.ListCount-1)B)Combo1.List(ListCount)C)Combo1.List(ListCount-1)D)Combo1.List(Combo1.ListCount)40.在窗體上添加"控件"的正確的操作方式是(C)。A)先單擊工具箱中的控件圖標(biāo)，再單擊窗體上適當(dāng)位置B)先單擊工具箱中的控件圖標(biāo)，再雙擊窗體上適當(dāng)位置C)直接雙擊工具箱中的控件圖標(biāo)，該控件將出現(xiàn)在窗體上D)直接將工具箱中的控件圖標(biāo)拖動(dòng)到窗體上適當(dāng)位置41.為了對(duì)多個(gè)控件執(zhí)行操作，必須選中這些控件。下列不能選中多個(gè)控件的操作是(A)。A)按住Alt鍵，不要松開(kāi)，然后單擊每個(gè)要選中的控件B)按住Shift鍵，不要松開(kāi)，然后單擊每個(gè)要選中的控件C)按住Ctrl鍵，不要松開(kāi)，然后單擊每個(gè)要選中的控件D)拖動(dòng)鼠標(biāo)畫(huà)出一個(gè)虛線(xiàn)矩形，使所選中的控件位于這個(gè)矩形內(nèi)42.以下敘述中錯(cuò)誤的是(D)。A)在通用過(guò)程中，多個(gè)形式參數(shù)之間可以用逗號(hào)作為分隔符B)在Print方法中，多個(gè)輸出項(xiàng)之間可以用逗號(hào)作為分隔符C)在Dim語(yǔ)句中，所定義的多個(gè)變量可以用逗號(hào)作為分隔符D)當(dāng)一行中有多個(gè)語(yǔ)句時(shí)，可以用逗號(hào)作為分隔符43.以下敘述中錯(cuò)誤的是(C)。A)續(xù)行符與它前面的字符之間至少要有一個(gè)空格B)VisualBasic中使用的續(xù)行符為下劃線(xiàn)(_)C)以撇號(hào)(′)開(kāi)頭的注釋語(yǔ)句可以放在續(xù)行符的后面D)VisualBasic可以自動(dòng)對(duì)輸入的內(nèi)容進(jìn)行語(yǔ)法檢查44.下列有語(yǔ)法錯(cuò)誤的賦值語(yǔ)句是(D)。A)y＝7＝9B)s＝m＋nC)Text1.Text＝10D)m＋n＝1245.設(shè)程序中分別將a、b、c、d定義為布爾型、整型、字符串型、日期型變量，下列賦值語(yǔ)句錯(cuò)誤的是AA)a=#True#B)C)c=5&10D)d=#2013/01/01#46.以下敘述中錯(cuò)誤的是AA)事件過(guò)程可以像通用過(guò)程一樣由用戶(hù)指定過(guò)程名B)在Sub過(guò)程中可以調(diào)用其它過(guò)程C)在Sub過(guò)程中不能定義其它過(guò)程D)如果過(guò)程被定義為Static類(lèi)型，則該過(guò)程中的局部變量都是Static類(lèi)型47.輸入VisualBasic源程序時(shí)，若一個(gè)命令行中包含兩個(gè)語(yǔ)句，則兩個(gè)語(yǔ)句之間的分隔符應(yīng)使用AA)冒號(hào)（:）B)分號(hào)（;）C)下劃線(xiàn)（_）D)連字符（-）48.VisualBasic源程序的續(xù)行符為CA)冒號(hào)（:）B)分號(hào)（;）C)下劃線(xiàn)（_）D)連字符（-）49.下列打開(kāi)"代碼窗口"的操作中錯(cuò)誤的是(A)。A)按F4鍵B)單擊"工程資源管理器"窗口中的"查看代碼"按鈕C)雙擊已建立好的控件D)執(zhí)行"視圖"菜單中的"代碼窗口"命令50.設(shè)計(jì)窗體時(shí)，雙擊窗體上沒(méi)有控件的地方，打開(kāi)的窗口是(A)。A)代碼窗口B)屬性窗口C)工具箱窗口D)工程窗口51.以下敘述中，錯(cuò)誤的是BA)標(biāo)準(zhǔn)模塊不屬于任何一個(gè)窗體D)一個(gè)應(yīng)用程序可以有多個(gè)窗體52.在VB集成環(huán)境中要結(jié)束一個(gè)正在運(yùn)行的工程，可單擊工具欄上的一個(gè)按鈕，這個(gè)按鈕是(D)。A)B)C)D)53.在VisualBasic環(huán)境下設(shè)計(jì)應(yīng)用程序時(shí)，系統(tǒng)能自動(dòng)檢查出的錯(cuò)誤是(A)。A)語(yǔ)法錯(cuò)誤B)邏輯錯(cuò)誤C)邏輯錯(cuò)誤和語(yǔ)法錯(cuò)誤D)運(yùn)行錯(cuò)誤54.下面關(guān)于VB應(yīng)用程序的敘述中正確的是CA)VB應(yīng)用程序只能解釋運(yùn)行B)VB應(yīng)用程序只能編譯運(yùn)行C)VB應(yīng)用程序既能解釋運(yùn)行，也能編譯運(yùn)行D)VB應(yīng)用程序必須先編譯，然后解釋運(yùn)行55.以下關(guān)于VB的敘述中，錯(cuò)誤的是AA)VB的窗體模塊只包含由控件組成的窗體B)在VB集成開(kāi)發(fā)環(huán)境中，既可以運(yùn)行程序，也可以調(diào)試程序C)VB采用事件驅(qū)動(dòng)的編程機(jī)制D)56.以下關(guān)于VB的敘述中，錯(cuò)誤的是BA)VB采用事件驅(qū)動(dòng)的編程機(jī)制B)如果程序中有Sub_Main過(guò)程時(shí)，則一定從該過(guò)程開(kāi)始執(zhí)行C)工程文件中包含多個(gè)窗體時(shí)，可以指定啟動(dòng)窗體D)VB程序既可以編譯執(zhí)行，也可以解釋執(zhí)行57.能夠被窗體或控件所識(shí)別的操作稱(chēng)為AA)事件B)方法C)過(guò)程D)屬性§2.3程序設(shè)計(jì)基礎(chǔ)1.下面為單精度實(shí)型（即單精度浮點(diǎn)型）變量的是CA)x$B)x&C)x!D)x#2.為了建立隨機(jī)文件，要求文件的每條記錄應(yīng)包含多個(gè)不同數(shù)據(jù)類(lèi)型的數(shù)據(jù)項(xiàng)，則記錄應(yīng)使用的數(shù)據(jù)類(lèi)型是AA)記錄類(lèi)型B)字符串類(lèi)型C)字符串?dāng)?shù)組D)變體類(lèi)型3.長(zhǎng)整型常數(shù)的類(lèi)型說(shuō)明符為CA)%B)#C)&D)@4.雙精度浮點(diǎn)數(shù)的類(lèi)型說(shuō)明符為BA)%B)#C)&D)@5.VB變量x!的數(shù)據(jù)類(lèi)型是AA)單精度類(lèi)型B)字符串類(lèi)型C)整型D)雙精度類(lèi)型6.如果在程序中直接使用了沒(méi)有聲明的變量，則它的數(shù)據(jù)類(lèi)型是DA)字符串型B)整型C)邏輯型D)變體型7.若在窗體模塊的聲明部分聲明了如下自定義類(lèi)型和數(shù)組：PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec則下面的輸出語(yǔ)句中正確的是(C)。A)Printarr.Code(2)，arr.Caption(2)B)C)Printarr(2).Code，arr(2).CaptionD)PrintCode(2)，Caption(2)8.以下自定義數(shù)據(jù)類(lèi)型的語(yǔ)句中，正確的是(B)。A)TypestudentIDAsString*20nameAsString*10ageAsIntegerEndstudentB)TypestudentIDAsString*20nameAsString*10ageAsIntegerEndTypeC)TypestudentIDAsStringnameAsStringageAsIntegerEndstudentD)TypeIDAsString*20nameAsString*10ageAsIntegerEndTypestudent9.設(shè)有以下定義語(yǔ)句：PrivateTypepointxAsIntegeryAsIntegerEndTypeDimaAspoint下面語(yǔ)句中正確的是BA)a=12B)a.x=12C)point=12D)point.x=1210.以下能正確定義數(shù)據(jù)類(lèi)型TelBook的代碼是AA)TypeTelBookNameAsString*10TelNumAsIntegerEndTypeB)TypeTelBookNameAsString*10TelNumAsIntegerEndTelBookC)TypeTelBookNameString*10TelNumIntegerEndTypeTelBookD)TypedefTelBookNameString*10TelNumIntegerEndType11.某人在窗體模塊中定義了如下自定義類(lèi)型：TypeRecnumAsIntegernameAsStringEndType但發(fā)現(xiàn)程序不能運(yùn)行，關(guān)于這一問(wèn)題，下面敘述中正確的是DA)自定義類(lèi)型不能寫(xiě)在窗體模塊中B)自定義類(lèi)型只能寫(xiě)在標(biāo)準(zhǔn)模塊中C)在TypeRec前面添加關(guān)鍵字Public就可解決問(wèn)題D)在TypeRec前面添加關(guān)鍵字Private就可解決問(wèn)題12.設(shè)有下面的類(lèi)型和變量定義，PrivateTypeRecnameAsStringscore(5)AsIntegerEndTypeDimstudentAsRec則下面正確的語(yǔ)句是BA)student="張三"B)student.score(2)=75C)student(3).score=69D)score(4)=7713.窗體上有一個(gè)名稱(chēng)為T(mén)ext1的文本框，一個(gè)名稱(chēng)為Command1的命令按鈕。窗體文件的程序如下：PrivateTypexaAsIntegerbAsIntegerEndTypePrivateSubCommand1_Click()DimyAsxy.a＝InputBox("")Ify.a\2＝y(tǒng).a/2ThenElsey.b＝Fix(y.a/2)EndIfEndSub對(duì)以上程序，下列敘述中錯(cuò)誤的是(D)。A)x是用戶(hù)定義的類(lèi)型B)InputBox函數(shù)彈出的對(duì)話(huà)框中沒(méi)有提示信息C)D)Fix(y.a/2)把y.a/2的小數(shù)部分四舍五入，轉(zhuǎn)換為整數(shù)返回14.下列符號(hào)常量的聲明中不合法的是CB)ConstaAsDouble=5+8C)ConstaAsInteger="25"D)Consta="OK"15.窗體上有一個(gè)名稱(chēng)為Picture1的圖片框控件，一個(gè)名稱(chēng)為L(zhǎng)abel1的標(biāo)簽控件，如圖所示。現(xiàn)有如下程序：PublicSubdisplay(xAsControl)IfTypeOfxIsLabelThenxCaption＝"計(jì)算機(jī)等級(jí)考試"ElsexPicture＝LoadPicture("pic.jpg")EndIfEndSubPrivateSubLabel1_Click()Calldisplay(Label1)EndSubPrivateSubPicture1_Click()Calldisplay(Picture1)EndSub對(duì)以上程序，下列敘述中錯(cuò)誤的是(A)。A)程序運(yùn)行時(shí)會(huì)出錯(cuò)B)單擊圖片框，在圖片框中顯示一幅圖片C)過(guò)程中的x是控件變量D)單擊標(biāo)簽，在標(biāo)簽中顯示一串文字16.以下變量名中合法的是(C)。A)x2－1B)printC)str_nD)2x17.以下選項(xiàng)中，不合法的VisualBasic的變量名是(B)。A)a5bB)_xyzC)a_bD)andif18.以下變量名中合法的是(C)。A)x－2B)12abcC)sum_totalD)print19.以下合法的VB變量名是(D)。A)#_1B)123_aC)stringD)x_12320.以下合法的VB變量名是(D)。A)_xB)2yC)a#bD)x_1_x21.下列合法的變量名是(B)。A)sum－aB)num_9C)print$D)5avg22.以下合法的VB變量名是BA)_aB)yPrintC)a-bD)Type23.以下不合法的VB變量名是CA)filenameB)readC)_yD)e524.下面變量定義中錯(cuò)誤的是AA)PublicmodAsIntegerB)StaticbufC)DimchAsString*10D)Dima!(-5To-1)25.下列說(shuō)法中，錯(cuò)誤的是BA)變量名長(zhǎng)度不能超過(guò)255個(gè)字符B)變量名的第一個(gè)字符可以是字母或數(shù)字C)變量名只能由字母、數(shù)字和下劃線(xiàn)組成D)變量名不能使用保留字26.下列說(shuō)法中，錯(cuò)誤的是AA)變量名長(zhǎng)度不能超過(guò)127個(gè)字符B)變量名的第一個(gè)字符必須是字母C)變量名不能使用保留字D)變量名只能由字母、數(shù)字和下劃線(xiàn)組成27.以下可作為VisualBasic合法變量名的是BA)A3#1B)BasicC)TabD)D%328.以下合法的VB變量名是AA)x_yB)PrintC)_bD)m-n29.以下合法的VB變量名是AA)x_B)3xC)varnameD)print30.為把圓周率的近似值3.14159存放在變量pi中，應(yīng)該把變量pi定義為(C)。A)DimpiAsIntegerB)Dimpi(7)AsIntegerC)DimpiAsSingleD)DimpiAsLong31.下面程序運(yùn)行時(shí)，若輸入395，則輸出結(jié)果是(B)。PrivateSubCommand1_Click()Dimx%x＝InputBox("請(qǐng)輸入一個(gè)3位整數(shù)")PrintxMod10，x\100，(xMod100)\10EndSubA)395B)539C)593D)35932.設(shè)窗體文件中有下面的事件過(guò)程：PrivateSubCommand1_Click()Dimsa%＝100PrintaEndSub其中變量a和s的數(shù)據(jù)類(lèi)型分別是(C)。A)整型，整型B)變體型，變體型C)整型，變體型D)變體型，整型33.執(zhí)行語(yǔ)句DimX，YAsInteger后(D)。A)X和Y均被定義為整型變量B)X和Y均被定義為變體類(lèi)型變量C)X被定義為整型變量，Y被定義為變體類(lèi)型變量D)X被定義為變體類(lèi)型變量，Y被定義為整型變量34.某人編寫(xiě)了向隨機(jī)文件中寫(xiě)一條記錄的程序，代碼如下：TypeRTypeNameAsString*10TelAsString*20EndTypePrivateSubCommand1_Click()DimpAsRTypep.Name＝InputBox("姓名")p.Tel＝InputBox("電話(huà)號(hào)")Open"Books.dat"ForRandomAs#1Put#1，，pClose#1EndSub該程序運(yùn)行時(shí)有錯(cuò)誤，修改的方法是()。A)在類(lèi)型定義"TypeRType"之前加上"Private"B)DimpAsRType必須置于窗體模塊的聲明部分C)應(yīng)把Open語(yǔ)句中的ForRandom改為ForOutput(36)有如下程序：PrivateSubForm_Click()DimsAsInteger，pAsIntegerp＝1Fori＝1To4Forj＝1Tois＝s＋jNextjp＝p*sNextiPrintpEndSub程序運(yùn)行后，單擊窗體，則輸出結(jié)果是(A)。A)在類(lèi)型定義"TypeRType"之前加上"Private"B)DimpAsRType必須置于窗體模塊的聲明部分C)應(yīng)把Open語(yǔ)句中的ForRandom改為ForOutputD)35.有如下數(shù)據(jù)定義語(yǔ)句：DimX，YAsInteger以上語(yǔ)句表明(C)。A)X、Y均是整型變量B)X是整型變量，Y是變體類(lèi)型變量C)X是變體類(lèi)型變量，Y是整型變量D)X是整型變量，Y是字符型變量36.為了聲明一個(gè)長(zhǎng)度為128個(gè)字符的定長(zhǎng)字符串變量StrD，以下語(yǔ)句中正確的是(D)。A)DimStrDAsStringB)DimStrDAsString(128)C)DimStrDAsString[128]D)DimStrDAsString*12837.有如下數(shù)據(jù)定義語(yǔ)句：Dima,bAsIntegerDimx%,yasInteger執(zhí)行上述語(yǔ)句后，不是整型變量的是AA)aB)bC)xD)y38.語(yǔ)句x=x+1的正確含義是CA)變量x的值等于表達(dá)式x+1的值B)將變量x的值存放到變量x+1中C)將變量x的值加1后賦予變量xD)將變量"x+1"的值存放到變量x中39.有如下程序代碼：PrivateSubForm_Click()DimaAsIntegera=2Sum=0Fori=1To3Sum=Sum+f(a)NextiPrintSumEndSubFunctionf(mAsInteger)AsIntegerStaticbAsIntegerb=b+1f=m*bEndFunction運(yùn)行程序，單擊窗體后，窗體上顯示的是AA)12B)3C)6D)940.編寫(xiě)如下程序：PrivateSubCommand1_Click()StaticxAsIntegerIfxThenx=x+10Elsex=x+1PrintxEndSub程序運(yùn)行后，第三次單擊命令按鈕Command1時(shí)，輸出的結(jié)果為DA)1B)3C)10D)2141.對(duì)于語(yǔ)句DimVar1,Var2AsString*10，下列說(shuō)法中正確的是DA)Var1和Var2都被定義為定長(zhǎng)字符串變量B)Var1被定義為變長(zhǎng)字符串變量，Var2被定義為定長(zhǎng)字符串變量C)Var1被定義為定長(zhǎng)字符串變量，Var2被定義為變長(zhǎng)字符串變量D)Var1被定義為變體變量42.對(duì)于語(yǔ)句DimVar1#,Var2AsInteger，下列說(shuō)法中正確的是BA)Var1#和Var2都被定義為整型變量B)Var1被定義為雙精度型變量，Var2被定義為整型變量C)Var1被定義為長(zhǎng)整型變量，Var2被定義為整型變量D)Var1#被定義為變體變量，Var2被定義為整型變量43.編寫(xiě)如下程序：PrivateSubCommand1_Click()Dima%,b%,c%a=8:b=3Doc=a-bPrintc;a=b:b=cLoopUntilAbs(c)>10EndSub程序運(yùn)行后，單擊命令按鈕Command1，輸出結(jié)果是CA)5B)5-27-9C)5-27-916D)一直輸出，是死循環(huán)44.編寫(xiě)如下程序：PrivateSubCommand1_Click()DimkAsIntegerx=1Fork=1To3x=x*fun(k)NextkPrintxEndSubFunctionfun(xAsInteger)AsIntegerStaticaa=a+1fun=a*xEndFunction程序運(yùn)行后，單擊命令按鈕Command1，輸出結(jié)果為BA)6B)36C)3D)3045.設(shè)有以下程序代碼：PrivateSubCommand1_Click()StaticaAsIntegerprocaPrintaEndSubSubproc(xAsInteger)x=x+1EndSub運(yùn)行程序，3次單擊命令按鈕，第3次單擊后顯示的是CA)0B)1C)3D)446.窗體上有一個(gè)Text1文本框和一個(gè)Command1命令按鈕。程序的功能是在文本框中輸入密碼后單擊命令按鈕則進(jìn)行密碼確認(rèn)，若密碼正確，彈出信息框顯示"密碼正確"，若密碼錯(cuò)誤，彈出信息框顯示"密碼錯(cuò)誤，請(qǐng)重新輸入"，但最多允許輸出3次，若還不正確，則彈出信息框顯示"密碼錯(cuò)誤，不能再輸入"，且命令按鈕變?yōu)闊o(wú)效。某人編寫(xiě)了如下程序：PrivateSubCommand1_Click()DimnumAsIntegernum=num+1IfText1.Text="123456"ThenMsgBox"密碼正確"ElseIfnum=3ThenCommand1.Enabled=FalseMsgBox"密碼錯(cuò)誤，不能再輸入"ElseMsgBox"密碼錯(cuò)誤，請(qǐng)重新輸入"EndIfEndSub調(diào)試時(shí)發(fā)現(xiàn)有錯(cuò)誤需要修改，下面正確的修改方案是CA)把ElseIfnum=3Then改為ElseIfnum>3ThenB)把Command1.Enabled=False改為Command1.Enabled=TrueC)把DimnumAsInteger改為StaticnumAsIntegerD)把num=num+1改為num=num+347.有如下通用過(guò)程：SubSa(aAsInteger,bAsInteger)b=at=a/bb=tModbEndSub在窗體上畫(huà)一個(gè)Command1命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=5y=4Sax,yPrintx;yEndSub運(yùn)行程序，單擊命令按鈕，輸出結(jié)果是DA)11B)54C)14D)5148.有如下程序代碼：FunctionSum(nAsInteger)StatickAsIntegerk=k+n+1Sum=kEndFunctionPrivateSubForm_Click()DimiAsIntegerDimsAsIntegerFori=1To3s=s+Sum(i)NextiPrintsEndSub運(yùn)行程序，單擊窗體，輸出結(jié)果為DA)6B)9C)12D)1649.設(shè)有如下程序：OptionBase1Dima(3，4)AsInteger，b(4，3)AsIntegerPrivateSubCommand1_Click()'循環(huán)1Fori＝1To3Forj＝1To4b(j，i)＝a(i，j)NextjNexti'循環(huán)2x＝b(1，1)Fori＝1To4Forj＝1To3Printb(i，j)；Ifx<b(i，j)Thenx＝b(i，j)NextjPrintNextiEndSub程序中的數(shù)組a已被賦值。以下關(guān)于上述程序的敘述中，正確的是(B)。A)窗體模塊中，不能使用Dim聲明a、b數(shù)組B)"循環(huán)1"可以正常運(yùn)行C)"循環(huán)2"中循環(huán)變量i、j的終值不對(duì)，所以不能正常運(yùn)行D)程序可以正常運(yùn)行，x中保存的是數(shù)組b中所有元素中最小的數(shù)50.有如下語(yǔ)句序列：Dima，bAsIntegerPrintaPrintb執(zhí)行以上語(yǔ)句序列，下列敘述中錯(cuò)誤的是(A)。A)輸出的a值是0B)輸出的b值是0C)a是變體類(lèi)型變量D)b是整型變量51.下列關(guān)于數(shù)組的敘述中，正確的是AA)數(shù)組名的命名規(guī)則與簡(jiǎn)單變量相同B)VisualBasic支持?jǐn)?shù)組的隱式定義C)使用Static語(yǔ)句定義任何類(lèi)型的數(shù)組時(shí)，都把該數(shù)組的全部元素初始化為0D)使用Dim語(yǔ)句定義任何類(lèi)型的數(shù)組時(shí)，都將把數(shù)組的全部元素初始化為空字符串52.下面程序片段中有錯(cuò)誤CSubpric()PublicxAsIntegerx=Array(1,2,3,4,5)……EndSub為了避免出錯(cuò)，正確的修改方案是A)把PublicxAsInteger改為PublicxAsVariantB)把PublicxAsInteger改為Dimx(5)C)把PublicxAsInteger改為Staticx53.下面程序的功能是：從鍵盤(pán)輸入若干個(gè)自然數(shù)，輸入-1則結(jié)束輸入，然后計(jì)算平均值輸出（因事先不知道執(zhí)行時(shí)會(huì)輸入多少個(gè)數(shù)，定義一個(gè)動(dòng)態(tài)數(shù)組存放這些數(shù)）。PrivateSubCommand1_Click()Dima()AsIntegern=0Dox=InputBox("請(qǐng)輸入一個(gè)自然數(shù)，輸入-1結(jié)束")Ifx<>-1Thenn=n+1___________a(n)=xEndIfLoopUntilx=-1Fork=1Tons=s+a(k)NextPrints/nEndSub以上程序不完整，應(yīng)在橫線(xiàn)處填寫(xiě)的是BA)ReDima(n)B)ReDimPreservea(n)C)ReDimaD)ReDima()§2.4常用標(biāo)準(zhǔn)控件1.如果改變驅(qū)動(dòng)器列表框的Drive屬性，則將觸發(fā)的事件是(A)。A)ChangeB)ScrollC)KeyDownD)KeyUp2.任何控件都具有的屬性為DA)CaptionB)ForeColorC)FontNameD)Name3.在窗體上畫(huà)一個(gè)文本框(名稱(chēng)為T(mén)ext1)和一個(gè)標(biāo)簽(名稱(chēng)為L(zhǎng)abel1)，程序運(yùn)行后，在文本框中每輸入一個(gè)字符，都會(huì)立即在標(biāo)簽中顯示文本框中字符的個(gè)數(shù)。以下可以實(shí)現(xiàn)上述操作的事件過(guò)程是(A)。A)PrivateSubText1_Change()Label1.Caption＝Str(Len(Text1.Text))EndSubB)PrivateSubText1_Click()Label1.Caption＝Str(Len(Text1.Text))EndSubC)PrivateSubText1_Change()EndSubD)PrivateSubLabel1_Change()Label1.Caption＝Str(Len(Text1.Text))EndSub4.設(shè)窗體上有一個(gè)標(biāo)簽Label1和一個(gè)計(jì)時(shí)器Timer1，Timer1的Interval屬性被設(shè)置為1000，Enabled屬性被設(shè)置為T(mén)rue。要求程序運(yùn)行時(shí)每秒在標(biāo)簽中顯示一次系統(tǒng)當(dāng)前時(shí)間。以下可以實(shí)現(xiàn)上述要求的事件過(guò)程是(B)。A)PrivateSubTimer1_Timer()Label1.Caption＝TrueEndSubB)PrivateSubTimer1_Timer()Label1.Caption＝Time$EndSubC)PrivateSubTimer1_Timer()Label1.Interval＝1EndSubD)PrivateSubTimer1_Timer()Label1.Caption＝TimerNextkEndSub5.為了使標(biāo)簽控件在顯示其內(nèi)容時(shí)不覆蓋其背景內(nèi)容，需進(jìn)行設(shè)置的屬性為(D)。A)BackColorB)BorderStyleC)ForeColorD)BackStyle6.VisualBasic控件一般都規(guī)定一個(gè)默認(rèn)屬性，在引用這樣的屬性時(shí)，只寫(xiě)對(duì)象名而不必給出屬性名。默認(rèn)屬性為Caption的控件是(B)。A)列表框(ListBox)B)標(biāo)簽(Label)C)文本框(TextBox)D)組合框(ComboBox)7.為了使標(biāo)簽Label1透明且不具有邊框，以下正確的屬性設(shè)置是BA)Label1.BackStyle=0Label1.BorderStyle=1B)Label1.BackStyle=0Label1.BorderStyle=0C)Label1.BackStyle=1Label1.BorderStyle=1D)Label1.BackStyle=1Label1.BorderStyle=08.決定標(biāo)簽內(nèi)容顯示位置的屬性是CA)TextB)NameC)AlignmentD)Caption9.設(shè)Label1、Command1、Text1、Check1分別為標(biāo)簽、命令按鈕、文本框、復(fù)選框的名稱(chēng)，則以下屬性設(shè)置語(yǔ)句中，運(yùn)行時(shí)不會(huì)出錯(cuò)的是A)Label1.BackStyle=2B)Command1.Style=1C)Text1.ScrollBars=4D)Check1.Value=2參考答案：D10.下列不包含滾動(dòng)條的控件是A)列表框B)標(biāo)簽C)組合框D)文本框參考答案：B11.要使標(biāo)簽中的文本靠右顯示，應(yīng)將其Aligment屬性設(shè)置為A)0-LeftJustifyB)1-RightJustifyC)2-CenterD)3參考答案：B12.下列有關(guān)控件的敘述中，正確的是A)命令按鈕不響應(yīng)DblClick事件B)標(biāo)簽的主要作用是顯示文本信息，它不響應(yīng)Click事件C)標(biāo)簽中的文本信息通過(guò)Text屬性顯示D)在設(shè)計(jì)階段，圖片框中建立的控件可以拖拽到圖片框之外參考答案：A13.窗體上有1個(gè)名稱(chēng)為T(mén)ext1的文本框，1個(gè)名稱(chēng)為L(zhǎng)abel1的標(biāo)簽。程序運(yùn)行后，如果在文本框中輸入信息，則立即在標(biāo)簽中顯示相同的內(nèi)容。以下可以實(shí)現(xiàn)上述操作的事件過(guò)程為()。A)PrivateSubLabel1_Click()EndSubB)PrivateSubLabel1_Change()EndSubC)PrivateSubText1_Click()EndSubD)PrivateSubText1_Change()EndSub參考答案：D14.以下控件中，能夠作為容器使用的是A)圖片框B)形狀控件C)圖像框D)標(biāo)簽參考答案：A15.在窗體上畫(huà)1個(gè)名稱(chēng)為Command1的命令按鈕，1個(gè)名稱(chēng)為L(zhǎng)abel1的標(biāo)簽，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDimsAsIntegerFori=1To5Forj=1Tois=s+jNextjNextiLabel1.Caption=sEndSub程序運(yùn)行后，單擊命令按鈕Command1，則標(biāo)簽中顯示的內(nèi)容是A)15B)20C)35D)55參考答案：C16.下面不響應(yīng)鍵盤(pán)事件的對(duì)象是A)窗體B)按鈕C)復(fù)選框D)標(biāo)簽參考答案：D17.在窗體上畫(huà)Text1、Text2兩個(gè)文本框，并編寫(xiě)如下程序：PrivateSubForm_Load()Text2.PasswordChar="$"EndSubPrivateSubText1_Change()EndSub運(yùn)行程序，在Text1文本框中輸入"ABCDEFG"，則產(chǎn)生的結(jié)果是A)在Text2中同步顯示與Text1同樣內(nèi)容B)在Text2中同步顯示"abcdefg"C)在Text2中同步顯示與Text1中字符數(shù)量相同的"$"D)在Text1中顯示"$"，而在Text2中不顯示任何內(nèi)容參考答案：C18.窗體上有1個(gè)名稱(chēng)為T(mén)ext1的文本框和1個(gè)名稱(chēng)為L(zhǎng)abel1的標(biāo)簽。運(yùn)行以下程序，在文本框中輸入VisualBasic，則標(biāo)簽中顯示內(nèi)容為basic的是A)PrivateSubText1_Change()Label1.Caption=LCase(Mid(Text1.Text,7))EndSubB)PrivateSubText1_Change()Label1.Caption=UCase(Left(Text1.Text,5))EndSubC)PrivateSubText1_Change()Label1.Caption=UCase(Right(Text1.Text,5))EndSubD)PrivateSubText1_Change()Label1.Caption=LCase(Left(Text1.Text,5))EndSub參考答案：A19.如果把文本框的Enabled屬性設(shè)置為False并運(yùn)行程序，則以下敘述中正確的是A)文本框中的文本變?yōu)榛疑?，且不能將光?biāo)置于文本框上B)文本框中的文本變?yōu)榛疑?，可以將光?biāo)置于文本框上，但不能改變文本框中的內(nèi)容C)文本框中的文本變?yōu)榛疑梢愿淖兾谋究蛑械膬?nèi)容D)文本框中的文本正常顯示，可以將光標(biāo)置于文本框上，但不能改變文本框中的內(nèi)容參考答案：A20.窗體上有2個(gè)名稱(chēng)分別為T(mén)ext1和Text2的文本框。編寫(xiě)如下程序：PrivateSubForm_Load()Text1.Text=""Text2.Text=""EndSubPrivateSubCommand1_Click()EndSub程序運(yùn)行后，在Text1和Text2中依次輸入100和200，并單擊命令按鈕Command1，則輸出結(jié)果為A)100B)200C)300D)100200參考答案：D21.窗體上有一個(gè)由兩個(gè)文本框組成的控件數(shù)組，名稱(chēng)為T(mén)ext1，并有如下事件過(guò)程：PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0Text1(1).FontSize＝Text1(0).FontSize*2Text1(1).Text＝Text1(0).TextCase1Text1(0).FontSize＝Text1(1).FontSize/2Text1(0).Text＝Text1(1).TextCaseElseMsgBox"執(zhí)行Else分支"EndSelectEndSub關(guān)于上述程序，以下敘述中錯(cuò)誤的是()。A)Index用于標(biāo)識(shí)數(shù)組元素B)本程序中CaseElse分支的語(yǔ)句永遠(yuǎn)不會(huì)被執(zhí)行C)向任何一個(gè)文本框輸入字符，都會(huì)在另一個(gè)文本框中顯示該字符D)下標(biāo)為0的文本框中顯示的字符尺寸將越來(lái)越小參考答案：D22.在窗體上畫(huà)一個(gè)文本框，其名稱(chēng)為T(mén)ext1，為了在程序運(yùn)行后隱藏該文本框，應(yīng)使用的語(yǔ)句為()。A)B)Text1.Visible＝FalseC)D)Text1.Enabled＝False參考答案：B23.為了使文本框同時(shí)具有垂直和水平滾動(dòng)條，應(yīng)先把MultiLine屬性設(shè)置為T(mén)rue，然后再把ScrollBars屬性設(shè)置為()。A)0B)1C)2D)3參考答案：D24.在窗體上畫(huà)一個(gè)名稱(chēng)為Combo1的組合框，名稱(chēng)為T(mén)ext1的文本框，以及名稱(chēng)為Command1的命令按鈕，如圖所示。運(yùn)行程序，單擊命令按鈕，將文本框中被選中的文本添加到組合框中，若文本框中沒(méi)有選中的文本，則將文本框中的文本全部添加到組合框中。命令按鈕的事件過(guò)程如下：PrivateSubCommand1_Click()IfText1.Se1Length<>0ThenElseCombo1.AddItemText1EndIfEndSub程序中橫線(xiàn)處應(yīng)該填寫(xiě)的是()。A)B)C)D)參考答案：C25.為了使文本框只具有垂直滾動(dòng)條，應(yīng)先把MultiLine屬性設(shè)置為T(mén)rue，然后再把ScrollBars屬性設(shè)置為()。A)0B)1C)2D)3參考答案：C26.若要使文本框能夠輸入多行文本，應(yīng)該設(shè)置的屬性是()。A)MultiLineB)WordWrapC)ScrollBarsD)AutoSize參考答案：A26.為了使文本框顯示滾動(dòng)條，除要設(shè)置ScrollBars外，還必須設(shè)置的屬性是()。A)AutoSizeB)AlignmentC)MultilineD)MaxLength參考答案：C27.窗體上有一個(gè)名稱(chēng)為Command1的命令按鈕，一個(gè)名稱(chēng)為T(mén)ext1的文本框，其Text屬性值為"VBProgramming"。運(yùn)行程序后，選中其中的"VB"，并執(zhí)行如下事件過(guò)程：PrivateSubCommand1_Click()Text1.SelText="C++"EndSub則文本框中顯示的內(nèi)容為A)VBB)VBProgrammingC)文本框被清空D)C++Programming參考答案：D28.將文本框的ScrollBar設(shè)置為2，文本框中卻沒(méi)有垂直滾動(dòng)條，其原因可能是A)文本框中沒(méi)有內(nèi)容B)文本框的MultiLine屬性值為FalseC)文本框的MultiLine屬性值為T(mén)rueD)文本框的Locked屬性值為T(mén)rue參考答案：B29.文本框的Locked屬性被設(shè)置為T(mén)rue后產(chǎn)生的效果是A)光標(biāo)不能進(jìn)入文本框B)不能使文本框中的文本左右滾動(dòng)C)不能修改文本框中的文本D)在程序中不能引用文本框的內(nèi)容參考答案：C30.為使文本框具有初始值"VB"，在設(shè)計(jì)階段正確的操作是A)選中該文本框，在屬性窗口中把Text屬性的值改為"VB"B)選中該文本框，在屬性窗口中把Caption屬性的值改為"VB"C)雙擊該文本框，在彈出的窗口中輸入"VB"D)單擊該文本框，在該文本框中直接輸入"VB"參考答案：A31.以下控件中，能顯示滾動(dòng)條的是A)文本框B)形狀C)標(biāo)簽D)圖片框參考答案：A32.如果將文本框的一個(gè)屬性設(shè)置為T(mén)rue,則運(yùn)行時(shí)不能對(duì)該文本框中的內(nèi)容進(jìn)行編輯，這個(gè)屬性是A)LockedB)MultiLineC)TabStopD)Visible參考答案：A33.以下關(guān)于文本框Text1的敘述中，錯(cuò)誤的是A)Text1.MaxLength=20表示文本框允許輸入的最大字符數(shù)為20B)Text1.PasswordChar="@"表示在文本框中輸入的字符都顯示為"@"C)a=Text1.Caption表示把在文本框中輸入的內(nèi)容賦給變量aD)Text1.Enabled=False表示把文本框設(shè)置為禁用參考答案：C34.以下關(guān)于文本框的敘述中，正確的是A)當(dāng)Enabled屬性為False時(shí)，其Tab順序不起作用B)當(dāng)TabStop屬性為False時(shí)，不能接收從鍵盤(pán)輸入的數(shù)據(jù)C)當(dāng)獲得焦點(diǎn)時(shí)，觸發(fā)LostFocus事件D)若PassWord屬性設(shè)為"a"，則輸入到文本框的字符將顯示為"*"參考答案：A35.窗體上有一個(gè)名稱(chēng)為T(mén)ext1的文本框，名稱(chēng)為Check1的兩個(gè)復(fù)選框構(gòu)成的控件數(shù)組，下標(biāo)分別為1、2。窗體外觀如圖所示。要求在程序運(yùn)行時(shí)，改變復(fù)選框選中狀態(tài)，則文本框中文本的字體做相應(yīng)變化。為此，某人編寫(xiě)了如下程序代碼：PrivateSubCheck1_Click(IndexAsInteger)IfIndex=1AndCheck1(1).ValuethenText1.FontItalic=TrueElseText1.FontItalic=FalseEndIfIfCheck1(2).value=1thenText1.FontBold=TrueEndIfIfCheck1(2).value=0ThenText1.FontBold=FalseEndIfEndSub但是，以上程序在運(yùn)行中不能完全達(dá)到要求，應(yīng)進(jìn)行修改，下面正確的修改是A)將IfIndex=1AndCheck1(1).ValueThen改為IfCheck1(1).ValueThenB)將第1個(gè)If條件中的Check1(1).Value改為Check1(1).Value=TrueC)將第2個(gè)If條件中的Check1(2).Value=1改為Check1(2).Value=TrueD)將第3個(gè)If條件中的Check1(2).Value=0改為Check1(2).Value=False參考答案：A36.對(duì)于文本框控件，下列說(shuō)法錯(cuò)誤的是A)當(dāng)Locked屬性值為T(mén)rue時(shí)，可以通過(guò)程序代碼修改文本框內(nèi)容B)當(dāng)Locked屬性值為False時(shí)，用戶(hù)可以直接編輯修改文本框內(nèi)容C)MaxLength屬性值既可以在設(shè)計(jì)階段設(shè)定，也可以在運(yùn)行時(shí)設(shè)定D)當(dāng)文本框可以顯示多行文本時(shí)，MaxLength屬性用來(lái)確定每行最大字符數(shù)參考答案：D37.為了改變文本框中所顯示文本的顏色，需設(shè)置的屬性為A)FontColorB)BackColorC)ForeColorD)FillColor參考答案：C38.對(duì)于文本框，用來(lái)設(shè)置允許輸入的最大字符數(shù)的屬性為A)LengthB)MaxLengthC)SelLengthD)MultiLine參考答案：B39.窗體上有2個(gè)名稱(chēng)分別為T(mén)ext1和Text2的文本框，1個(gè)名稱(chēng)為Command1的命令按鈕。單擊Command1時(shí)，Text1中選中的文本將顯示在Text2中。下列能實(shí)現(xiàn)上述操作的事件過(guò)程是A)PrivateSubCommand1_Click()Text2.Text=Mid(Text1.Text,Text1.SelStart,Text1.SelLength)EndSubB)PrivateSubCommand1_Click()Text2.Text=Mid(Text1.Text,,Text1.SelLength,Text1.SelStart)EndSubC)PrivateSubCommand1_Click()Text2.Text=Mid(Text1.Text,Text1.SelStart+1,Text1.SelLength)EndSubD)PrivateSubCommand1_Click()Text2.Text=Mid(Text1.Text,Text1.SelStart-1,Text1.SelLength)EndSub參考答案：C40.為了使文本框中的文本能夠水平滾動(dòng)，應(yīng)采取的正確方法是A)把文本框的ScrollBars屬性設(shè)置為1-HorizontalB)把文本框的MultiLine屬性設(shè)置為T(mén)rueC)