1、一、單項(xiàng)選擇題1、與傳統(tǒng)的程序設(shè)計(jì)語(yǔ)言相比,Visual Basic最突出的特點(diǎn)是（C）。 A、結(jié)構(gòu)化程序設(shè)計(jì)B、程序開(kāi)發(fā)環(huán)境 C、事件驅(qū)動(dòng)編程機(jī)制D、程序調(diào)試技術(shù)2、賦值語(yǔ)句：a=123 & MID("123456",3,2)執(zhí)行后，a變量中的值是（C）。 A、"12334"B、123C、12334D、1573、保存一個(gè)工程至少應(yīng)保存兩個(gè)文件，這兩個(gè)文件分別是（B）。 A、文本文件和工程文件B、窗體文件和工程文件C、窗體文件和標(biāo)準(zhǔn)模塊文件D、類模塊文件和工程文件4、以下能在窗體Form1的標(biāo)題欄中顯示"VisualBasic窗體&qu

2、ot;的語(yǔ)句是（C）。A、Form1.Name="VisualBasic窗體"B、Form1.Title="VisualBasic窗體"C、Form1.Caption="VisualBasic窗體"D、Form1.Text="VisualBasic窗體"5、為了裝入一個(gè)Visual Basic應(yīng)用程序，應(yīng)當(dāng)（D） A、只裝入窗體文件（.frm）B、只裝入工程文件（.vbp）C、分別裝入工程文件和標(biāo)準(zhǔn)模塊文件（.bas）D、分別裝入工程文件、窗體文件和標(biāo)準(zhǔn)模塊文件6、賦給一個(gè)數(shù)組的數(shù)據(jù)類型一定要（A）。 A、相同B、

3、不相同C、兩可D、都不對(duì)7、下面正確的賦值語(yǔ)句是（C）。A、x+y=30B、y=*r*rC、y=x+30D、3y=x8、Visual Basic 6.0集成環(huán)境的主窗口中不包括（C）。A、標(biāo)題欄B、菜單欄C、狀態(tài)欄D、工具欄9、以下敘述中錯(cuò)誤的是(C)。A、Visual Basic 是事件驅(qū)動(dòng)型可視化編程工具B、Visual Basic應(yīng)用程序不具有明顯的開(kāi)始和結(jié)束語(yǔ)句C、Visual Basic工具箱中的所有控件都具有寬度（Width）和高度（Height）屬性D、Visual Basic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置10、要使Print方法在Form_Load事件中起作用，要對(duì)窗體的(C

4、)屬性進(jìn)行設(shè)置。 A、BackcolorB、ForeColorC、AutoRedrawD、BackStyle11、若要使命令按鈕不可操作，要對(duì)(A)屬性進(jìn)行設(shè)制。 A、EnabledB、VisibleC、BackColorD、Caption12、以下敘述中錯(cuò)誤的是(B)。 A、一個(gè)工程中可以包含多個(gè)窗體文件B、在一個(gè)窗體文件中用Private定義的通用過(guò)程能被其他窗體調(diào)用C、在設(shè)計(jì)VB程序時(shí)，窗體、標(biāo)準(zhǔn)模塊、類模塊等需要分別保存為不同類型的磁盤(pán)文件。D、一個(gè)工程默認(rèn)的啟動(dòng)對(duì)象是Form113、Cls方法可以清除窗體或圖片框中的(C)內(nèi)容。A、在設(shè)計(jì)階段使用Picture設(shè)置的背景位圖B、在設(shè)計(jì)

5、階段放置的控件C、在運(yùn)行階段產(chǎn)生的圖形和文字D、以上均可14、設(shè)x=3,y=5,則以下表達(dá)式值為真的是 (C)A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0)D、x>=y And y>1015、為了防止用戶隨意將光標(biāo)置于控件之上，應(yīng)將進(jìn)行(D)設(shè)置。 A、將控件的TabIndex屬性設(shè)置為0B、將控件的TabStop屬性設(shè)置為T(mén)rueC、將控件的TabStop屬性設(shè)置為FalseD、將控件的Enabled屬性設(shè)置為False16、要判斷在文本框是否按了Enter鍵，應(yīng)在文本框的(D)事

6、件中判斷。 A、ChangeB、KeyDownC、ClickD、KeyPress17、以下關(guān)于焦點(diǎn)的敘述中，錯(cuò)誤的是(A)。 A、如果文本框的TabStop屬性為False，則不能接收從鍵盤(pán)上輸入的數(shù)據(jù)B、當(dāng)文本框失去焦點(diǎn)時(shí)，觸發(fā)LostFocus事件C、當(dāng)文本框的Enabled屬性為False時(shí)，其Tab順序不起作用D、可以用TabIndex屬性改變Tab順序18、如果文本框的Enabled屬性設(shè)為False，則(A)。 A、文本框的文本將變成灰色，并且此時(shí)用戶不能將光標(biāo)置于文本框上。B、文本框的文本將變成灰色，用戶仍然能將光標(biāo)置于文本框上，但是不能改變文本框中的內(nèi)容。C、文本框的文本將變成

