全國計算機等級考試(二級vb筆試題庫 )

二級vb題庫全國計算機等級考試52000.以下表達中正確的選項是(C)(單)A.只有窗體才是VisualBasic中的對象B.只有控件才是VisualBasic中的對象C.窗體和控件都是VisualBasic中的對象D.窗體和控件都不是VisualBasic中的對象52001.以下可以激活屬性窗口的操作是(D)(單)A.用鼠標雙擊窗體的任何部位B.執(zhí)行"文件"菜單中的"屬性窗口"命令C.執(zhí)行"編輯"菜單中的"屬性窗口"命令D.按F4鍵52002以下能翻開工具箱窗口的操作是(A)(單)A.執(zhí)行"視圖"菜單中的"工具箱"命令B.按Alt鍵C.單擊屬性窗口上的"工具箱"按鈕D.按Ctrl鍵52003.假定已在一個窗體上畫了多個控件，并有一個控件是活動的，為了在屬性窗口中設置該窗體的Name屬性，預先應執(zhí)行的操作是(D)(單)A.單擊窗體上有控件的地方B.單擊任一個控件C.不執(zhí)行任何操作D.雙擊窗體的標題欄52004.為了把窗體上的某個控件變?yōu)榛顒拥?，應?zhí)行的操作是(B)(單)A.單擊窗體的空白處B.單擊該控件的內(nèi)部C.雙擊該屬性列表框D.雙擊窗體52005.確定一個控件在窗體上的位置的屬性是(D)(單)A.Width或HeightB.Top和HeightC.Top或WidthD.Top和Left52006.確定一個窗體或控件的大小的屬性是(A)(單)A.Width或HeightB.Top和WidthC.Top或LeftD.Top和Left52007.為了同時改變一個活動控件的高度和寬度，正確的操作是(A)(單)A.拖拉位于控件左上角B.只能拖拉位于控件右下角C.只能拖拉位于控件左下角D.不能同時改變控件的高度和寬度52021.面向?qū)ο蟮某绦蛟O計指滿足(B)(單)A.虛擬化、結(jié)構(gòu)化、動態(tài)化B.封裝性、繼承性、多態(tài)性C.對象的鏈接、動態(tài)鏈接、動態(tài)數(shù)據(jù)交換D.ODBC、DDE、OLE52021.用戶在屏幕上畫出應用程序界面，并設置好對象的屬性，系統(tǒng)便可以自動生成程序代碼，這稱為(A)(單)A.面向?qū)ο蟮某绦蛟O計B.結(jié)構(gòu)化程序設計C.事件驅(qū)動的編程機制D.程序設計52021.VB集成開發(fā)環(huán)境開發(fā)的應用程序不適宜的運行環(huán)境是(A)(單)A.WINDOS32B.WINDOWS9XC.WINDOWSNT D.WINDOWS200052021.VB6共有三個版本，按功能從弱到強的順序排列應是(C)(單)A.學習版、專業(yè)版和工程版B.學習版、工程版和專業(yè)版C.學習版、專業(yè)版和企業(yè)版D.學習版、企業(yè)版和專業(yè)版52021.VB集成開發(fā)環(huán)境有三種工作狀態(tài)，不屬于三種工作狀態(tài)之一的是(B)(單)A.設計狀態(tài) B.編寫代碼狀態(tài)C.運行狀態(tài) D.中斷狀態(tài)52021.不能翻開代碼窗口的操作是(B)(單)A.雙擊窗體設計器的任何地方B.按下F鍵C.單擊工程窗口中的"查看代碼"按鈕D.選擇"視圖"下拉菜單中的"代碼窗口"52021.在VB中，工程文件的擴展名是(B)(單)A..frmB..vbpC..basD..frx52021.在VB中，窗體文件的擴展名是(A)(單)A..frmB..vbpC..basD..frx52021.VB集成開發(fā)環(huán)境可以(D)(單)A.編輯、調(diào)試、運行程序，但不能生成可執(zhí)行程序B.編輯、生成可執(zhí)行程序、運行程序，但不能調(diào)試程序C.編輯、調(diào)試、生成可執(zhí)行程序，但不能運行程序D.編輯、調(diào)試、運行程序，也能生成可執(zhí)行程序52021.英文"VISUAL"的含義是(A)(單)A.可視化B.集成C.結(jié)構(gòu)化D.調(diào)試52021.標準模塊文件的擴展名是(C)(單)A.frmB.vbp C.basD.vbg52021.VB集成開發(fā)環(huán)境中，在(C)中編寫代碼(單)A.狀態(tài)欄B.屬性列表框 C.代碼框D.標題欄52021.在面向?qū)ο蟮某绦蛟O計過程中，英文縮寫"OOP"的含義是(C)(單)A.事件驅(qū)動的編程機制B.結(jié)構(gòu)化程序設計語言C.面向?qū)ο蟮某绦蛟O計D.可視化程序設計52021.在窗體上畫一個名稱為Timer1的計時器控件，要求每隔0.5秒發(fā)生一次計時器事件，那么以下正確的屬性設置語句是(D)(單)nterval=5C.Timer1.Interval=50D.Timer1.Interval=50052022.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()StaticxAsIntegerClsFort=1To2y=y+xx=x+2NexttPrintx,yEndSub程序運行后，連續(xù)三次單擊Command1按鈕后，窗體上顯示的是(A)(單)A.42B.1218C.1230D.4652023.以下關于多重窗體程序的表達中，錯誤的選項是(A)(單)A.用Hide方法不但可以隱藏窗體,且能去除內(nèi)存中的窗體B.在多重窗體程序中，各窗體的菜單是彼此獨立的C.在多重窗體程序中，可以根據(jù)需要指定啟動窗體D.對于多重窗體程序中，單獨保存每個窗體52024.以下關于文件的表達中，錯誤的選項是(B)(單)A.順序文件中的記錄一個接一個順序存放B.隨機文件中記錄的長度是不相同的C.執(zhí)行翻開文件的命令后，自動生成一個文件指針D.EOF函數(shù)作用是判斷文件的指針是否指向文件末尾52025.以下表達中錯誤的選項是(D)(單)A.事件過程是響應特定事件的一段程序B.不同的對象可以具有相同名稱的方法C.對象的方法是執(zhí)行指定操作的過程D.編程者可以自由更改代碼框右上邊的過程列表的事件名稱52026.以下合法的VisualBasic變量的名稱是(A)(單)A.a3B.ConstC.9abcD.a#x!52027.當一個復選框被選中時，它的Value屬性的值是(C)(單)A.3B.2C.1D.052028.表達式5Mod3+5\3的值是(B)(單)A.0B.3C.4D.652029.設x=4,y=8,z=7,表達式：(x＜y)Orz＜x的值是(C)(單)A.1B.-1C.TRUED.FALSE 52030.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()a$="VisualBasic"PrintString(3,a$)EndSub程序運行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是(A)(單)A.VVVB.Vis C.sicD.1152031.設有如下程序段：x=2Forc=1To4Step2x=x+cNextc運行以上程序后，x的值是(A)(單)A.6B.7 C.8D.952032.以下表達中錯誤的選項是(A)(單)A.在KeyPress事件過程中不能識別鍵盤鍵的按下與釋放B.在KeyPress事件過程中不能識別回車鍵C.在KeyDown和KeyUp事件過程中，從鍵盤輸入的字母"A"和字母"a"對應的KeyCode視作相同的字母D.在KeyDown和KeyUp事件過程中，從大鍵盤上輸入的"1"和從右側(cè)小鍵盤上輸入的"1"被視作不同的字符52033.執(zhí)行如下兩條語句，窗體上顯示的是(C)(單)A=9.8596PrintFormat(a,"000.00")A.0,009.86B.9.86C.009.86D.0,009.8652034.在窗體上畫一個名稱為CommandDialog1的通用對話框，一個名稱為Command1的命令按鈕。然后編寫如下事件過程：PrivateSubCommand1_Click()CommonDialog1.FileName=""CommonDialog1.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"CommonDialog1.FilterIndex=1CommonDialog1.DialogTitle="VBTest"CommonDialog1.Action=1EndSub對于這個程序，以下表達中錯誤的選項是(D)(單)A.該對話框被設置為"翻開"對話框B.在該對話框中指定的文件名為空C.該對話框的標題為VBTestD.在該對話框中指定的默認文件類型為文本文件(*.Txt)52035.設一個工程由兩個窗體組成，其名稱分別為Form1和Form2，在Form1上有一個名稱為Command1的命令按鈕。窗體Form1的程序代碼如下：PrivateSubCommand1_Click()DimaAsIntegera=10Callg(Form2,a)EndSubPrivateSubg(fAsForm,xAsInteger)y=Iif(x＞10,100,-100)f.Showf.Caption=yEndSub運行以上程序，正確的結(jié)果是(B)(單)A.Form1的Caption屬性值為100B.Form2的Caption屬性值為-100C.Form1的Caption屬性值為-100D.Form2的Caption屬性值為10052036.在窗體上畫一個名稱為Command1的命令按鈕，并編寫如下程序：PrivateSubCommand1_Click()DimxAsIntegerStaticyAsIntegerx=10y=5Callf1(x,y)Printx,yEndSubPrivateSubf1(ByRefx1AsInteger,y1AsInteger)x1=x1+2y1=y1+2EndSub程序運行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是(D)(單)A.105B.125 C.107D.12752037.OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerDimnAsIntegern=3Ifn＜10ThenCallGetArray(a,n)EndIfEndSubPrivateSubGetArray(b()AsInteger,nAsInteger)Dimc(10)AsIntegerj=0Fort=1Tonb(t)=Rnd*100Ifb(t)/2=b(t)\2Thenj=j+1c(j)=b(t)EndIfNexttPrintjEndSub以下表達中錯誤的選項是(C)(單)A.數(shù)組b中的數(shù)范圍為0-100B.c數(shù)組下標的下界從1開始C.GetArray過程的參數(shù)n是按值傳送的D.語句Ifb(t)/2=b(t)\2Then是判斷數(shù)組b中元素的值是否為整數(shù)52038.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)Forc=1ToUbound(a)a(c)=a(c)+c-1NextcPrinta(3)EndSub程序運行后，單擊命令按鈕，那么在窗體上顯示的內(nèi)容是(B)(單)A.4B.5 C.6D.752039.閱讀程序：OptionBase1PrivateSubForm_Click()DimarrDimSum%Sum=0arr=Array(1,3,5,7,9)Fort=1To5Sum=Sum+arr(t)NexttPrintSumEndSub程序運行后，單擊窗體，輸入結(jié)果為(B)(單)A.5B.9 C.25D.1552040.在窗體上畫一個名稱為File1的文件列表框，并編寫如下程序：PrivateSubFile1_DblClick()x=Shell(File1.FileName,1)EndSub以下關于該程序的表達中，錯誤的選項是(A)(單)A.x沒有實際作用，因此可以將該語句寫為：CallShell(File1,FileName,1)B.雙擊文件列表框中的文件，將觸發(fā)該事件過程C.要執(zhí)行的文件的名字通過File1.FileName指定D.File1中顯示的是當前驅(qū)動器、當前目錄下的文件52041.在窗體上畫一個名稱為Label1、標題為"VisualBasic考試"的標簽，兩個名稱分別為Command1和Command2、標題分別為"開始"和"停止"的命令按鈕，然后畫一個名稱為Timer1的計時器控件，并把其Interval屬性設置為500。編寫如下程序：PrivateSubForm_Load()Timer1.Enabled=FalseEndSubPrivateSubCommand1_Click()Timer1.Enabled=TrueEndSubPrivateSubTimer1_Timer()IfLabel1.Left＜Form1.WidthThenLabel1.Left=Label1.Left+20ElseLabel1.Left=0EndIfEndSub程序運行后，單擊"開始"按鈕，標簽在窗體中移動。對于這個程序，以下表達中錯誤的選項是(A)(單)A.標簽的移動方向為自右向左B.單擊"停止"按鈕后再單擊"開始"按鈕，標簽從停止的位置繼續(xù)移動C.當標簽全部移出窗體后，將從窗體的另一端出現(xiàn)并重新移動D.標簽按指定的時間時隔移動52042.標準地說，VB是一種(A)的開發(fā)工具(單)A.面向?qū)ο驜.面向用戶 C.面向屏幕D.面向窗體52043.VB6設計界面包含多個視窗，控制這些視窗顯示或關閉的命令包含在(D)下拉菜單中(單)A.文件B.工程 C.編輯D.視圖52044下面(D)操作不是激活或顯示屬性列表框的操作(單)A.按快捷鍵F4B.點擊工具欄中的"屬性列表框"按鈕C.選擇"視圖"下拉菜單的"屬性窗口"項D.雙擊窗體中的某一對象52045.VisualBasic程序中分隔各語句的字符是(B)(單)A.′B.: C.\D._52046.假定窗體的名稱(Name屬性)為Form1，那么把窗體的標題設置為"VBTest"的語句為(B)(單)A.Form1="VBTest" B.Caption="VBTest"C.Form1.Text="VBTest" D.Form1.Name="VBTest"52047.以下不能翻開代碼窗口的操作是(D)(單)A.雙擊窗體上的某個控件雙擊B.雙擊窗體C.按F7鍵 D.單擊窗體或控件52048.VisualBasic程序中語句行的續(xù)行符是(D)(單)A.′B.: C.\D._52049.VisualBasic程序中的注釋所使用的字符是(A)(單)A.′B.: C.\D._52050.以下說法中正確的選項是：為了保存一個VisualBasic應用程序，應當(D)(單)A.只保存窗體模塊文件(.frm)B.只保存工程文件(.vbp)C.分別保存工程文件和標準模塊文件(.bas)D.分別保存工程文件、窗體文件和標準模塊文件52051.為了使窗體的大小可以改變，必須把它的BorderStyle屬性設置為(B)(單)A.1B.2 C.3D.452052.以下說法中正確的選項是：為了載入一個只有一個工程〔此工程下有三個窗體〕的VisualBasic應用程序，應當(B)(單)A.只裝入窗體模塊文件(.frm)B.先裝入工程文件(.vbp)即可C.分別裝入工程文件和標準模塊文件(.bas)D.分別裝入工程文件、窗體文件和標準模塊文件52053.要使一個標簽能夠顯示所需要的文本，應設置該標簽的(A)屬性的值(單)A.CaptionB.Name C.TextD.AutoSize52054.要使一個命令按鈕上有圖形，應該設置該按鈕的(A)屬性值，同時設置它的style屬性為1(單)A.Picture B.StyleC.DownPicture D.DisabledPicture52055.為使計時器對象每隔5秒鐘產(chǎn)生一個時鐘事件(Timer事件)，那么其Interval屬性值應設置為(D)(單)A.5B.300 C.500D.500052056一個標準的VB應用程序至少要包含一個(C)對象(單)A.文本框B.標簽框 C.窗體D.命令按鈕52057.要使一個文本框?qū)ο竽軌蝻@示多行文字，應設置該對象的(B)屬性值為True(單)A.TextB.MultiLineC.StyleD.Visible52058.以下的(A)對象支持KeyPress事件(單)A.文本框B.命令按鈕C.標簽框D.圖像框52059.假設要將窗體從內(nèi)存中卸載，其實現(xiàn)的方法或語句是(B)(單)A.ShowB.Unload C.LoadD.Hide52060.以下選項中，不是VB標準控件的是(C)(單)A.命令按鈕B.定時器C.通用對話框D.單項選擇框52061.雙擊窗體中的對象后，VB將顯示的窗口是(C)(單)A.工具箱B.工程〔工程〕窗口C.代碼窗口D.屬性窗口52062.下述選項中，VB的程序設計方法是(B)(單)A.面向?qū)ο?、順序?qū)動B.面向?qū)ο?、事件?qū)動C.面向過程、事件驅(qū)動 D.面向過程、順序驅(qū)動52063.在VB中，要將一個窗體裝載到內(nèi)存進行變量初始化等預處理，但沒有顯示該窗體，應使用的方法或語句是(C)(單)A.ShowB.Unload C.LoadD.Hide52064.文本框的默認屬性是(B)(單)A.CaptionB.Text C.NameD.Top52065.標簽默認屬性是(A)(單)A.CaptionB.Text C.NameD.Top52066.執(zhí)行以下程序段：a$="abbacddcba"ForI=6To2Step-2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)NextIPrintz輸出結(jié)果為(B)(單)A.ABAB.BBABBA C.ABBABAD.AABAAB52067.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：OptionBase1PrivateSubCommand1_Click()DimaAsVarianta=Array(1,2,3,4,5)Sum=0ForI=1To5Sum=sum+a(I)NextIx=Sum/5ForI=1To5Ifa(I)＞xThenPrinta(I);NextIEndSub程序運行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是(D)(單)A.12B.123 C.345D.4552068.假定一個工程由一個窗體文件Form1和兩個標準模塊文件Model1及Model2組成。Model1代碼如下：PublicxAsIntegerPublicyAsIntegerSubS1()x=1S2EndSubSubS2()y=10Form1.ShowEndSubModel2的代碼如下：SubMain()S1EndSub其中SubMain被設置為啟動過程。程序運行后，各模塊的執(zhí)行順序是(C)(單)A.Form1-＞Model1-＞Model2B.Model1-＞Model2-＞Form1C.Model2-＞Model1-＞Form1D.Model2-＞Form1-＞Model152069.設有如下程序段：a$="beijingshanghai"b$=Mid(a$,InStr(a$,"g")+1)執(zhí)行上面的程序段后，變量b$的值為【shanghai】52070.以下程序段的輸出結(jié)果是【3】Num=0DoWhilenum＜＝2num=num+1LoopPrintnum52071.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()Move500，500EndSub程序運行后，單擊命令按鈕，執(zhí)行的操作為(A)(單)A.命令按鈕移動到距窗體左邊界、上邊界各500的位置B.窗體移動到距屏幕左邊界、上邊界各500的位置C.命令按鈕向左、上方向各移動500D.窗體向左、上方向各移動50052072.在窗體上有假設干控件，其中有一個名稱為Text1的文本框。影響Text1的Tab順序的屬性是(D)(單)A.TabStopB.Enabled C.VisibleD.TabIndex52073.在窗體上畫一個名稱為List1的列表框，為了對列表框中的每個工程都能進行處理，應使用的循環(huán)語句為(A)(單)A.Fori=0ToList1.ListCount-1......NextiB.Fori=0ToListCount-1......NextiC.Fori=1ToList1.listCount......NextiD.Fori=1ToListCount......Nexti52074.以下Case語句中錯誤的選項是(C)(單)A.Case0To10 B.CaseIs＞10C.CaseIs＞10AndIs＜50 D.Case3,5,Is＞1052075.以下關于圖片框控件的說法中，錯誤的選項是(D)(單)A.可以通過Print方法在圖片框中輸出文本B.清空圖片框控件中圖形的方法之一是加載一個空圖形C.圖片框控件可以作為容器使用D.用圖片框控件的Stretch屬性可以自動調(diào)整圖片框中圖形的大小52076.執(zhí)行語句s=Len(Mid("VisualBasic",1,6))后，s的值是(A)(單)A.VisualB.Basic C.6D.1152077.以下表達中錯誤的選項是(D)(單)A.下拉式菜單能用菜單編輯器建立B.在多窗體程序中，每個窗體都可以建立自己的菜單系統(tǒng)C.能夠?qū)Σ藛雾椀腃lick事件編程D.如果把一個菜單項的Enabled屬性設置為False，那么該菜單項不可見52078.在窗體上畫一個命令按鈕，其名稱為Command1，然后編寫如下事件過程：PrivateSubCommand1_Click()a="12345"PrintFormat$(a,"000.00")EndSub程序運行后，單擊命令按鈕，窗體上顯示的是(B)(單)A.123.45B.12345.00 C.152079.以下關于函數(shù)過程的表達中，正確的選項是(A)(單)A.函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關系B.在函數(shù)過程中，過程的返回值可以有多個C.當數(shù)組作為函數(shù)過程的參數(shù)時，既能以傳值方式傳遞，也能以傳址方式傳遞D.如果不指明函數(shù)過程參數(shù)的類型，那么該參數(shù)不能有數(shù)據(jù)類型的參數(shù)52080.以下關于變量作用域的表達中，正確的選項是(C)(單)A.用dim定義變量是靜態(tài)變量B.靜態(tài)變量必須在標準模塊中聲明C.用public定義變量是全局變量D.Static類型變量的作用域范圍是它所在的窗體或模塊文件52081.確定一個控件在窗體上的位置的屬性是(C)(單)A.Width和Height B.Width或HeightC.Top和Left D.Top或Left52082.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()Text1.Text="Visual"Me.Text1="Basic"Text1="Program"EndSub程序運行后，如果單擊命令按鈕，那么在文本框中顯示的是(C)(單)A.VisualB.Basic C.ProgramD.出錯52083.以下關系表達式中，其值為False的是(A)(單)A."ABC"＞"AbC" B."the"＜＞"they"C."VISUAL"=UCase("Visual") D."Integer"＞"Int"52084.語句Printint(5/4*6\5)Mod2的輸出結(jié)果是(B)(單)A.0B.1 C.2D.352085.在窗體上畫一個文本框、一個標簽和一個命令按鈕，其名稱分別為Text1、Label1和Command1，然后編寫如下兩個事件過程：PrivateSubCommand1_Click()strText=InputBox("請輸入")Text1.Text=strTextEndSubPrivateSubText1_Change()Label1.Caption=Right(Trim(Text1.Text),3)EndSub程序運行后，單擊命令按鈕，如果在輸入對話框中輸入abcdef，那么在標簽中顯示的內(nèi)容是(D)(單)A.空B.abcdef C.abcD.def52086.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()x=-5Ifx＞0Theny=x^2Elsey=xEndIfPrintyEndSub程序運行后，單擊命令按鈕，窗體上顯示的是(A)(單)A.-5B.25 C.1D.-152087.一個工程中含有窗體Form1、Form2和標準模塊Model1，如果在Form1中有語句PubilcXAsInteger，在Model1中有語句PubilcYAsInteger，那么以下表達中正確的選項是(A)(單)A.變量X、Y的作用域相同B.Y的作用域是Model1C.在Form1的任何地方中可以直接使用YD.在Form2中可以直接使用X和Y52088.在窗體上畫一個名稱為Drive1的驅(qū)動器列表框，一個名稱為Dir1的目錄列表框。當改變當前驅(qū)動器時，目錄列表框應該與之同步改變。設置兩個控件同步的命令放在一個事件過程中，這個事件過程是(A)(單)A.Drive1_ChangeB.Drive1_ClickC.Dir1_Click D.Dir1_KeyPress52089.在窗體上畫一個命令按鈕〔其NAME屬性為Command1〕，然后編寫如下代碼：OptionBase1PrivateSubCommand1_Click()Dimas=0a=Array(1,2,3,4)ForI=4To1Step-1s=s+a(I)NextIPrintsEndSub運行上面的程序，單擊命令按鈕，其輸出結(jié)果是(D)(單)A.4321B.1234 C.34D.1052090.在窗體上畫一個名稱為Text1的文本框，編寫以下代碼：PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii＜65OrKeyAscii＞90ThenmsgBox"請輸入大寫字母"KeyAscii=0EndIfEndSub以下能說明該事件過程正確是(A)(單)A.要求文本框只能接收大寫字母的輸入B.要求文本框只能接收小寫字母的輸入C.要求文本框只能接收數(shù)字的輸入D.要求文本框只能接收65到90之間的數(shù)值的輸入52091.在窗體上畫一個名稱為Text1的文本框，一個名稱為Command1的命令按鈕，然后編寫如下事件過程和通用過程：PrivateSubCommand1_Click()n=Val(Text1.Text)Ifn\2=n/2Thenf=f1(n)Elsef=f2(n)EndIfPrintf;nEndSubPublicFunctionf1(ByRefx)x=x*xf1=x+xEndFunctionPublicFunctionf2(ByValx)x=x*xf2=x+x+xEndFunction程序運行后，在文本框中輸入3，然后單擊命令按鈕，窗體上顯示的是(D)(單)A.7236B.10836 C.726D.27352092.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()c="1234"Fori=1To4c1=Trim(Str())Printc1NextiEndSub程序運行后，單擊命令按鈕，要求在窗體上顯示如下內(nèi)容1121231234那么在下劃線處應填入的內(nèi)容為(B)(單)A.Right(c1,i)B.Left(c1,i)C.Mid(c1,i,1)D.Mid(c1,i,i)52093.在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框，然后編寫如下事件過程：PrivateSubCommand1_Click()n=Val(Text1.Text)Fori=2TonForj=2Tosqr(i)IfiModj=0ThenExitForNextjIfj＞Sqr(i)ThenPrintiNextiEndSub該事件過程的功能是(C)(單)A.輸出n以內(nèi)的奇數(shù) B.輸出n以內(nèi)的偶數(shù)C.輸出n以內(nèi)的素數(shù) D.輸出n以內(nèi)能被j整除的數(shù)52094.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下通用過程和命令按鈕的事件過程：PrivateFunctionf(mAsInteger)IfmMod2=0Thenf=mElsef=1EndIfEndFunctionPrivateSubCommand1_Click()DimiAsIntegers=0Fori=1To5s=s+f(i)NextPrintsEndSub程序運行后，單擊命令按鈕，在窗體上顯示的是(C)(單)A.11B.10 C.9D.852095.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=1To3Forj=2To4array1(i,j)=i+jNextjNextiText1.Text=array1(2,3)+array1(3,4)EndSub程序運行后，單擊命令按鈕，在文本框中顯示的值是(D)(單)A.15B.14 C.13D.1252096.VisualBasic應用程序中標準模塊文件的擴展名是【BAS或.BAS】(注意不要寫點)。52097.在菜單編輯器中建立一個菜單，其主菜單項的名稱為mnuEdit，Visible屬性為False，程序運行后，如果用鼠標右鍵單擊窗體，那么彈出與mnuEdit相應的菜單。PrivateSubForm_【mousedown】(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenpopupmenumnuEditEndIfEndSub52098.在菜單編輯器中建立一個菜單，其主菜單項的名稱為mnuEdit，Visible屬性為False，程序運行后，如果用鼠標右鍵單擊窗體，那么彈出與mnuEdit相應的菜單。以下是實現(xiàn)上述功能的程序，請?zhí)羁?。PrivateSubFormmousedown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2Then【popupmenu】mnuEditEndIf52099.為了使計時器控件Timer1每隔0.5秒觸發(fā)一次Timer事件，應將Timer1控件的【Interval】屬性設置為500。52100.為了使計時器控件Timer1每隔0.5秒觸發(fā)一次Timer事件，應將Timer1控件的Interval屬性設置為【500】。52101.與數(shù)學表達式ln(a+b)/(3x)+5對應的VisualBasic表達式是【log(a+b)/(3*x)+5或(log(a+b)/(3*x))+5】*52102.將C盤根目錄下的圖形文件moon.jpg裝入圖片框Picture1的語句是【】52103.在窗體上畫一個名稱為Text1的文本框，然后畫三個單項選擇按鈕，并用這三個單項選擇按鈕建立一個控件數(shù)組，名稱為Option1，程序運行后，如果單擊某個單項選擇按鈕，那么文本框中的字體將根據(jù)所選擇的單項選擇按鈕切換。PrivateSubOption1_Click(IndexAsInteger)SelectCase【Index】Case0a="宋體"Case1a="黑體"Case2a="楷體＿GB2312"EndSelecttext1.fontname=aEndSub52104.在窗體上畫一個名稱為Text1的文本框，然后畫三個單項選擇按鈕，并用這三個單項選擇按鈕建立一個控件數(shù)組，名稱為Option1，程序運行后，如果單擊某個單項選擇按鈕，那么文本框中的字體將根據(jù)所選擇的單項選擇按鈕切換。PrivateSubOption1_Click(IndexAsInteger)SelectCaseindexCase0a="宋體"Case1a="黑體"Case2a="楷體＿GB2312"EndSelecttext1.【fontname】=aEndSub52105.在窗體上畫兩個組合框，其名稱分別為Combo1、Combo2，然后畫兩個標簽，名稱分別為Label1、Label2。程序運行后，如果在某個組合框中選擇一個工程，那么把所選中的工程在其下面的標簽中顯示出來。PrivateSubCombo1_Click()CallShowItem(Combo1,Label1)EndSubPrivateSubCombo2_Click()CallShowItem(Combo2,Label2)EndSubPublicSubShowItem(tmpComboAsComboBox,tmpLabelAsLabel)【tmplabel】.Caption=tmpCombo.TextEndSub52106.在窗體上畫兩個組合框，其名稱分別為Combo1、Combo2，然后畫兩個標簽，名稱分別為Label1、Label2，程序運行后，如果在某個組合框中選擇一個工程，那么把所選中的工程在其下面的標簽中顯示出來。PrivateSubCombo1_Click()CallShowItem(Combo1,Label1)EndSubPrivateSubCombo2_Click()CallShowItem(Combo2,Label2)EndSubPublicSubShowItem(tmpComboAsComboBox,tmpLabelAsLabel)tmpLabel.Caption=【tmpcombo】.TextEndSub52107.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()n=5f=1s=0Forc=1Tonf=f*【7】s=s+fNextcPrintsEndSub該事件過程的功能是計算1!+2!+3!+…+n!的值。52108.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerForI=1To10a(I)=INextICall【swap】a()ForI=1To10Printa(I);NextEndSubSubswap(b()AsInteger)n=ubound(b)ForI=1Ton/2t=b(I)b(I)=b(n)b(n)=tn=n-1NextIEndSub上述程序的功能是，通過調(diào)用過程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換，……，a(5)與a(6)的值互換。52109.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerForI=1To10a(I)=INextICallswap〔a()〕ForI=1To10Printa(I);NextEndSubSubswap(b()AsInteger)n=【ubound(b)】ForI=1Ton/2t=b(I)b(I)=b(n)b(n)=tn=n-1NextIEndSub上述程序的功能是，通過調(diào)用過程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換，……，a(5)與a(6)的值互換。52110.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerForI=1To10a(I)=INextICallswap〔a()〕ForI=1To10Printa(I);NextIEndSubSubswap(b()AsInteger)n=ubound(b)ForI=1Ton/2t=b(I)b(I)=b(n)b(n)=tn=【n-1】NextIEndSub上述程序的功能是，通過調(diào)用過程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換，……，a(5)與a(6)的值互換。52111.以下程序段運行的結(jié)果為(B)(單)PrivateSubForm_Click()MyDate=#7/21/1997#PrintFormat(MyDate,"m/d/yy")PrintFormat(MyDate,"yyyy年m月dd日")EndSubA.7/21/971997年7月21日B.7-21-971997年7月21日C.97/7/211997年7月21日D.7/21/9797年7月21日52112.以下程序段運行的結(jié)果為(B)(單)PrivateSubForm_Click()MyTime=#9:21:30PM#MyDate=#7/21/1997#PrintTab(2);Format(MyDate,"mmmm-yy")PrintTab(2);Format(MyTime,"hh:mm:ssA/P")EndSubA.July-979:21:30P B.July-9709:21:30PC.07-979:21:30P D.July-979:21:3052113.以下程序段運行的結(jié)果為(C)(單)PrivateSubForm_Click()MyDate=#7/21/1997#PrintFormat(MyDate,"dddd,mmmm,dd,yyyy")EndSubA.21,07,1997 B.21,07,21,1997C.Monday,July,21,1997 D.Monday,07,21,199752114.在窗體中建立一個文本框text1和一個命令按鈕command1，編寫下面程序：PrivateSubText1_LostFocus()IfNotIsNumeric(Text1)ThenMsgBox"帳號有非數(shù)字字符錯誤"Text1.Text=""Text1.SetFocuselseMsgBox"帳號正確"EndIfEndSub當在text1文本框中輸入字符"abc"之后，單擊命令按鈕，結(jié)果為(B)(單)A.顯示對話框，提示信息為"帳號正確"B.顯示對話框，提示信息為"帳號有非數(shù)字字符錯誤"C.程序出錯 D.沒有任何提示52115.在窗體中建立一個文本框text1和一個命令按鈕command1，編寫下面程序：PrivateSubText1_LostFocus()IfNotIsNumeric(Text1)ThenMsgBox"帳號有非數(shù)字字符錯誤"Text1.Text=""Text1.SetFocuselseMsgBox"帳號正確"EndIfEndSub當在text1文本框中輸入數(shù)字123456之后，單擊命令按鈕，結(jié)果為(A)(單)A.顯示對話框，提示信息為"帳號正確"B.顯示對話框，提示信息為"帳號有非數(shù)字字符錯誤"C.程序出錯 D.沒有任何提示52116.在窗體中建立一個文本框text1和一個命令按鈕command1，編寫下面程序：PrivateSubCommand1_Click()DimIAsIntegerIfText1.Text＜＞"Gong"ThenI=MsgBox("密碼錯誤",5+vbExclamation,"輸入密碼")IfI＜＞4ThenEndElseText1.Text=""Text1.SetFocusEndIfElseMsgBox"密碼帳號正確！"EndIfEndSub假設在text1中輸入字符串"Gong"，那么程序運行結(jié)果為(A)(單)A.顯示對話框，提示"密碼帳號正確！"B.顯示對話框，提示"密碼錯誤"C.程序出錯D.沒有任何提示52117.在窗體中建立一個文本框text1和一個命令按鈕command1，編寫下面程序：PrivateSubCommand1_Click()DimIAsIntegerIfText1.Text＜＞"Gong"ThenI=MsgBox("密碼錯誤",5+vbExclamation,"輸入密碼")IfI＜＞4ThenEndElseText1.Text=""Text1.SetFocusEndIfElseMsgBox"密碼帳號正確！"EndIfEndSub假設在text1中輸入字符串"gong"，那么程序運行結(jié)果為(B)(單)A.顯示對話框，提示"密碼帳號正確！"B.顯示對話框，提示"密碼錯誤"C.程序出錯D.沒有任何提示52118.在窗體中建立一個文本框text1和一個命令按鈕command1，編寫下面程序：PrivateSubCommand1_Click()DimIAsIntegerIfText1.Text＜＞"Gong"ThenI=MsgBox("密碼錯誤",VbRetryCancle+vbExclamation,"輸入密碼")IfI＜＞4ThenEndElseText1.Text=""Text1.SetFocusEndIfElseMsgBox"密碼帳號正確！"EndIfEndSub假設在text1中輸入字符串"123"，顯示"密碼錯誤"對話框，關于此對話框描述正確的選項是(A)(單)A.顯示對話框中有“重試〞按鈕B.顯示對話框中有“確定〞按鈕C.顯示對話框中有“是〞按鈕D.以上說法都不正確52119.在窗體中建立三個文本框，名稱分別為text1、text2和text3，還有一個名稱為label1的標簽，一個名稱為command1的命令按鈕，編寫如下代碼：PrivateSubCommand1_Click()Dimx!,y!,z!,t!x=Text1y=Text2z=Text3Ifx＜yThent=xx=yy=tEndIfIfy＜zThent=yy=zz=tIfx＜yThent=xx=yy=tEndIfEndIfLabel1.Caption=x&","&y&","&zEndSub當在文本框text1、text2和text3中分別輸入5、3和8，那么標簽顯示的結(jié)果為(C)(單)52120.以下程序段：PrivateSubForm_Load()DimNopAsInteger,OpAsString*1Num1=3Num2=2Nop=val(Inputbox("請輸入1-4之間的整數(shù)"))SelectCaseNopCase1Op="＋"Result=Num1+Num2Case2Op="－"Result=Num1-Num2Case3Op="×"Result=Num1*Num2Case4Op="÷"Result=Num1/Num2EndSelectLabel1=Num1&Op&Num2&"="&ResultEndSub窗體運行后，輸入1，那么label1的標題顯示結(jié)果為(A)(單)A.3+2=5B.3-2=1 C.3×2=6D.3÷2=1.552121.以下程序段：PrivateSubForm_Load()DimNopAsInteger,OpAsString*1Num1=3Num2=2Nop=val(Inputbox("請輸入1-4之間的整數(shù)"))SelectCaseNopCase1Op="＋"Result=Num1+Num2Case2Op="－"Result=Num1-Num2Case3Op="×"Result=Num1*Num2Case4Op="÷"Result=Num1/Num2EndSelectLabel1=Num1&Op&Num2&"="&ResultEndSub窗體運行后，輸入2，那么label1的標題顯示結(jié)果為(B)(單)A.3+2=5B.3-2=1 C.3×2=6D.3÷2=1.552122.以下程序段：PrivateSubForm_Load()DimNopAsInteger,OpAsString*1Num1=3Num2=2Nop=val(Inputbox("請輸入1-4之間的整數(shù)"))SelectCaseNopCase1Op="＋"Result=Num1+Num2Case2Op="－"Result=Num1-Num2Case3Op="×"Result=Num1*Num2Case4Op="÷"Result=Num1/Num2EndSelectLabel1=Num1&Op&Num2&"="&ResultEndSub窗體運行后，輸入3，那么label1的標題顯示結(jié)果為(C)(單)A.3+2=5B.3-2=1 C.3×2=6D.3÷2=1.552123.以下程序段：PrivateSubForm_Load()DimNopAsInteger,OpAsString*1Num1=3Num2=2Nop=val(Inputbox("請輸入1-4之間的整數(shù)"))SelectCaseNopCase1Op="＋"Result=Num1+Num2Case2Op="－"Result=Num1-Num2Case3Op="×"Result=Num1*Num2Case4Op="÷"Result=Num1/Num2EndSelectLabel1=Num1&Op&Num2&"="&ResultEndSub窗體運行后，輸入4，那么label1的標題顯示結(jié)果為(D)(單)A.3+2=5B.3-2=1 C.3×2=6D.3÷2=1.552124.以下程序段的作用是(A)(單)PrivateSubPicture1_Click()DimasciAsInteger,iAsIntegeri=0Forasci=32To126Picture1.PrintTab(7*i+2);Chr(asci);"=";asci;i=i+1Ifi=7Theni=0:Picture1.PrintNextasciA.打印ASCII碼表，一行7個表達式B.打印九九乘法表，一行7個表達式C.打印ASCII碼表，一行8個表達式D.以上說法都不正確52125.我國現(xiàn)在人口有13億，按人口增長0.8%計算，多少年后我國人口將超過26億。PrivateSubCommand1_Click()Dimx,nx=Val(Text1)n=0DoWhile【x】＜26x=x*(1+0.008)n=n+1LoopText2=Str(n)EndSub52126.以下程序的作用是(B)(單)Fori=1To9Forj=1To9se=i&"×"&j&"="&i*jPicture1.PrintTab((j-1)*9+1);se;NextjPicture1.PrintNextiA.打印ASCII碼表 B.打印九九乘法表C.打印加法表 D.以上說法都不正確52127.求自然數(shù)e的近似值，誤差小于0.00001，近似公式為：e=1+1/1!+1/2!+1/3!+……+1/I!+……以下程序用來求自然數(shù)e。PrivateSubForm_Click()DimI%,n&,t!,e!E=0'存放累加和結(jié)果I=0'計數(shù)器n=1'存放階乘的值t=1'級數(shù)第I項值DoWhile【t>】0.00001e=e+tI=I+1n=n*It=1/nLoopPrint"計算了";I;"項的和是";eEndSub52128.求自然數(shù)e的近似值，誤差小于0.00001，近似公式為：e=1+1/1!+1/2!+1/3!+……+1/I!+……以下程序用來求自然數(shù)e。PrivateSubForm_Click()DimI%,n&,t!,e!E=0'存放累加和結(jié)果I=0'計數(shù)器n=1'存放階乘的值t=1'級數(shù)第I項值DoWhilet＞0.00001e=e+【t】I=I+1n=n*It=1/nLoopPrint"計算了";I;"項的和是";eEndSub52129.求自然數(shù)e的近似值，誤差小于0.00001，近似公式為：e=1+1/1!+1/2!+1/3!+……+1/I!+……以下程序用來求自然數(shù)e。PrivateSubForm_Click()DimI%,n&,t!,e!E=0'存放累加和結(jié)果I=0'計數(shù)器n=1'存放階乘的值t=1'級數(shù)第I項值DoWhilet＞0.00001e=e+tI=I+1n=n*【I】t=1/nLoopPrint"計算了";I;"項的和是";eEndSub52130.以下程序是求最大公約數(shù)和最小公倍數(shù)的程序。PrivateSubForm_Click()Dimm1,n1,m,n,rAsIntegern1=InputBox("輸入自然數(shù)n","輸入數(shù)")m1=InputBox("輸入自然數(shù)m","輸入數(shù)")n=n1m=m1Ifm＜nThent=m:m=n:n=tEndIfr=mMod【n】DoWhile(r＜＞0)m=nn=rr=mModnLoopPrint"最大公約數(shù)=",nPrint"最小公倍數(shù)=",m1*n1/nEndSub52131.以下程序是求最大公約數(shù)和最小公倍數(shù)的程序，在【】處填寫適宜的關系運算符。PrivateSubForm_Click()Dimm1,n1,m,n,rAsIntegern1=InputBox("輸入自然數(shù)n","輸入數(shù)")m1=InputBox("輸入自然數(shù)m","輸入數(shù)")n=n1m=m1Ifm＜nThent=m:m=n:n=tEndIfr=mModnDoWhiler【<>】0m=nn=rr=mModnLoopPrint"最大公約數(shù)=",nPrint"最小公倍數(shù)=",m1*n1/nEndSub52132.下面是求100以內(nèi)素數(shù)的程序。PrivateSubCommand1_Click()DimiAsInteger,mAsInteger,tagAsBooleanForm=2To100tag=TrueFori=2Tom-1IfmMod【i】=0Thentag=FalseNextiIftagThenPrintmNextmEndSub52133.下面是求100以內(nèi)素數(shù)的程序，下面說法正確的選項是(A)(單)PrivateSubCommand1_Click()DimiAsInteger,mAsInteger,tagAsBooleanForm=2To100tag=TrueFori=2Tom-1IfmModi=0Thentag=FalseNextiIftag=trueThenPrintmNextmEndSubA.tag為true時，表示m是素數(shù)B.tag為false時，表示m是素數(shù)C.語句mModi=0，說明m是素數(shù)D.以上說法都不正確52134.百元買百雞問題：假定小雞每只5角,公雞每只2元，母雞每只3元?，F(xiàn)在有100元錢要求買100只雞，以下程序列出了所有可能的購雞方案。PrivateSubCommand2_Click()Dimx%,y%,z%Forx=0To33Fory=0To50If3*x+2*y+0.5*(100-x-y)=100ThenPicture2.Printx,y,【100-x-y,10-y-x】EndIfNextyNextxEndSub52135.百元買百雞問題：假定小雞每只5角,公雞每只2元，母雞每只3元?，F(xiàn)在有100元錢要求買100只雞，以下程序列出了所有可能的購雞方案。PrivateSubCommand1_Click()Dimx%,y%,z%Forx=0To33Fory=0To50Forz=0To100If3*x+2*y+0.5*z=100And【x+y+z=100】ThenPicture1.Printx,y,zEndIfNextzNextyNextxEndSub52136.隨機產(chǎn)生10個100～200之間的數(shù)，求它們的最大值程序如下：PrivateSubCommand1_Click()Max=100Fori=1To10x=Int(Rnd*101+100)Printx;Ifx＞MaxThen【】NextiPrintPrint"最大值=";MaxEndSub在此程序中，其中【】處應該填寫的是(C)(單)A.Max=100B.Max=200 C.Max=xD.Max=052137.隨機產(chǎn)生10個100～200之間的數(shù)，求它們的最大值程序如下：PrivateSubCommand1_Click()Max=100Fori=1To10x=int【RND*101+100或100+RND*101或RND()*101+100或100+RND()*101】Printx;Ifx＞MaxThenMax=xNextiPrintPrint"最大值=";MaxEndSub52138.隨機產(chǎn)生10個100～200之間的數(shù)，求它們的最大值程序如下：PrivateSubCommand1_Click()Max=100ForI=1To10x=Int(Rnd*101+100)Printx;If【】ThenMax=xNextIPrintPrint"最大值=";MaxEndSub在【】處應該填寫的是：〔A〕(單)A.x＞MaxB.x＜Max C.x=MaxD.以上都不正確52139.以下是求1～100之間5或7的倍數(shù)的和，如下程序段：Sum=0Fori=1To100IfiMod5=0OriMod7=0Then【】EndIfNextiPrintSum其中【】處書寫正確的選項是〔B〕(單)A.Sum=iB.Sum=Sum+iC.Sum=Sum+5+7D.以上都不正確52140.以下是求1～100的5或7的倍數(shù)的和程序段：Sum=0Fori=1To100IfiMod5=0Ori【mod】7=0ThenSum=Sum+iEndIfNextiPrintSum52141.以下表達中錯誤的選項是(B)(單)A.VisualBasic是事件驅(qū)動型可視化編程工具B.VisualBasic應用程序不具有明顯的開始和結(jié)束語句C.VisualBasic工具箱中的所有控件都具有寬度〔Width〕和高度〔Height〕屬性D.VisualBasic中控件的某些屬性只能在運行時設置52142.以下表達中錯誤的選項是(A)(單)A.在工程資源管理器窗口中只能包含一個工程文件及屬于該工程的其他文件B.以.BAS為擴展名的文件是標準模塊文件C.窗體文件包含該窗體及其控件的屬性D.一個工程中可以含有多個標準模塊文件52143.以下表達中錯誤的選項是(B)(單)A.雙擊鼠標可以觸發(fā)DblClick事件B.在編程過程中，窗體或控件的事件的名稱可以由編程人員自由確定C.移動鼠標時，會觸發(fā)MouseMove事件D.控件的名稱可以由編程人員設定52144.以下不屬于VisualBasic系統(tǒng)的文件類型是(B)(單)A..frmB..bat C..vbgD..vbp52145.以下表達中錯誤的選項是(C)(單)A.翻開一個工程文件時，系統(tǒng)自動裝入與該工程有關的窗體、標準模塊等文件B.保存VisualBasic程序時，應分別保存窗體文件及工程文件C.VisualBasic應用程序只能以解釋方式執(zhí)行D.事件可以由用戶引發(fā)52146.以下聲明語句中錯誤的選項是(B)(單)A.Constvar1=123B.Dimvar2='ABC'C.Publica,basinteger D.Staticaassingle52147.設窗體上有一個列表框控件List1，且其中含有假設干列表項。那么以下能表示當前被選中的列表項內(nèi)容的是(D)(單)52148.程序運行后，在窗體上單擊鼠標，此時窗體不會接收到的事件是(C)(單)A.MouseDownB.MouseUp C.LoadD.Click52149.設a=10，b=5，c=1，執(zhí)行語句Printa＞b＞c后，窗體上顯示的是(B)(單)A.TrueB.False C.1D.出錯信息52150.如果要改變窗體的標題，那么需要設置窗體的(A)屬性(單)A.CaptionB.NameC.BackColorD.BorderStyle52151.以下能判斷指針是否指向文件尾的函數(shù)是(D)(單)A.BOFB.LOC C.LOFD.EOF52152.如果一個工程含有多個窗體及標準模塊，那么以下表達中錯誤的選項是(B)(單)A.如果工程中含有SubMain過程，那么程序一定首先執(zhí)行該過程B.不能把標準模塊設置為啟動模塊C.用Hide方法只是隱藏一個窗體,不能從內(nèi)存中去除該窗體D.任何時刻最多只有一個窗體是活動窗體52153.窗體的過程Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)，有4個參數(shù)，關于這些參數(shù)，正確的描述是(D)(單)A.通過Button參數(shù)判定當前按下的是鍵盤上哪一個鍵B.Shift參數(shù)只能用來確定是否按下Shift鍵C.Shift參數(shù)只能用來確定是否按下Alt和Ctrl鍵D.參數(shù)x,y用來設置鼠標當前位置的坐標52154.設組合框Combo1中有3個工程，那么以下能刪除最后一項的語句是(B)(單)Abo1.RemoveItemTextBbo1.RemoveItem2Cbo1.RemoveItem3Dbo1.RemoveItemCombo1.Listcount52155.以下關于焦點的表達中，錯誤的選項是(A)(單)A.如果文本框的Enabled屬性為False，能接收從鍵盤上輸入的數(shù)據(jù)B.當文本框失去焦點時，觸發(fā)LostFocus事件C.當文本框的Enabled屬性為False時，其Tab順序不起作用D.可以用TabIndex屬性改變Tab順序52156.如果要在菜單中添加一個分隔線，那么應將其Caption屬性設置為(D)(單)A.=B.* C.&D.-52157.在窗體上畫一個名稱為Command1的命令按鈕和兩個名稱分別為Text1、T