Visual-Basic選擇題(專業(yè)基礎(chǔ)知識)題庫

§2專業(yè)基礎(chǔ)知識§2.1Visualbasic程序開發(fā)環(huán)境1.以下關(guān)于VB的敘述中，錯誤的是BA)VB采用事件驅(qū)動的編程機(jī)制B)如果程序中有Sub_Main過程時，則一定從該過程開始執(zhí)行C)工程文件中包含多個窗體時，可以指定啟動窗體D)VB程序既可以編譯執(zhí)行，也可以解釋執(zhí)行2.在VisualBasic中，不能關(guān)閉的窗口是BA)窗體設(shè)計器窗口B)工程窗口C)屬性窗口D)立即窗口3.VisualBasic集成環(huán)境由若干窗口組成，其中不能隱藏(關(guān)閉)的窗口是(A)。A)主窗口B)屬性窗口C)立即窗口D)窗體窗口4.為了用鍵盤打開菜單和執(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文件的敘述中，錯誤的是(B)。A)標(biāo)準(zhǔn)模塊文件不屬于任何一個窗體B)C)一個工程只有一個工程文件D)一個工程可以有多個窗體文件9.VB中有這樣一類文件：該文件不屬于任何一個窗體，而且僅包含程序代碼，這類文件的擴(kuò)展名是(B)。A).vbpB).basC).vbwD).frm10.類模塊文件的擴(kuò)展名為BA).resB).clsC).vbpD).vbg11.以下敘述中正確的是(C)。A)在屬性窗口只能設(shè)置窗體的屬性B)在屬性窗口只能設(shè)置控件的屬性C)在屬性窗口可以設(shè)置窗體和控件的屬性D)在屬性窗口可以設(shè)置任何對象的屬性12.如果在VisualBasic集成環(huán)境中沒有打開屬性窗口，下列可以打開屬性窗口的操作是(D)。A)用鼠標(biāo)雙擊窗體的任何部位B)執(zhí)行"工程"菜單中的"屬性窗口"命令C)按Ctrl＋F4鍵D)按F4鍵13.在編輯VB應(yīng)用程序時，如果不小心關(guān)閉了屬性窗口，則可以單擊主窗口標(biāo)準(zhǔn)工具欄上的一個按鈕直接打開屬性窗口，這個按鈕的圖標(biāo)是DA)B)C)D)14.下列打開"代碼窗口"的操作中錯誤的是(A)。A)按F4鍵B)單擊"工程資源管理器"窗口中的"查看代碼"按鈕C)雙擊已建立好的控件D)執(zhí)行"視圖"菜單中的"代碼窗口"命令15.如果要在窗體上畫一個標(biāo)簽，應(yīng)在工具箱窗口中選擇的圖標(biāo)是(B)。A)B)C)D)16.為了在窗體上畫一個文件列表框，應(yīng)先在工具箱窗口中選中的圖標(biāo)是CA)B)C)D)§2.2對象及其操作1.下面不屬于對象基本特點的是BA)標(biāo)識唯一性B)可復(fù)用性C)多態(tài)性D)封裝性2.以下關(guān)于VB對象屬性的敘述中，錯誤的是BA)屬性是對象的特征B)對象的所有屬性值都可以在屬性窗口中設(shè)置C)不同對象可以具有同名的屬性D)對象的某些屬性可以在程序中設(shè)置3.以下操作中，不能改變窗體大小的是CA)設(shè)計階段，在"屬性"窗口設(shè)置相應(yīng)屬性B)運(yùn)行階段，用賦值語句修改相應(yīng)屬性C)運(yùn)行階段，調(diào)用窗體的Show方法D)運(yùn)行階段，調(diào)用窗體的Move方法4.以下關(guān)于事件、事件驅(qū)動的敘述中，錯誤的是(C)。A)事件是可以由窗體或控件識別的操作B)事件可以由用戶的動作觸發(fā)C)一個操作動作只能觸發(fā)一個事件D)事件可以由系統(tǒng)的某個狀態(tài)的變化而觸發(fā)5.在面向?qū)ο蟮某绦蛟O(shè)計中，可被對象識別的動作稱為(B)。A)方法B)事件C)過程D)函數(shù)6.以下關(guān)于VB特點的敘述中，錯誤的是(C)。A)VB中一個對象可有多個事件過程B)VB應(yīng)用程序能以編譯方式運(yùn)行C)VB應(yīng)用程序從Form_Load事件過程開始執(zhí)行D)在VB應(yīng)用程序中往往通過引發(fā)某個事件導(dǎo)致對對象的操作7.以下關(guān)于VB的敘述中，錯誤的是(D)。A)VB采用事件驅(qū)動方式運(yùn)行B)VB既能以解釋方式運(yùn)行，也能以編譯方式運(yùn)行C)VB程序代碼中，過程的書寫順序與執(zhí)行順序無關(guān)D)VB中一個對象對應(yīng)一個事件8.以下關(guān)于方法的敘述中，錯誤的是AA)在調(diào)用方法時，對象名稱是必不可缺少的B)方法是一種特殊的過程或函數(shù)C)不同對象的方法可以同名D)方法可以帶有參數(shù)9.以下敘述中錯誤的是(C)。A)VisualBasic是事件驅(qū)動型可視化編程工具B)VisualBasic應(yīng)用程序不具有明顯的開始和結(jié)束語句C)VisualBasic工具箱中的所有控件都具有寬度(Width)和高度(Height)屬性D)VisualBasic中控件的某些屬性只能在運(yùn)行時設(shè)置10.設(shè)工程文件中包名稱分別為Form1、Form2的兩個窗體，且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)于上述程序，以下敘述中錯誤的是(D)。A)Index屬性的值可以用來區(qū)分控件數(shù)組元素B)Index為1的菜單項的標(biāo)題可能會改變C)兩個名稱均為Mnu1的菜單項構(gòu)成一個控件數(shù)組D)11.設(shè)窗體、框架、圖片框（PictureBox）、圖像框（Image）的名稱分別是Form1、Frame1、Picture1、Image1，有下面4條語句：①Form1.Print"VB"②Frame1.Print"VB"③Picture1.Print"VB"④Image1.Print"VB"其中正確的是CA)①和②B)②和③C)①和③D)③和④12.在設(shè)計窗體時雙擊窗體的任何地方，可以打開的窗口是(A)。A)代碼窗口B)屬性窗口C)工程資源管理器窗口D)工具箱窗口13.為了使窗體的大小可以改變，必須把它的BorderStyle屬性設(shè)置為(B)。A)1B)2C)3D)414.為了使窗體左上角不顯示控制框，需設(shè)置為False的屬性是(C)。A)VisibleB)EnabledC)ControlBoxD)Caption15.假定已在窗體上畫了多個控件，其中有一個被選中，為了在屬性窗口中設(shè)置窗體的屬性，預(yù)先應(yīng)執(zhí)行的操作是(A)。A)單擊窗體上沒有控件的地方B)單擊任意一個控件C)雙擊任意一個控件D)單擊屬性窗口的標(biāo)題欄16.設(shè)窗體名稱為frmTest，為了在程序代碼中將窗體的標(biāo)題改為"等級考試"，其代碼應(yīng)該是AA)frmTest.Caption="等級考試"B)Form1.Caption="等級考試"C)frmTest.Title="等級考試"D)Form1.Title="等級考試"17.為了在運(yùn)行時能顯示窗體左上角的控制框（即系統(tǒng)菜單），應(yīng)執(zhí)行的操作是BA)把窗體的ControlBox屬性設(shè)置為False，其他屬性任意B)把窗體的ControlBox屬性設(shè)置為True，并且把BorderStyle屬性設(shè)置為1到5中的一個數(shù)C)把窗體的ControlBox屬性設(shè)置為True，并且把BorderStyle屬性設(shè)置為0D)把窗體的ControlBox屬性設(shè)置為Fale，并且把BorderStyle屬性設(shè)置為1到5中的一個數(shù)18.為了通過屬性窗口設(shè)置窗體的ControlBox屬性值，下列正確的操作是DA)直接鍵入True或FalseB)利用彈出的對話框設(shè)置屬性值C)選擇ControlBox，然后按回車鍵D)雙擊ControlBox屬性條19.以下關(guān)于窗體的敘述中，錯誤的是AA)執(zhí)行UnloadForm1語句后，窗體Form1被隱藏，但仍在內(nèi)存中B)當(dāng)窗體的Enabled屬性為False時，窗體不響應(yīng)鼠標(biāo)、鍵盤的操作C)當(dāng)窗體的KeyPreview屬性為True時，則窗體能優(yōu)先響應(yīng)鍵盤事件D)窗體的Load事件在加載窗體時觸發(fā)20.對于窗體而言，在運(yùn)行期間對其值改變無效的屬性是DA)CaptionB)EnabledC)AutoRedrawD)BorderStyle21.下列描述中錯誤的是DA)窗體是對象B)窗體必須有Name屬性C)窗體可以拖放和移動D)在設(shè)計階段雙擊一個控件可以打開屬性窗口22.窗體上有三個水平滾動條，名稱分別為HSRed、HSGreen和HSBlue，取值范圍均是0～255，代表顏色的三種基色。改變滾動框的位置，可以改變?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)于以上程序，如下敘述中錯誤的是(C)。A)color是窗體級整型數(shù)組B)改變?nèi)魏我粋€滾動條滾動框的位置，窗體的背景色將立刻隨之改變C)3個滾動條Change事件過程中只設(shè)置了一個color數(shù)組元素的值，調(diào)用fill過程失敗D)fill函數(shù)定義中的形式參數(shù)是數(shù)組型參數(shù)23.在程序運(yùn)行時，下面的敘述中正確的是(C)。A)用鼠標(biāo)右鍵單擊窗體中無控件的部分，會執(zhí)行窗體的Form_Load事件過程B)用鼠標(biāo)左鍵單擊窗體的標(biāo)題欄，會執(zhí)行窗體的Form_Click事件過程C)只裝入而不顯示窗體，也會執(zhí)行窗體的Form_Load事件過程D)裝入窗體后，每次顯示該窗體時，都會執(zhí)行窗體的Form_Click事件過程24.設(shè)窗體的名稱為Form1，標(biāo)題為Win，則窗體的MouseDown事件過程的過程名是(C)。A)Form1_MouseDownB)Win_MouseDownC)Form_MouseDownD)MouseDown_Form125.以下關(guān)于窗體的敘述中，錯誤的是(B)。A)Hide方法能隱藏窗體，但窗體仍在內(nèi)存中B)使用Show方法顯示窗體時，一定觸發(fā)Load事件C)移動或放大窗體時，會觸發(fā)Paint事件D)雙擊窗體時，會觸發(fā)DblClick事件26.若要把一個窗體從內(nèi)存中刪除，應(yīng)該使用的方法是AA)UnLoadB)HideC)LoadD)Show27.在程序運(yùn)行時，不會引發(fā)窗體Resize事件的操作是CA)使用了窗體的"還原"按鈕B)使用Move方法改變了窗體的大小C)使用Move方法改變了窗體的位置D)通過鼠標(biāo)拖動邊框調(diào)整了窗體的大小28.下面不響應(yīng)鍵盤事件的對象是DA)窗體B)按鈕C)復(fù)選框D)標(biāo)簽29.編寫如下程序：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.下列敘述中，錯誤的是AA)控件數(shù)組元素的下標(biāo)不能重復(fù)，且必須是連續(xù)的B)控件數(shù)組中所有元素的類型必須是相同的C)窗體的Load事件發(fā)生在所有因用戶操作而引發(fā)的事件之前D)一個窗體中，只能有一個命令按鈕的Cancel屬性被設(shè)置為True31.在VisualBasic中，所有標(biāo)準(zhǔn)控件都具有的屬性是(B)。A)CaptionB)NameC)TextD)Value32.為了把ActiveX控件加到工具箱中，首先應(yīng)采取的操作是AA)執(zhí)行"工程"菜單中的"部件"命令B)執(zhí)行"視圖"菜單中的"工具箱"命令C)執(zhí)行"工具"菜單中的"選項"命令D)執(zhí)行"工程"菜單中的"引用"命令33.能夠用于標(biāo)識對象名稱的屬性是(A)。A)NameB)CaptionC)ValueD)Text34.假定窗體上有一個名稱為txtMac的文本框，則執(zhí)行語句txtMac="MyText"后的結(jié)果為BA)把字符串"MyText"存入變量txtMac中B)在文本框txtMac中顯示字符串"MyText"C)把文本框txtMac的Name屬性設(shè)置為MyTextD)把文本框txtMac的Value屬性設(shè)置為MyText35.VisualBasic為每種控件規(guī)定了一個默認(rèn)屬性，在設(shè)置默認(rèn)屬性時，不必給出屬性名。下列控件中默認(rèn)屬性為Text的控件是BA)框架（Frame）B)組合框（ComboBox）C)標(biāo)簽（Label）D)形狀（Shape）36.編寫如下程序：PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerDimarr()AsIntegern=InputBox("請輸入數(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，并在輸入對話框中輸入7，輸出結(jié)果為AA)7654321B)1234567C)3214765D)432156737.編寫如下程序：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è)置這樣的屬性時，不必給出屬性名。下列中默認(rèn)屬性不是Value的控件是DA)垂直滾動條（VscrollBar）B)復(fù)選框（CheckBox）C)命令按鈕（CommandButton）D)列表框（ListBox）39.窗體上有一個名稱為Combo1的組合框，引用Combo1中最后一個列表項應(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)位置41.為了對多個控件執(zhí)行操作，必須選中這些控件。下列不能選中多個控件的操作是(A)。A)按住Alt鍵，不要松開，然后單擊每個要選中的控件B)按住Shift鍵，不要松開，然后單擊每個要選中的控件C)按住Ctrl鍵，不要松開，然后單擊每個要選中的控件D)拖動鼠標(biāo)畫出一個虛線矩形，使所選中的控件位于這個矩形內(nèi)42.以下敘述中錯誤的是(D)。A)在通用過程中，多個形式參數(shù)之間可以用逗號作為分隔符B)在Print方法中，多個輸出項之間可以用逗號作為分隔符C)在Dim語句中，所定義的多個變量可以用逗號作為分隔符D)當(dāng)一行中有多個語句時，可以用逗號作為分隔符43.以下敘述中錯誤的是(C)。A)續(xù)行符與它前面的字符之間至少要有一個空格B)VisualBasic中使用的續(xù)行符為下劃線(_)C)以撇號(′)開頭的注釋語句可以放在續(xù)行符的后面D)VisualBasic可以自動對輸入的內(nèi)容進(jìn)行語法檢查44.下列有語法錯誤的賦值語句是(D)。A)y＝7＝9B)s＝m＋nC)Text1.Text＝10D)m＋n＝1245.設(shè)程序中分別將a、b、c、d定義為布爾型、整型、字符串型、日期型變量，下列賦值語句錯誤的是AA)a=#True#B)C)c=5&10D)d=#2013/01/01#46.以下敘述中錯誤的是AA)事件過程可以像通用過程一樣由用戶指定過程名B)在Sub過程中可以調(diào)用其它過程C)在Sub過程中不能定義其它過程D)如果過程被定義為Static類型，則該過程中的局部變量都是Static類型47.輸入VisualBasic源程序時，若一個命令行中包含兩個語句，則兩個語句之間的分隔符應(yīng)使用AA)冒號（:）B)分號（;）C)下劃線（_）D)連字符（-）48.VisualBasic源程序的續(xù)行符為CA)冒號（:）B)分號（;）C)下劃線（_）D)連字符（-）49.下列打開"代碼窗口"的操作中錯誤的是(A)。A)按F4鍵B)單擊"工程資源管理器"窗口中的"查看代碼"按鈕C)雙擊已建立好的控件D)執(zhí)行"視圖"菜單中的"代碼窗口"命令50.設(shè)計窗體時，雙擊窗體上沒有控件的地方，打開的窗口是(A)。A)代碼窗口B)屬性窗口C)工具箱窗口D)工程窗口51.以下敘述中，錯誤的是BA)標(biāo)準(zhǔn)模塊不屬于任何一個窗體D)一個應(yīng)用程序可以有多個窗體52.在VB集成環(huán)境中要結(jié)束一個正在運(yùn)行的工程，可單擊工具欄上的一個按鈕，這個按鈕是(D)。A)B)C)D)53.在VisualBasic環(huán)境下設(shè)計應(yīng)用程序時，系統(tǒng)能自動檢查出的錯誤是(A)。A)語法錯誤B)邏輯錯誤C)邏輯錯誤和語法錯誤D)運(yùn)行錯誤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的敘述中，錯誤的是AA)VB的窗體模塊只包含由控件組成的窗體B)在VB集成開發(fā)環(huán)境中，既可以運(yùn)行程序，也可以調(diào)試程序C)VB采用事件驅(qū)動的編程機(jī)制D)56.以下關(guān)于VB的敘述中，錯誤的是BA)VB采用事件驅(qū)動的編程機(jī)制B)如果程序中有Sub_Main過程時，則一定從該過程開始執(zhí)行C)工程文件中包含多個窗體時，可以指定啟動窗體D)VB程序既可以編譯執(zhí)行，也可以解釋執(zhí)行57.能夠被窗體或控件所識別的操作稱為AA)事件B)方法C)過程D)屬性§2.3程序設(shè)計基礎(chǔ)1.下面為單精度實型（即單精度浮點型）變量的是CA)x$B)x&C)x!D)x#2.為了建立隨機(jī)文件，要求文件的每條記錄應(yīng)包含多個不同數(shù)據(jù)類型的數(shù)據(jù)項，則記錄應(yīng)使用的數(shù)據(jù)類型是AA)記錄類型B)字符串類型C)字符串?dāng)?shù)組D)變體類型3.長整型常數(shù)的類型說明符為CA)%B)#C)&D)@4.雙精度浮點數(shù)的類型說明符為BA)%B)#C)&D)@5.VB變量x!的數(shù)據(jù)類型是AA)單精度類型B)字符串類型C)整型D)雙精度類型6.如果在程序中直接使用了沒有聲明的變量，則它的數(shù)據(jù)類型是DA)字符串型B)整型C)邏輯型D)變體型7.若在窗體模塊的聲明部分聲明了如下自定義類型和數(shù)組：PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec則下面的輸出語句中正確的是(C)。A)Printarr.Code(2)，arr.Caption(2)B)C)Printarr(2).Code，arr(2).CaptionD)PrintCode(2)，Caption(2)8.以下自定義數(shù)據(jù)類型的語句中，正確的是(B)。A)TypestudentIDAsString*20nameAsString*10ageAsIntegerEndstudentB)TypestudentIDAsString*20nameAsString*10ageAsIntegerEndTypeC)TypestudentIDAsStringnameAsStringageAsIntegerEndstudentD)TypeIDAsString*20nameAsString*10ageAsIntegerEndTypestudent9.設(shè)有以下定義語句：PrivateTypepointxAsIntegeryAsIntegerEndTypeDimaAspoint下面語句中正確的是BA)a=12B)a.x=12C)point=12D)point.x=1210.以下能正確定義數(shù)據(jù)類型TelBook的代碼是AA)TypeTelBookNameAsString*10TelNumAsIntegerEndTypeB)TypeTelBookNameAsString*10TelNumAsIntegerEndTelBookC)TypeTelBookNameString*10TelNumIntegerEndTypeTelBookD)TypedefTelBookNameString*10TelNumIntegerEndType11.某人在窗體模塊中定義了如下自定義類型：TypeRecnumAsIntegernameAsStringEndType但發(fā)現(xiàn)程序不能運(yùn)行，關(guān)于這一問題，下面敘述中正確的是DA)自定義類型不能寫在窗體模塊中B)自定義類型只能寫在標(biāo)準(zhǔn)模塊中C)在TypeRec前面添加關(guān)鍵字Public就可解決問題D)在TypeRec前面添加關(guān)鍵字Private就可解決問題12.設(shè)有下面的類型和變量定義，PrivateTypeRecnameAsStringscore(5)AsIntegerEndTypeDimstudentAsRec則下面正確的語句是BA)student="張三"B)student.score(2)=75C)student(3).score=69D)score(4)=7713.窗體上有一個名稱為Text1的文本框，一個名稱為Command1的命令按鈕。窗體文件的程序如下：PrivateTypexaAsIntegerbAsIntegerEndTypePrivateSubCommand1_Click()DimyAsxy.a＝InputBox("")Ify.a\2＝y(tǒng).a/2ThenElsey.b＝Fix(y.a/2)EndIfEndSub對以上程序，下列敘述中錯誤的是(D)。A)x是用戶定義的類型B)InputBox函數(shù)彈出的對話框中沒有提示信息C)D)Fix(y.a/2)把y.a/2的小數(shù)部分四舍五入，轉(zhuǎn)換為整數(shù)返回14.下列符號常量的聲明中不合法的是CB)ConstaAsDouble=5+8C)ConstaAsInteger="25"D)Consta="OK"15.窗體上有一個名稱為Picture1的圖片框控件，一個名稱為Label1的標(biāo)簽控件，如圖所示。現(xiàn)有如下程序：PublicSubdisplay(xAsControl)IfTypeOfxIsLabelThenxCaption＝"計算機(jī)等級考試"ElsexPicture＝LoadPicture("pic.jpg")EndIfEndSubPrivateSubLabel1_Click()Calldisplay(Label1)EndSubPrivateSubPicture1_Click()Calldisplay(Picture1)EndSub對以上程序，下列敘述中錯誤的是(A)。A)程序運(yùn)行時會出錯B)單擊圖片框，在圖片框中顯示一幅圖片C)過程中的x是控件變量D)單擊標(biāo)簽，在標(biāo)簽中顯示一串文字16.以下變量名中合法的是(C)。A)x2－1B)printC)str_nD)2x17.以下選項中，不合法的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.下面變量定義中錯誤的是AA)PublicmodAsIntegerB)StaticbufC)DimchAsString*10D)Dima!(-5To-1)25.下列說法中，錯誤的是BA)變量名長度不能超過255個字符B)變量名的第一個字符可以是字母或數(shù)字C)變量名只能由字母、數(shù)字和下劃線組成D)變量名不能使用保留字26.下列說法中，錯誤的是AA)變量名長度不能超過127個字符B)變量名的第一個字符必須是字母C)變量名不能使用保留字D)變量名只能由字母、數(shù)字和下劃線組成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)行時，若輸入395，則輸出結(jié)果是(B)。PrivateSubCommand1_Click()Dimx%x＝InputBox("請輸入一個3位整數(shù)")PrintxMod10，x\100，(xMod100)\10EndSubA)395B)539C)593D)35932.設(shè)窗體文件中有下面的事件過程：PrivateSubCommand1_Click()Dimsa%＝100PrintaEndSub其中變量a和s的數(shù)據(jù)類型分別是(C)。A)整型，整型B)變體型，變體型C)整型，變體型D)變體型，整型33.執(zhí)行語句DimX，YAsInteger后(D)。A)X和Y均被定義為整型變量B)X和Y均被定義為變體類型變量C)X被定義為整型變量，Y被定義為變體類型變量D)X被定義為變體類型變量，Y被定義為整型變量34.某人編寫了向隨機(jī)文件中寫一條記錄的程序，代碼如下：TypeRTypeNameAsString*10TelAsString*20EndTypePrivateSubCommand1_Click()DimpAsRTypep.Name＝InputBox("姓名")p.Tel＝InputBox("電話號")Open"Books.dat"ForRandomAs#1Put#1，，pClose#1EndSub該程序運(yùn)行時有錯誤，修改的方法是()。A)在類型定義"TypeRType"之前加上"Private"B)DimpAsRType必須置于窗體模塊的聲明部分C)應(yīng)把Open語句中的ForRandom改為ForOutput(36)有如下程序：PrivateSubForm_Click()DimsAsInteger，pAsIntegerp＝1Fori＝1To4Forj＝1Tois＝s＋jNextjp＝p*sNextiPrintpEndSub程序運(yùn)行后，單擊窗體，則輸出結(jié)果是(A)。A)在類型定義"TypeRType"之前加上"Private"B)DimpAsRType必須置于窗體模塊的聲明部分C)應(yīng)把Open語句中的ForRandom改為ForOutputD)35.有如下數(shù)據(jù)定義語句：DimX，YAsInteger以上語句表明(C)。A)X、Y均是整型變量B)X是整型變量，Y是變體類型變量C)X是變體類型變量，Y是整型變量D)X是整型變量，Y是字符型變量36.為了聲明一個長度為128個字符的定長字符串變量StrD，以下語句中正確的是(D)。A)DimStrDAsStringB)DimStrDAsString(128)C)DimStrDAsString[128]D)DimStrDAsString*12837.有如下數(shù)據(jù)定義語句：Dima,bAsIntegerDimx%,yasInteger執(zhí)行上述語句后，不是整型變量的是AA)aB)bC)xD)y38.語句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.編寫如下程序：PrivateSubCommand1_Click()StaticxAsIntegerIfxThenx=x+10Elsex=x+1PrintxEndSub程序運(yùn)行后，第三次單擊命令按鈕Command1時，輸出的結(jié)果為DA)1B)3C)10D)2141.對于語句DimVar1,Var2AsString*10，下列說法中正確的是DA)Var1和Var2都被定義為定長字符串變量B)Var1被定義為變長字符串變量，Var2被定義為定長字符串變量C)Var1被定義為定長字符串變量，Var2被定義為變長字符串變量D)Var1被定義為變體變量42.對于語句DimVar1#,Var2AsInteger，下列說法中正確的是BA)Var1#和Var2都被定義為整型變量B)Var1被定義為雙精度型變量，Var2被定義為整型變量C)Var1被定義為長整型變量，Var2被定義為整型變量D)Var1#被定義為變體變量，Var2被定義為整型變量43.編寫如下程序：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.編寫如下程序：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.窗體上有一個Text1文本框和一個Command1命令按鈕。程序的功能是在文本框中輸入密碼后單擊命令按鈕則進(jìn)行密碼確認(rèn)，若密碼正確，彈出信息框顯示"密碼正確"，若密碼錯誤，彈出信息框顯示"密碼錯誤，請重新輸入"，但最多允許輸出3次，若還不正確，則彈出信息框顯示"密碼錯誤，不能再輸入"，且命令按鈕變?yōu)闊o效。某人編寫了如下程序：PrivateSubCommand1_Click()DimnumAsIntegernum=num+1IfText1.Text="123456"ThenMsgBox"密碼正確"ElseIfnum=3ThenCommand1.Enabled=FalseMsgBox"密碼錯誤，不能再輸入"ElseMsgBox"密碼錯誤，請重新輸入"EndIfEndSub調(diào)試時發(fā)現(xiàn)有錯誤需要修改，下面正確的修改方案是CA)把ElseIfnum=3Then改為ElseIfnum>3ThenB)把Command1.Enabled=False改為Command1.Enabled=TrueC)把DimnumAsInteger改為StaticnumAsIntegerD)把num=num+1改為num=num+347.有如下通用過程：SubSa(aAsInteger,bAsInteger)b=at=a/bb=tModbEndSub在窗體上畫一個Command1命令按鈕，然后編寫如下事件過程：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的終值不對，所以不能正常運(yùn)行D)程序可以正常運(yùn)行，x中保存的是數(shù)組b中所有元素中最小的數(shù)50.有如下語句序列：Dima，bAsIntegerPrintaPrintb執(zhí)行以上語句序列，下列敘述中錯誤的是(A)。A)輸出的a值是0B)輸出的b值是0C)a是變體類型變量D)b是整型變量51.下列關(guān)于數(shù)組的敘述中，正確的是AA)數(shù)組名的命名規(guī)則與簡單變量相同B)VisualBasic支持?jǐn)?shù)組的隱式定義C)使用Static語句定義任何類型的數(shù)組時，都把該數(shù)組的全部元素初始化為0D)使用Dim語句定義任何類型的數(shù)組時，都將把數(shù)組的全部元素初始化為空字符串52.下面程序片段中有錯誤CSubpric()PublicxAsIntegerx=Array(1,2,3,4,5)……EndSub為了避免出錯，正確的修改方案是A)把PublicxAsInteger改為PublicxAsVariantB)把PublicxAsInteger改為Dimx(5)C)把PublicxAsInteger改為Staticx53.下面程序的功能是：從鍵盤輸入若干個自然數(shù)，輸入-1則結(jié)束輸入，然后計算平均值輸出（因事先不知道執(zhí)行時會輸入多少個數(shù)，定義一個動態(tài)數(shù)組存放這些數(shù)）。PrivateSubCommand1_Click()Dima()AsIntegern=0Dox=InputBox("請輸入一個自然數(shù)，輸入-1結(jié)束")Ifx<>-1Thenn=n+1___________a(n)=xEndIfLoopUntilx=-1Fork=1Tons=s+a(k)NextPrints/nEndSub以上程序不完整，應(yīng)在橫線處填寫的是BA)ReDima(n)B)ReDimPreservea(n)C)ReDimaD)ReDima()§2.4常用標(biāo)準(zhǔn)控件1.如果改變驅(qū)動器列表框的Drive屬性，則將觸發(fā)的事件是(A)。A)ChangeB)ScrollC)KeyDownD)KeyUp2.任何控件都具有的屬性為DA)CaptionB)ForeColorC)FontNameD)Name3.在窗體上畫一個文本框(名稱為Text1)和一個標(biāo)簽(名稱為Label1)，程序運(yùn)行后，在文本框中每輸入一個字符，都會立即在標(biāo)簽中顯示文本框中字符的個數(shù)。以下可以實現(xiàn)上述操作的事件過程是(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è)窗體上有一個標(biāo)簽Label1和一個計時器Timer1，Timer1的Interval屬性被設(shè)置為1000，Enabled屬性被設(shè)置為True。要求程序運(yùn)行時每秒在標(biāo)簽中顯示一次系統(tǒng)當(dāng)前時間。以下可以實現(xiàn)上述要求的事件過程是(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)容時不覆蓋其背景內(nèi)容，需進(jìn)行設(shè)置的屬性為(D)。A)BackColorB)BorderStyleC)ForeColorD)BackStyle6.VisualBasic控件一般都規(guī)定一個默認(rèn)屬性，在引用這樣的屬性時，只寫對象名而不必給出屬性名。默認(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ù)選框的名稱，則以下屬性設(shè)置語句中，運(yùn)行時不會出錯的是A)Label1.BackStyle=2B)Command1.Style=1C)Text1.ScrollBars=4D)Check1.Value=2參考答案：D10.下列不包含滾動條的控件是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)簽中的文本信息通過Text屬性顯示D)在設(shè)計階段，圖片框中建立的控件可以拖拽到圖片框之外參考答案：A13.窗體上有1個名稱為Text1的文本框，1個名稱為Label1的標(biāo)簽。程序運(yùn)行后，如果在文本框中輸入信息，則立即在標(biāo)簽中顯示相同的內(nèi)容。以下可以實現(xiàn)上述操作的事件過程為()。A)PrivateSubLabel1_Click()EndSubB)PrivateSubLabel1_Change()EndSubC)PrivateSubText1_Click()EndSubD)PrivateSubText1_Change()EndSub參考答案：D14.以下控件中，能夠作為容器使用的是A)圖片框B)形狀控件C)圖像框D)標(biāo)簽參考答案：A15.在窗體上畫1個名稱為Command1的命令按鈕，1個名稱為Label1的標(biāo)簽，然后編寫如下事件過程：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)鍵盤事件的對象是A)窗體B)按鈕C)復(fù)選框D)標(biāo)簽參考答案：D17.在窗體上畫Text1、Text2兩個文本框，并編寫如下程序：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個名稱為Text1的文本框和1個名稱為Label1的標(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個名稱分別為Text1和Text2的文本框。編寫如下程序：PrivateSubForm_Load()Text1.Text=""Text2.Text=""EndSubPrivateSubCommand1_Click()EndSub程序運(yùn)行后，在Text1和Text2中依次輸入100和200，并單擊命令按鈕Command1，則輸出結(jié)果為A)100B)200C)300D)100200參考答案：D21.窗體上有一個由兩個文本框組成的控件數(shù)組，名稱為Text1，并有如下事件過程：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)于上述程序，以下敘述中錯誤的是()。A)Index用于標(biāo)識數(shù)組元素B)本程序中CaseElse分支的語句永遠(yuǎn)不會被執(zhí)行C)向任何一個文本框輸入字符，都會在另一個文本框中顯示該字符D)下標(biāo)為0的文本框中顯示的字符尺寸將越來越小參考答案：D22.在窗體上畫一個文本框，其名稱為Text1，為了在程序運(yùn)行后隱藏該文本框，應(yīng)使用的語句為()。A)B)Text1.Visible＝FalseC)D)Text1.Enabled＝False參考答案：B23.為了使文本框同時具有垂直和水平滾動條，應(yīng)先把MultiLine屬性設(shè)置為True，然后再把ScrollBars屬性設(shè)置為()。A)0B)1C)2D)3參考答案：D24.在窗體上畫一個名稱為Combo1的組合框，名稱為Text1的文本框，以及名稱為Command1的命令按鈕，如圖所示。運(yùn)行程序，單擊命令按鈕，將文本框中被選中的文本添加到組合框中，若文本框中沒有選中的文本，則將文本框中的文本全部添加到組合框中。命令按鈕的事件過程如下：PrivateSubCommand1_Click()IfText1.Se1Length<>0ThenElseCombo1.AddItemText1EndIfEndSub程序中橫線處應(yīng)該填寫的是()。A)B)C)D)參考答案：C25.為了使文本框只具有垂直滾動條，應(yīng)先把MultiLine屬性設(shè)置為True，然后再把ScrollBars屬性設(shè)置為()。A)0B)1C)2D)3參考答案：C26.若要使文本框能夠輸入多行文本，應(yīng)該設(shè)置的屬性是()。A)MultiLineB)WordWrapC)ScrollBarsD)AutoSize參考答案：A26.為了使文本框顯示滾動條，除要設(shè)置ScrollBars外，還必須設(shè)置的屬性是()。A)AutoSizeB)AlignmentC)MultilineD)MaxLength參考答案：C27.窗體上有一個名稱為Command1的命令按鈕，一個名稱為Text1的文本框，其Text屬性值為"VBProgramming"。運(yùn)行程序后，選中其中的"VB"，并執(zhí)行如下事件過程：PrivateSubCommand1_Click()Text1.SelText="C++"EndSub則文本框中顯示的內(nèi)容為A)VBB)VBProgrammingC)文本框被清空D)C++Programming參考答案：D28.將文本框的ScrollBar設(shè)置為2，文本框中卻沒有垂直滾動條，其原因可能是A)文本框中沒有內(nèi)容B)文本框的MultiLine屬性值為FalseC)文本框的MultiLine屬性值為TrueD)文本框的Locked屬性值為True參考答案：B29.文本框的Locked屬性被設(shè)置為True后產(chǎn)生的效果是A)光標(biāo)不能進(jìn)入文本框B)不能使文本框中的文本左右滾動C)不能修改文本框中的文本D)在程序中不能引用文本框的內(nèi)容參考答案：C30.為使文本框具有初始值"VB"，在設(shè)計階段正確的操作是A)選中該文本框，在屬性窗口中把Text屬性的值改為"VB"B)選中該文本框，在屬性窗口中把Caption屬性的值改為"VB"C)雙擊該文本框，在彈出的窗口中輸入"VB"D)單擊該文本框，在該文本框中直接輸入"VB"參考答案：A31.以下控件中，能顯示滾動條的是A)文本框B)形狀C)標(biāo)簽D)圖片框參考答案：A32.如果將文本框的一個屬性設(shè)置為True,則運(yùn)行時不能對該文本框中的內(nèi)容進(jìn)行編輯，這個屬性是A)LockedB)MultiLineC)TabStopD)Visible參考答案：A33.以下關(guān)于文本框Text1的敘述中，錯誤的是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時，其Tab順序不起作用B)當(dāng)TabStop屬性為False時，不能接收從鍵盤輸入的數(shù)據(jù)C)當(dāng)獲得焦點時，觸發(fā)LostFocus事件D)若PassWord屬性設(shè)為"a"，則輸入到文本框的字符將顯示為"*"參考答案：A35.窗體上有一個名稱為Text1的文本框，名稱為Check1的兩個復(fù)選框構(gòu)成的控件數(shù)組，下標(biāo)分別為1、2。窗體外觀如圖所示。要求在程序運(yùn)行時，改變復(fù)選框選中狀態(tài)，則文本框中文本的字體做相應(yīng)變化。為此，某人編寫了如下程序代碼：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個If條件中的Check1(1).Value改為Check1(1).Value=TrueC)將第2個If條件中的Check1(2).Value=1改為Check1(2).Value=TrueD)將第3個If條件中的Check1(2).Value=0改為Check1(2).Value=False參考答案：A36.對于文本框控件，下列說法錯誤的是A)當(dāng)Locked屬性值為True時，可以通過程序代碼修改文本框內(nèi)容B)當(dāng)Locked屬性值為False時，用戶可以直接編輯修改文本框內(nèi)容C)MaxLength屬性值既可以在設(shè)計階段設(shè)定，也可以在運(yùn)行時設(shè)定D)當(dāng)文本框可以顯示多行文本時，MaxLength屬性用來確定每行最大字符數(shù)參考答案：D37.為了改變文本框中所顯示文本的顏色，需設(shè)置的屬性為A)FontColorB)BackColorC)ForeColorD)FillColor參考答案：C38.對于文本框，用來設(shè)置允許輸入的最大字符數(shù)的屬性為A)LengthB)MaxLengthC)SelLengthD)MultiLine參考答案：B39.窗體上有2個名稱分別為Text1和Text2的文本框，1個名稱為Command1的命令按鈕。單擊Command1時，Text1中選中的文本將顯示在Text2中。下列能實現(xiàn)上述操作的事件過程是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.為了使文本框中的文本能夠水平滾動，應(yīng)采取的正確方法是A)把文本框的ScrollBars屬性設(shè)置為1-HorizontalB)把文本框的MultiLine屬性設(shè)置為TrueC)