7、灰色，用戶仍然能改變文本框中的內(nèi)容。D、文本框的文本正常顯示，用戶能將光標(biāo)置于文本框上，但是不能改變文本框中的內(nèi)容。19、程序運(yùn)行后，在窗體上單擊鼠標(biāo)，此時(shí)窗體不會(huì)接收到的事件是(C)。A、MouseDownB、MouseUp C、LoadD、Click20、圖像框有一個(gè)屬性，可以自動(dòng)調(diào)整圖形的大小，以適應(yīng)圖像框的尺寸，這個(gè)屬性是(B)。 A、AutosizeB、StretchC、AutoRedrawD、Appearance21、為了防止用戶隨意將光標(biāo)置于控件之上，應(yīng)設(shè)置的屬性是(D)。 A、將控件的TabIndex屬性設(shè)置為0B、將控件的TabStop屬性設(shè)置為T(mén)rueC、將控件的TabSt

8、op屬性設(shè)置為FalseD、將控件的Enabled屬性設(shè)置為False22、不論何控件，共同具有的是(B)屬性。 A、TextB、NameC、ForeColorD、Caption23、以下關(guān)于窗體的描述中，錯(cuò)誤的是(A)。 A、執(zhí)行Unload Form1語(yǔ)句后，窗體Form1消失，但仍在內(nèi)存中B、窗體的Load事件在加載窗體時(shí)發(fā)生C、當(dāng)窗體的Enabled屬性為False時(shí)，通過(guò)鼠標(biāo)和鍵盤(pán)對(duì)窗體的操作都被禁止D、窗體的Height、Width屬性用于設(shè)置窗體的高和寬24、當(dāng)運(yùn)行程序時(shí)，系統(tǒng)自動(dòng)執(zhí)行窗體的(A)事件過(guò)程。 A、LoadB、ClickC、UnloadD、GotFocus25、窗體

9、設(shè)計(jì)器是用來(lái)設(shè)計(jì)(B)。 A、應(yīng)用程序的代碼段B、應(yīng)用程序的界面C、對(duì)象的屬性D、對(duì)象的事件26、Visual Basic是一種面向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語(yǔ)言，采取了(A)的編程機(jī)制。 A、事件驅(qū)動(dòng)B、按過(guò)程順序執(zhí)行C、從主程序開(kāi)始執(zhí)行D、按模塊順序執(zhí)行27、確定一個(gè)控件在窗體上的位置的屬性是(D)。 A、Width或HeightB、Width和HeightC、Top或LeftD、Top和 Left28、如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是(A)。 A、CaptionB、NameC、BackColorD、BorderStyle29、以下敘述中錯(cuò)誤的是(C)。 A、打開(kāi)一個(gè)工程文件時(shí)，系統(tǒng)自動(dòng)

10、裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件B、保存Visual Basic程序時(shí)，應(yīng)分別保存窗體文件及工程文件C、Visual Basic應(yīng)用程序只能以解釋方式執(zhí)行D、事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)30、以下敘述中錯(cuò)誤的是(B)。 A、雙擊鼠標(biāo)可以觸發(fā)DblClick事件B、窗體或控件的事件的名稱可以由編程人員確定C、移動(dòng)鼠標(biāo)時(shí)，會(huì)觸發(fā)MouseMove事件D、控件的名稱可以由編程人員設(shè)定31、在Visual Basic中最基本的對(duì)象是(C)。它是應(yīng)用程序的基石，是其他控件的容器。 A、文本框B、命令按鈕C、窗體D、標(biāo)簽32、以下敘述中正確的是(A)。 A、窗體的Name屬性指定窗體的名稱，

11、用來(lái)標(biāo)識(shí)一個(gè)窗體B、窗體的Name屬性的值是顯示在窗體標(biāo)題欄中的文本C、可以在運(yùn)行期間改變對(duì)象的Name屬性的值D、對(duì)象的Name屬性值可以為空33、在設(shè)計(jì)階段，當(dāng)雙擊窗體上的某個(gè)控件時(shí)，所打開(kāi)的窗口是(C)。 A、工程資源管理器窗口B、工具箱窗口C、代碼窗口D、屬性窗口34、Visual Basic是一種面向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語(yǔ)言，采取了的編程機(jī)制是(A)。 A、事件驅(qū)動(dòng)B、按過(guò)程順序執(zhí)行C、從主程序開(kāi)始執(zhí)行D、按模塊順序執(zhí)行35、用來(lái)設(shè)置粗體字的屬性是(C)。 A、FontItalicB、FontNameC、FontBoldD、FontSize36、如果一個(gè)工程含有多個(gè)窗體及標(biāo)準(zhǔn)模塊，則

12、以下敘述中錯(cuò)誤的是(A)。 A、如果工程中含有Sub Main過(guò)程，則程序一定首先執(zhí)行該過(guò)程B、不能把標(biāo)準(zhǔn)模塊設(shè)置為啟動(dòng)模塊C、用Hide方法只是隱藏一個(gè)窗體，不能從內(nèi)存中清除該窗體D、任何時(shí)刻最多只有一個(gè)窗體是活動(dòng)窗體37、為了把焦點(diǎn)移到文本框，所使用的方法是(A)。 A、SetFocusB、VisibleC、RefreshD、GetFocus38、INT（100*RND）產(chǎn)生的隨機(jī)整數(shù)的閉區(qū)間是（A）。 A、0，99 B、1，100 C、0，100 D、1，9939、如果要在命令按鈕上顯示圖形文件，應(yīng)設(shè)置命令按鈕的(B)。 A、Style屬性和Graphics屬性B、Style屬性和Pic

13、ture屬性C、Caption屬性D、Graphics屬性40、若要使命令按鈕不可操作，要對(duì)(A)屬性進(jìn)行設(shè)制。 A、EnabledB、VisibleC、BackColorD、Caption41、假定窗體的名稱為Form1,則把窗體的標(biāo)題設(shè)置為“VB_Test”的語(yǔ)句為(B)。 A、Form1=“VB_Test”B、Form1.Caption=“VB_Test”C、Form1.Text=“VB_Test”D、F=“VB_Test”42、以下敘述中錯(cuò)誤的是(A)。 A、在工程資源管理器窗口中只能包含一個(gè)工程文件及屬于該工程的其他文件 B、以.BAS為擴(kuò)展名的文件是標(biāo)準(zhǔn)模塊文件C

14、、窗體文件包含該窗體及其控件的屬性D、一個(gè)工程中可以含有多個(gè)標(biāo)準(zhǔn)模塊文件43、要使文本框獲得輸入焦點(diǎn)，則應(yīng)采用文本框控件的哪個(gè)方法(A)。 A、GotFocusB、LostFocusC、KeyPressD、SetFocus44、以下不能在“工程資源管理器”窗口中列出的文件類型是(B)。 A、.basB、.resC、.frmD、.ocx45、剛建立一個(gè)新的標(biāo)準(zhǔn)EXE工程后，不在工具箱中出現(xiàn)的控件是(C)。 A、單選按鈕B、圖片框C、通用對(duì)話框D、文本框46、以下敘述中錯(cuò)誤的是(B)。 A、雙擊鼠標(biāo)可以觸發(fā)DblClick事件B、窗體或控件的事件的名稱可以由編程人員確定C、移動(dòng)鼠標(biāo)時(shí)，會(huì)觸發(fā)Mou

15、seMove事件D、控件的名稱可以由編程人員設(shè)定47、以下能夠觸發(fā)文本框Change事件的操作是(D)。 A、文本框失去焦點(diǎn)B、文本框獲得焦點(diǎn)C、設(shè)置文本框的焦點(diǎn)D、改變文本框的內(nèi)容48、以下敘述中錯(cuò)誤的是(C)。 A、一個(gè)工程中只能有一個(gè)Sub Main過(guò)程B、窗體的Show方法的作用是將指定的窗體裝入內(nèi)存并顯示該窗體C、窗體的Hide方法和Unload方法的作用完全相同D、若工程文件中有多個(gè)窗體，可以根據(jù)需要指定一個(gè)窗體為啟動(dòng)窗體49、語(yǔ)句Print Abs(-62)+Int(-62)的輸出結(jié)果是(A)。 A、0B、1C、-1D、-7250、如果將布爾常量值TRUE賦值給一個(gè)整型變量，則整

16、型變量的值為(B)。 A、0B、-1C、TRUED、FALSE51、函數(shù)String(n, "str")的功能是(B)。 A、把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串B、返回由n個(gè)字符組成的字符串C、從字符串中取出n個(gè)字符D、從字符串中第n個(gè)字符的位置開(kāi)始取子字符串52、語(yǔ)句Print Format(“Hello World”,“>”)的輸出結(jié)果是(C)。 A、hello WORLDB、hello worldC、HELLO WORLDD、HELLO world53、聲明符號(hào)常量應(yīng)該用關(guān)鍵字(B)。 A、StaticB、ConstC、PrivateD、Variant54、要強(qiáng)制顯示聲明

17、變量，可在窗體模塊或標(biāo)準(zhǔn)模塊的聲明段中加入語(yǔ)句(B)。 A、Option Base 0B、Option ExplicitC、Option Base 1D、Option Compare55、下列可作為Visual Basic變量名的是(D)。 A、A#AB、4AC、?xyD、constA56、設(shè)a=10，b=5，c=1，執(zhí)行語(yǔ)句Print a > b > c后，窗體上顯示的是(B)。 A、TrueB、FalseC、1D、出錯(cuò)信息57、執(zhí)行x$=String(6, "124abc")后，x的值是(B)。 A、124abcB、111111C、124D、abc58、設(shè)a

18、=6，則執(zhí)行 x=IIf(a>5,-1,0)后，x 的值為（D） A、5B、6 C、0 D、-159、執(zhí)行語(yǔ)句：c$=“Glad”& Mid$(“Nice to meet you”,5,3)，則變量c$的值為(C)。 A、Nice to meet youB、Glad Nice to meet youC、Glad toD、Glad 60、下面(D)是合法的字符常數(shù)。 A、ABC$B、" ABC"C、' ABC'D、ABC61、對(duì)于語(yǔ)句If x=1 Then y=1，下列說(shuō)法正確的是（C）。 A、x=1 和 y=1 均為賦值語(yǔ)句B、x=1 和 y=

19、1 均為關(guān)系表達(dá)式C、x=1 為關(guān)系表達(dá)式， y=1 為賦值語(yǔ)句D、x=1 為賦值語(yǔ)句， y=1 為關(guān)系表達(dá)式62、設(shè)有聲明：Dim X As Integer,如果Sgn(X) 的值為-1，則X的值是(D)。 A、任何整數(shù)B、0C、等于0的整數(shù)D、小于0的數(shù)63、在一行內(nèi)寫(xiě)多條語(yǔ)句時(shí)，每個(gè)語(yǔ)句之間用(B)符號(hào)分隔。 A、，B、：C、D、；64、從鍵盤(pán)上輸入兩個(gè)字符串，分別保存在變量str1、str2中。確定第二個(gè)字符串在第一個(gè)字符串中起始位置的函數(shù)是(D)。 A、LeftB、MidC、StringD、Instr65、設(shè)S="中華人民共和國(guó)"，表達(dá)式Left（S,1）+Rig

20、ht（S,1）+Mid（S,3,2）的值為（B） A、"中華民國(guó)"B、"中國(guó)人民"C、"中共人民" D、"人民共和"66、下列可作為 Visual Basic中的變量名的是(A)。 A、FilenameB、A(A+B)C、254DD、Print67、下面(A)是合法的變量名。 A、X_yzB、123abcC、IntegerD、X-Y68、以下變量命名非法的是（C）。 A、xyz123B、printaaC、booleanD、Bernald69、設(shè)有變量聲明:Dim TestDate As Date,為變量TestDa

21、te正確賦值的表達(dá)方式是(A)。 A、TextDate=#1/1/2002#B、TestDate=#“1/1/2002”#C、TextDate=date(“1/1/2002”)D、TestDate=Format(“m/d/yy”,“1/1/2002”)70、設(shè)a=2,b=3,c=4,d=5，表達(dá)式a>b AND c<=d的值是(B)。 A、TrueB、False C、-1D、171、表達(dá)式6*8 Mod 9的值是(B)。 A、4 B、3C、6D、772、 假設(shè)變量bool_x是一個(gè)布爾型(邏輯型)的變量，則下面正確的賦值語(yǔ)句是（D）A、bool_x = "False&qu

22、ot; B、bool_x = .False. C、bool_x = #False# D、bool_x = False73、設(shè)a=“Visual Basic”，下面使b=“Basic”的語(yǔ)句是(B)。 A、b=Left(a,8,12)B、b=Mid(a,8,5)C、b=Rigth(a,5,5)D、b=Left(a,8,5)74、語(yǔ)句Print Format$(32548.5,“#,#.#”)的輸出結(jié)果是（B）。 A、32548.5B、32,548.5C、032,548.50D、32,548.5075、以下聲明語(yǔ)句中錯(cuò)誤的是(D)。 A、Const var1=123 B、Dim var2 = &#

23、39;ABC'C、Dim x_y_z%D、Static var3 As Integer76、可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是(C)。 A、LtrimB、RtrimC、TrimD、Mid77、下列可為合法變量名的是(D)。A、Integer B、FalseC、publicD、thanksgiving78、變量未賦值時(shí)，數(shù)值型變量的值為( A)。 A、0B、空C、1D、無(wú)任何值79、表達(dá)式16/4-25*8/4 Mod 52的值為(B)。A、14B、4C、20D、2確的80、下面If語(yǔ)句統(tǒng)計(jì)滿足性別為男、職稱為副教授以上、年齡小于40歲條件的人數(shù)，不正語(yǔ)句是（D）。A、If sex

24、="男"And age40 And (duty="教授"Or duty="副教授") Then n=n+1B、If sex="男"And age40 And InStr(duty,"教授")0 Then n=n+1C、If sex="男"And age40 And Right(duty,2)= "教授" Then n=n+1D、If sex="男"And age40 And duty="教授"And duty=&qu

25、ot;副教授" Then n=n+181、設(shè)a=3,b=5，則以下表達(dá)式值為真的是(B)。 A、a>=b And b>10B、(a>b)Or(b>0)C、(a<0)or(b<0)D、(-3+5>a)And(b>0)82、執(zhí)行語(yǔ)句a=InputBox("Today","Tomorrow","Yesterday","Day before yesterday",5), 將顯示一個(gè)輸入對(duì)話框，在對(duì)話框的輸入?yún)^(qū)中顯示的信息是(A)。 A、TodayB、Tomorrow

26、C、YesterdayD、Day before Yesterday83、VB提供了結(jié)構(gòu)化程序設(shè)計(jì)的3種基本結(jié)構(gòu)，這3種基本結(jié)構(gòu)是（B）。 A、遞歸結(jié)構(gòu)，分支結(jié)構(gòu)，循環(huán)結(jié)構(gòu)B、選擇結(jié)構(gòu)，過(guò)程結(jié)構(gòu)，順序結(jié)構(gòu)C、過(guò)程結(jié)構(gòu)，輸入、輸出結(jié)構(gòu)，轉(zhuǎn)向結(jié)構(gòu)D、分支結(jié)構(gòu)，循環(huán)結(jié)構(gòu)，順序結(jié)構(gòu)84、下面If語(yǔ)句統(tǒng)計(jì)滿足性別為男、職稱為副教授以上、年齡小于40歲條件的人數(shù)，不正確的語(yǔ)句是（D）。 A、If sex=“男”And age40 And InStr(duty,“教授”)0 Then n=n+1B、If sex=“男”And age40 And (duty=“教授”O(jiān)r duty=“副教授”) Then n=

27、n+1C、If sex=“男”And age40 And Right(duty,2)= “教授” Then n=n+1D、If sex=“男”And age40 And duty=“教授”And duty=“副教授” Then n=n+185、當(dāng)語(yǔ)句w=IIf(4>10,”Red”,“Green”)執(zhí)行后，變量w中的值是（C）。 A、NullB、“Red”C、“Green”D、-186、賦值語(yǔ)句：a=123+MID(“123456”,3,2)執(zhí)行后，a變量中的值是（D）。 A、“12334”B、123C、12334D、15787、設(shè)有語(yǔ)句x=InputBox(“AAAA”，“BBBB”，

28、“”),程序運(yùn)行后，所產(chǎn)生的對(duì)話框的標(biāo)題應(yīng)為(C)。 A、AAAAB、空C、BBBBD、出錯(cuò)，不能產(chǎn)生對(duì)話框88、下面正確的賦值語(yǔ)句是（C）。 A、x+y=30B、y=*r*rC、y=x+30D、3y=x89、VB提供了結(jié)構(gòu)化程序設(shè)計(jì)的三種基本結(jié)構(gòu)，三種基本結(jié)構(gòu)是(D)。 A、遞歸結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)B、選擇結(jié)構(gòu)、過(guò)程結(jié)構(gòu)、順序結(jié)構(gòu)C、過(guò)程結(jié)構(gòu)、輸入輸出結(jié)構(gòu)、轉(zhuǎn)向結(jié)構(gòu)D、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)、順序結(jié)構(gòu)90、下面程序段求兩個(gè)數(shù)中的大數(shù)，不正確的是（D）。 A、Max=IIf(xy,x,y)B、If xy Then Max=x Else Max=y C、Max=x：If y=x Then Max

29、=yD、If yx Then Max=y ：Max=x91、下列程序段： Dim x If x Then Print x Else Print x+1 運(yùn)行后，顯示的結(jié)果是（A）。 A、1B、0C、-1D、出錯(cuò)92、以下不屬于vb的三種基本結(jié)構(gòu)的是（C）？ A、順序結(jié)構(gòu)B、選擇結(jié)構(gòu)C、遞歸結(jié)構(gòu)D、循環(huán)結(jié)構(gòu)93、語(yǔ)句If x=1 Then y=1,下列說(shuō)法正確的是（C）。 A、x=1和y=1均為賦值語(yǔ)句B、x=1和y=1均為關(guān)系表達(dá)式C、x=1為關(guān)系表達(dá)式，y=1為賦值語(yǔ)句D、x=1為賦值語(yǔ)句， y=1為關(guān)系表達(dá)式94、賦值語(yǔ)句：a=123 & MID(“123456”,3,2)執(zhí)行后，

30、a變量中的值是（C）。 A、“12334”B、123C、12334D、15795、下面程序段顯示的結(jié)果是（A）。 Dim x x=Int(Rnd)+5 Select Case x Case 5 “優(yōu)秀” Case 4 Print“良好” Case 3 Print“通過(guò)” Case Else Print“不通過(guò)” End Select A、優(yōu)秀B、良好C、通過(guò)D、不通過(guò)96、為了給x,y,z這3個(gè)變量賦初值1，下面正確的賦值語(yǔ)句是（A）。 A、x=1：y=1：z=1 B、x=1,y=1,z=1 C、x=y=z=1 D、xyz=197、下列語(yǔ)句正確的是（C） A、If AB Then Print

31、"A不等于B" B、If A<>B Then Printf A不等于BC、If A<>B Then Print "A不等于B" D、If AB Print "A不等于B"98、設(shè)有語(yǔ)句x$=InputBox(“輸入數(shù)值”，“0”，“示例”),程序運(yùn)行后，如果從鍵盤(pán)上輸入數(shù)值10并按回車(chē)鍵，則下列敘述中正確的是(D)。 A、變量X的值是數(shù)值10B、在InputBox對(duì)話框標(biāo)題欄中顯示的是“示例”C、0是默認(rèn)值D、變量X的值是字符串“10”99、運(yùn)行下列程序段后，顯示的結(jié)果為（B） J1=4: J2=9 If J1

32、<J2 Then Print J2 Else Print J1 A、4 B、9 C、13 D、49100、InputBox函數(shù)返回值的類型為(B)。 A、數(shù)值B、字符串C、變體D、數(shù)值或字符串（視輸入的數(shù)據(jù)而定）101、一個(gè)數(shù)組說(shuō)明為Dim a(0 to 5，1 to 5) As Integer，則該數(shù)組共有（C） 個(gè)元素。 A、25 B、36C、30D、不確定102、數(shù)組聲明語(yǔ)句Dim a(2 to 3, -2 to 2,3 to 5)中，數(shù)組a包含元素的個(gè)數(shù)為(C)。 A、120B、75C、30D、13103、如果在上題語(yǔ)句前加入 Option Base 1，則該數(shù)組共有（D） 個(gè)元

33、素。 A、15B、16C、13 D、不確定104、如果有聲明 Dim a(15) As Integer，則該數(shù)組共有（B）個(gè)元素。 A、15B、16C、13D、不確定105、一個(gè)數(shù)組說(shuō)明為Dim a(5，1 to 5) As Integer，則該數(shù)組共有（C） 個(gè)元素。 A、25 B、36 C、30 D、不確定 106、在VB中，默認(rèn)的數(shù)組下標(biāo)的下界從0開(kāi)始，要想在通用聲明段界定下界，則應(yīng)使用（A）。 A、Option Base B、Option ExplicitC、ExplicitD、Low Base107、如下數(shù)組聲明語(yǔ)句，正確的是(B)。 A、Dim a3, 4 as IntegerB、

34、Dim a(3, 4) as IntegerC、Dim a(n, n) as IntegerD、Dim a34) as Integer108、賦給一個(gè)數(shù)組的數(shù)據(jù)的值的類型一定要（A）。 A、相同 B、不相同 C、兩可 D、都不對(duì) 109、數(shù)組的下標(biāo)可取的變量類型是（A）。 A、數(shù)值型 B、字符型 C、日期型 D、可變型110、數(shù)組聲明語(yǔ)句Dim a(0 to 3, -2 to 2,0 to 5)中，數(shù)組a包含元素的個(gè)數(shù)為(A)。 A、120B、75C、60D、13111、假定有如下的Sub過(guò)程： Sub S (x As Single, y As Single) t = x x = t / y

35、y = t Mod y End Sub 在窗體上添加一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() Dim a As Single Dim b As Single a = 5: b = 4 S a, b Print a, b End Sub 程序運(yùn)行時(shí)，單擊命令按鈕得到的結(jié)果（D）。 A、5 4B、1 1C、1.25 4D、1.25 1112、用以下方式聲明的變量，（B）可以在整個(gè)程序中通用？ A、在窗體模塊用Dim進(jìn)行聲明B、在窗體模塊用Public進(jìn)行聲明C、在窗體模塊用Private進(jìn)行聲明D、在窗體模塊用Static進(jìn)行聲明113、在窗體

36、上添加一個(gè)命令按鈕和三個(gè)標(biāo)簽，編寫(xiě)事件過(guò)程： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer N=10: z=N+z: y=y+z: x=x+z Label1.Caption = x Label2.Caption = y Label3.Caption = z End Sub 程序運(yùn)行后，連續(xù)三次單擊命令按鈕，則三個(gè)標(biāo)簽中顯示的內(nèi)容分別是（A）。 A、10 10 10B、30 30 30C、30 30 10D、10 30 30114、以下敘述中錯(cuò)誤的是(D)。 A、如果過(guò)

37、程被定義為Static類型，則該過(guò)程中的局部變量都是Static類型B、Sub過(guò)程中不能嵌套定義Sub過(guò)程C、Sub過(guò)程中可以嵌套調(diào)用Sub過(guò)程D、事件過(guò)程可以像通用過(guò)程一樣由用戶定義過(guò)程名115、在在窗體上添加一個(gè)命令按鈕Command1和一個(gè)文本框Text1，然后編寫(xiě)如 下事件過(guò)程： Private Sub Command1_Click() Dim x As Integer, y As Integer, z As Integer x = 5 y = 7 z = 0 Text1.Text = "" Call p1(x, y, z) Text1.Text = Str(z)

38、End Sub Private Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + b End Sub 程序運(yùn)行后，單擊命令按鈕得到的結(jié)果是（A）。 A、12B、0C、Str(z)D、沒(méi)有顯示結(jié)果116、如果在程序中要將a定義為靜態(tài)變量，且為整型數(shù)，則應(yīng)使用的語(yǔ)句是：（B） A、Redim a As IntegerB、Static a As IntegerC、Public a As Integer D、Dim a As Integer117、以下程序的運(yùn)行結(jié)果是（C） Sub s1(b() As Intege

39、r) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer For i = 1 To 4 a(i) = i + 5 Next i s1 a() For i = 1 To 4 Print a(i) Next i End Sub A、12 14 16 18B、6 7 8 9C、2 4 6 8D、1 2 3 4118、以下程序的運(yùn)行結(jié)果是（D）。 Function f(m As Integer) As Integer b = 1 Static c As Inte

40、ger b = b + 1 c = c + 1 f = m * b * c End Function Private Sub Command1_Click() Dim a As Integer a = 2 Sum = 0 For i = 1 To 3 Sum = Sum + f(a) Next i Print Sum End Sub A、12B、28C、32D、24119、下列程序輸出結(jié)果（C）。 Private Sub Command1_Click() For i = 1 To 10 GetValue i Next i Print GetValue(i) End Sub Private Fu

41、nction GetValue(ByVal a As Integer) Static S As Integer S = S + a GetValue = S End Function A、10B、65C、66D、11120、在過(guò)程定義的變量，若希望在離開(kāi)該過(guò)程后，還能保存過(guò)程中局部變量的值，則應(yīng)使用(D)關(guān)鍵字在過(guò)程中定義局部變量。 A、DimB、PrivateC、PublicD、Static121、在過(guò)程定義中用(C)表示形參的傳值。 A、VarB、ByDefC、ByValD、Value122、在在窗體上添加一個(gè)命令按鈕Command1和兩個(gè)名稱分別為L(zhǎng)abel1和 Label2的標(biāo)簽，然后

42、編寫(xiě)如下事件過(guò)程： Private X As Integer Private Sub Command1_Click() X = 5: y = 3 Call proc(X, y) Label1.Caption = X Label2.Caption = y End Sub Sub proc(ByVal a As Integer, ByVal b As Integer) X = a * a y = b + b End Sub 程序運(yùn)行后，單擊命令按鈕，則兩個(gè)標(biāo)簽label1和label2中顯示的內(nèi)容分別是（B）。 A、25,3B、25,6C、5,3D、5,6123、以下程序的運(yùn)行結(jié)果是（C）。 Di

43、m x As Integer, y As Integer, z As Integer Sub s1(a As Integer, b As Integer) Dim c As Integer a = 2 * a b = b + 2 c = a + b End Sub Sub s2(a As Integer, ByVal b As Integer) Dim c As Integer a = 2 * a b = b + 2 c = a + b End Sub Private Sub Command1_Click() x = 4：y = ：4 z = 6 Call s1(x, y) Print x +

44、 y + z Call s2(x, y) Print x + y + z End Sub A、24 28 B、20 28C、20 18D、20 20124、以下關(guān)于過(guò)程及過(guò)程參數(shù)的描述中，錯(cuò)誤的是(C)。 A、過(guò)程的參數(shù)可以是控件名稱B、用數(shù)組作為過(guò)程的參數(shù)時(shí)，使用的是“傳地址”方式C、只有函數(shù)過(guò)程能夠?qū)⑦^(guò)程中處理的信息傳回到調(diào)用的程序中D、窗體可以作為過(guò)程的參數(shù)125、以下屬于Visual Basic合法的數(shù)組元素是（C） A、x8 B、x8C、s(0)D、v8126、下列敘述中正確的是(C)。 A、在窗體的Form_Load事件過(guò)程中定義的變量是全局變量B、局部變量的作用域可以超出所定義的

45、過(guò)程C、在某個(gè)Sub過(guò)程中定義的局部變量可以與其它事件過(guò)程中定義的局部變量同名，但其作用域只限于該過(guò)程D、在調(diào)用過(guò)程時(shí)，所有局部變量被系統(tǒng)初始化為0或空字符串127、假定有以下函數(shù)過(guò)程： Function Fun(S As String) As String Dim s1 As String For i = 1 To Len(S) s1 = UCase(Mid(S, i, 1) + s1 Next i Fun = s1 End Function 在窗體上添加一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() Dim str1 As String, s

46、tr2 As String str1 = InputBox("請(qǐng)輸入一個(gè)字符串") str2 = Fun(str1) Print str2 End Sub 程序運(yùn)行后，單擊命令按鈕，如果在輸入對(duì)話框中輸入字符串“abcdefg”，單擊"確定"按鈕后程序在窗體上輸出結(jié)果（D）。 A、abcdefgB、gfedcbaC、GFEDCBAD、ABCDEFG128、若已編寫(xiě)了一個(gè)Sort子過(guò)程，在該工程中有多個(gè)窗體，為了方便的調(diào)用Sort子過(guò)程，應(yīng)該將該過(guò)程放在(B)。 A、窗體模塊B、標(biāo)準(zhǔn)模塊C、類模塊D、工程129、下面子過(guò)程語(yǔ)句說(shuō)明合法的是（D） A、Sub

47、 f1（ByVal n() As Integer）B、Function f1（f1 As Integer） As IntegerC、Sub f1（n() As Integer）As IntegerD、Function f1（ByVal n As Integer）As Integer130、在過(guò)程定義的變量，若希望在離開(kāi)該過(guò)程后，還能保存過(guò)程中局部變量的值，則應(yīng)使用(D)關(guān)鍵字在過(guò)程中定義局部變量。 A、DimB、PrivateC、PublicD、Static131、在窗體上畫(huà)三個(gè)單選按鈕，組成一個(gè)名為chkOption的控件數(shù)組。用于標(biāo)識(shí)各個(gè)控件數(shù)組元素的參數(shù)是(D)。 A、TagB、Inde

48、xC、ListIndexD、Name132、假如列表框（List1）有四個(gè)數(shù)據(jù)項(xiàng)，那么把數(shù)據(jù)項(xiàng)“China”添加到列表框的最后，應(yīng)使用(D)語(yǔ)句。 A、List1.AddItem 3, "China" B、List1.AddItem "China", List1.List1Count-1C、List1.AddItem "China", 3D、List1.AddItem "China"133、如果列表框（List1）中沒(méi)有被選定的項(xiàng)目，則執(zhí)行List1.RemoveItem List1.ListIndex語(yǔ)句的結(jié)果是

49、(D)。 A、移去第一項(xiàng)B、移去最后一項(xiàng)C、移去最后加入列表的一項(xiàng)D、以上都不對(duì)134、以下敘述中錯(cuò)誤的是(C)。 A、在KeyUp和KeyDown事件過(guò)程中，從鍵盤(pán)上輸入A或a被視作相同的字母(即具有相同的KeyCode) B、在KeyUp和KeyDown事件過(guò)程中，將鍵盤(pán)上的“1”和右側(cè)小鍵盤(pán)上的“1”視作不同的數(shù)字(具有不同的KeyCode) C、KeyPress事件中不能識(shí)別鍵盤(pán)上某個(gè)鍵的按下與釋放D、KeyPress事件中可以識(shí)別鍵盤(pán)上某個(gè)鍵的按下與釋放135、設(shè)組合框Combo1中有3個(gè)項(xiàng)目，則以下能刪除最后一項(xiàng)的語(yǔ)句是(B)。 A、Combo1.RemoveItem TextB、

50、Combo1.RemoveItem 2C、Combo1.RemoveItem 3D、Combo1.RemoveItem Combo1.Listcount136、下列控件中，沒(méi)有Caption屬性的是(B)。 A、框架B、列表框C、復(fù)選框D、單選按鈕137、引用列表框（List1）最后一個(gè)數(shù)據(jù)項(xiàng)應(yīng)使用的表達(dá)式是（C） A、List1.List(List1.ListCount)B、List1.List(ListCount) C、List1.List(List1.ListCount-1)D、List1.List(ListCount-1)138、窗體的MouseDown事件過(guò)程Form_MouseDo

51、wn (Button As Integer, Shift As Integer, X As Single, Y As Single)有4個(gè)參數(shù)，關(guān)于這些參數(shù)，正確的描述是(A)。 A、通過(guò)Button參數(shù)判定當(dāng)前按下的是哪一個(gè)鼠標(biāo)鍵B、Shift參數(shù)只能用來(lái)確定是否按下Shift鍵C、Shift參數(shù)只能用來(lái)確定是否按下Alt和Ctrl鍵D、參數(shù)x,y用來(lái)設(shè)置鼠標(biāo)當(dāng)前位置的坐標(biāo)139、復(fù)選框的Value屬性為1時(shí)，表示(B)。 A、復(fù)選框未被選中B、復(fù)選框被選中C、復(fù)選框內(nèi)有灰色的勾D、復(fù)選框操作有錯(cuò)誤。140、引用列表框的最后一項(xiàng)應(yīng)使用(A)。 A、List1.List(List1.ListC

52、ount-1)B、List1.List(List1.ListCount)C、List1.List(ListCount)D、List1.List(ListCount-1)141、設(shè)窗體上有一個(gè)列表框控件List1，且其中含有若干列表項(xiàng)。則以下能表示當(dāng)前被選中的列表項(xiàng)內(nèi)容的是(D)。 A、List1.List B、List1.ListIndexC、List1.Index D、List1.Text142、表示滾動(dòng)條控件取值范圍最大值的屬性是(A)。 A、MaxB、LargeChangeC、ValueD、Max-Min143、為了在按下Esc鍵時(shí)執(zhí)行某個(gè)命令按鈕的Click事件過(guò)程，需要把該命令按鈕的一個(gè)屬性設(shè)置為T(mén)rue，這個(gè)屬性是(D)。 A、ValueB、DefaultC、CancelD、Enabled144、假如列表框（List1）有四個(gè)數(shù)據(jù)項(xiàng)，那么把數(shù)據(jù)項(xiàng)“China”添加到列表框的最后，應(yīng)使用語(yǔ)句(D)。 A、List1.AddItem 3, "China"B、List1.AddItem "China"