大學(xué)vb考試題庫大全

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

2、標(biāo)題欄中顯示體VisualBasic窗體 窗體 A 、Form1.Name=VisualBasicB、Form1.Title=VisualBasicC、Form1.Caption=VisualBasic窗體 D、Form1.Text=VisualBasic 窗體 5、為了裝入一Visual Basic應(yīng)用程序，應(yīng)當(dāng)個(gè)（ D ）.frmA 、只裝入窗體文件（）.vbpB、只裝入工程文件（）C、分別裝入工程文件和標(biāo)準(zhǔn)模塊文件.bas（）D、分別裝入工程文件、窗體文件和標(biāo)準(zhǔn)模塊文 件A 、標(biāo)題欄B、菜單欄C、狀態(tài)欄9、以下敘述中錯(cuò)誤的是(C) 。A 、 VisualBasic是事件驅(qū)動型可視化編程工

3、具B、 Visual應(yīng)用程序不具有明顯的開始和結(jié)束語Basic句C、 Visual Basic工具箱中的所有控件都具有寬度（D、 Visual Basic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置10、要使 Print方法在 Form_Load 事件中起作用的A 、D、工具欄Width ）和高度（ Height 屬性要對窗體BackcolorB、 ForeColorC、 AutoRedrawD 、 BackStyle（C） 屬性進(jìn)行設(shè)6、賦給一個(gè)數(shù)組的數(shù)據(jù)類型一定要（A ）。A 、相同 B 、不相同C、兩可D、都不對7、下面正確的賦值語句是（C）。A 、 x+y=30B、 y= *r*rC、 y=x+3

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

5、景位圖B、在設(shè)計(jì)階段放置的控件C、在運(yùn)行階段產(chǎn)生的圖形和文字D、以上均可14、設(shè) x=3,y=5, 則以下表達(dá)式值為真的是 (C)B 、 (xx) And (y0) (y0)C、 (xy) Or(y0)D 、 x=y And y1015、為了防止用戶隨意將光標(biāo)置于控件之上，應(yīng)將進(jìn) 行 (D) 設(shè)置 A 、將控件的 TabIndex 屬性設(shè)置為B、將控件的TabStop屬性設(shè)置為TrueC、將控件的TabStop屬性設(shè)置為FalseD、將控件的Enabled屬性設(shè)置為False(D) 事件中判Enter鍵，應(yīng)在文本框16、要判斷在文本框是否按了的斷。A 、 ChangeB、KeyDownC、 C

6、lickD、KeyPress17、以下關(guān)于焦點(diǎn)的敘述中，錯(cuò)誤的是(A) 。TabStop 屬性為 False ，則不能接收從鍵盤上輸入的0A 、如果文本框的 數(shù)據(jù)B、當(dāng)文本框失去焦點(diǎn)時(shí)，觸發(fā)LostFocus 事件C、當(dāng)文本框的 Enabled 屬性為 False 時(shí)，其 Tab 順序不起作用D、可以用 TabIndex 屬性改變 Tab 順序Enabled 屬性設(shè)為 False ，則18、如果文本框的 (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í)窗體不會接收到的事件是 (C) 。(B)A 、 MouseDown B 、 MouseUp C、 LoadD 、 Click20、圖像框有一個(gè)屬性，可以自動調(diào)整圖形的大小，以適應(yīng)圖像框的尺寸，這個(gè)屬性是 A 、 AutosizeB、 StretchC、 AutoRedrawD、 Appearance21、為了防止用戶隨意將光標(biāo)置于控件之上，應(yīng)設(shè)置的屬性是(D) 。A 、將控件的 TabIndex 屬性設(shè)置為 0B、將控件的 TabStop 屬

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

9、動執(zhí)行窗體的(A) 事件過程。B 、A 、 LoadC、 Unload25、窗體設(shè)計(jì)器是用來設(shè)計(jì)A 、應(yīng)用程序的代碼段C、對象的屬性26、 Visual Basic是取了A 、事件驅(qū)動ClickD 、 GotFocus(B) 。B、應(yīng)用程序的界面(A) 的編程機(jī) 制。D 、對象的事件 向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語言，采B 、按過程順序執(zhí)行C、從主程序開始執(zhí)行D、按模塊順序執(zhí)行27、確定一個(gè)控件在窗體上的位置的屬性是(D) 。A 、 Width 或 HeightB 、 Width 和 HeightC、 Top 或 LeftD 、 Top 和 Left28、如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是 (

10、A) 。A 、 Caption B 、 NameC、 BackColorD 、 BorderStyle29、以下敘述中錯(cuò)誤的是 (C) 。A 、打開一個(gè)工程文件時(shí)，系統(tǒng)自動裝入與該工程有關(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、移動鼠標(biāo)時(shí)，會觸發(fā)MouseMove 事件D、控件的名稱可以由編程人員設(shè)定31、在 Visual

11、 Basic中最基本的對象是 (C) 。它是應(yīng)用程序的基石，是其他控件的容器。A 、文本框B 、命令按鈕C、窗體D 、標(biāo)簽32、以下敘述中正確的是 (A) 。A 、窗體的 Name 屬性指定窗體的名稱，用來標(biāo)識一個(gè)窗體B、窗體的 Name 屬性的值是顯示在窗體標(biāo)題欄中的文本C、可以在運(yùn)行期間改變對象的Name 屬性的值D、對象的 Name 屬性值可以為空33、在設(shè)計(jì)階段，當(dāng)雙擊窗體上的某個(gè)控件時(shí)，所打開的窗口是(C)A 、工程資源管理器窗口B、工具箱窗口C、代碼窗口D、屬性窗口(A)(A)34、Visual Basic是一種面向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語言，采取了的編程機(jī)制是A 、事件驅(qū)動B 、按

12、過程順序執(zhí)行C、從主程序開始執(zhí)行D、按模塊順序執(zhí)行35、用來設(shè)置粗體字的屬性是(C)。A 、 FontItalicB、 FontNameC、 FontBoldD 、 FontSize36、如果一個(gè)工程含有多個(gè)窗體及標(biāo)準(zhǔn)模塊，則以下敘述中錯(cuò)誤的 是A 、如果工程中含有 Sub Main 過程，則程序一定首先執(zhí)行該過程B、不能把標(biāo)準(zhǔn)模塊設(shè)置為啟動模塊C、用 Hide 方法只是隱藏一個(gè)窗體，不能從內(nèi)存中清除該窗體D、任何時(shí)刻最多只有一個(gè)窗體是活動窗體37、為了把焦點(diǎn)移到文本框，所使用的方法是(A)A 、 SetFocusB、 VisibleC、 RefreshD、 GetFocus38、 INT(

13、100*RND)產(chǎn)生的隨機(jī)整數(shù)的閉區(qū)間是( A )。A、0 ，99B 、 1 ， 100C、 0 ， 100D 、 1 ， 99(B )39、如果要在命令按鈕上顯示圖形文件，應(yīng)設(shè)置命令按鈕的 A 、 Style 屬性和 Graphics 屬性 B 、 Style 屬性和 Picture 屬性B 、 VisibleD 、 CaptionForm1, 則把窗體的標(biāo)題設(shè)置為“ VB_Test ”的語句為(B)C、 Caption 屬性40、若要使命令按鈕不可操作，要對 A 、 EnabledC、 BackColor41、假定窗體的名稱為 A 、 Form1= “ VB_TestD、Graphics

14、屬性(A) 屬性進(jìn)行設(shè)制。B、 Form1.Caption= “ VB_TestC、 Form1.Text= “ VB_Test42、以下敘述中錯(cuò)誤的是 (A)” D 、F= “ VB_Test。A 、在工程資源管理器窗口中只能包含一個(gè)工程文件及屬于該工程的其他文件B、以 .BAS 為擴(kuò)展名的文件是標(biāo)準(zhǔn)模塊文件C、窗體文件包含該窗體及其控件的屬性D、一個(gè)工程中可以含有多個(gè)標(biāo)準(zhǔn)模塊文件43、要使文本框獲得輸入焦點(diǎn)，則應(yīng)采用文本框控件的哪個(gè)方 法 (A) 。 A 、GotFocusB 、 LostFocusC、KeyPressD 、 SetFocus44、以下不能在“工程資源管理

15、器”窗口中列出的文件類型是(B) 。A 、 .bas B 、 .resC、 .frmD、 .ocx45、剛建立一個(gè)新的標(biāo)準(zhǔn)EXE 工程后，不在工具箱中出現(xiàn)的控件是 (C) 。A 、單選按鈕B、圖片框C、通用對話框D 、文本框(B)46、以下敘述中錯(cuò)誤的是。A 、雙擊鼠標(biāo)可以觸發(fā) DblClick 事件B、窗體或控件的事件的名稱可以由編程人員確定C、移動鼠標(biāo)時(shí)，會觸發(fā)MouseMove 事件D、控件的名稱可以由編程人員設(shè)定47、以下能夠觸發(fā)文本框 A 、文本框失去焦點(diǎn) C、設(shè)置文本框的焦點(diǎn)48、以下敘述中錯(cuò)誤的是 A 、一個(gè)工程中只能有一 個(gè)Change 事件的操作是 (D)B、文本框獲得焦點(diǎn)

16、D 、改變文本框的內(nèi)容 (C)。Sub Main 過程B、窗體的 Show 方法的作用是將指定的窗體裝入內(nèi)存并顯示該窗 體 C、窗體的 Hide 方法和 Unload 方法的作用完全相同D、若工程文件中有多個(gè)窗體，可以根據(jù)需要指定一個(gè)窗體為啟動窗體的輸出結(jié)果是 (A)49、語句 Print Abs(-62)+Int(-62)A、0B、1C、-1D、-7250、如果將布爾常量值TRUE 賦值給一個(gè)整型變量，則整型變量的值為(B)B、-1C、TRUED 、 FALSE51、函數(shù) String(n, str) 的功能是 (B)A 、把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串B、返回由 n 個(gè)字符組成的字符串C、從字符

17、串中取出 n 個(gè)字符D、從字符串中第 n 個(gè)字符的位置開始取子字符串52、語句 Print Format( “ Hello World ” , “ ” ) 的輸出結(jié)果是(B) 。A 、 helloB 、 helloWORLDworldC、HELLO WORLDD、HELLO world53、聲明符號常量應(yīng)該用關(guān)鍵字(B) 。A 、StaticB、 ConstC、PrivateVariant54、要強(qiáng)制顯示聲明變量，可在窗體模塊或標(biāo)準(zhǔn)模塊的聲明段中加入語句(B)A 、 Option Base 0C、 Option Base1Visual Basic 55、下列可作為 (D) 。B 、 Optio

18、nExplicitD 、 Option Compare 變量名的是b cA 、B 、TrueFalseC、 157、執(zhí)行x$=String(6,后， x 的值是124abc)(B) 。A、 A#AB 、 4AC、 ?xy56、設(shè) a=10 ， b=5 ， c=1 ，執(zhí)行語句 Print a D、 constA后，窗體上顯示的是 (B)D、出錯(cuò)信息A 、124abcB 、 111111C、 12458、設(shè) a=6 ，則執(zhí)行x=IIf(a5,-1,0)后，x的值為( D )A 、5B、 6C、 059、執(zhí)行語句： c$=“ Glad ” & Mid$(“ Nice to meet you為 (C)

19、 。D 、 abcA 、 Nice to meet youB 、 Glad Nice to meet youD、-1,5,3) ，則變量 c$ 的值C、Glad toD、 Glad60、下面 (D)是合法的字符常數(shù)。C、 A 、ABC$B、 ABCABCD 、 ABC61、對于語句If x=1 Then y=1，下列說法正確的是(C)A 、x=1 和 y=1 均為賦值語句B、x=1 和 y=1 均為關(guān)系表達(dá)式 為關(guān)系表達(dá) 為賦值語C、x=1 式，y=1 句D、 x=1 為賦值語句， y=1 為關(guān)系表達(dá)式62、設(shè)有聲明： Dim X As Integer,如果Sgn(X)的值為 -1 ，則 X

20、的值是 (D )A 、任何整數(shù) B 、 0 63、在一行內(nèi)寫多條語句時(shí)，每個(gè)語句之 間用C、等于 0 的整數(shù) D 、小于 0 的數(shù)(B) 符號分隔B、：C、str1 、 str2 中。確定第二個(gè)字符串在64、從鍵盤上輸入兩個(gè)字符串，分別保存在變量第一個(gè)字符串中起始位置的函數(shù)是A 、（D） 。A 、Left B 、 MidC、 StringD、 Instr65、設(shè) S= 中華人民共和 ，表達(dá)Left （S,1 ） +Right （ S,1 ） +Mid （ S,3,2 ）B）國式的值為（A、 中華民國 B、 中國人民 C、 中共人民 D、 人民共和 66、下列可作為BasicB、中的變量名的是

21、(A)A 、FilenameA(A+B)C、254D67、下面 (A)是合法的變量名。B、C、A 、X_yz123abcInteger68、以下變量命名非法的是(C)。A 、B、xyz123printaaC、boolean69、設(shè)有變量聲:Dim TestDate As Date,為變量明方式是VisualD、 BernaldTestDate 正確賦值的表達(dá)D、 PrintD、 X-Y(A)A 、 TextDate=#1/1/2002#B、TestDate=# “ 1/1/2002 ” #C、TextDate=date( “ 1/1/2002 ” )D、TestDate=Format( “ m

22、/d/yy ” , “ 1/1/2002 ” )的值是 (B)71、表達(dá)式 6*8 Mod 9的值是 (B)。A 、4B、3C、6D 、 772、假設(shè)變量 bool_x是一個(gè)布爾型(邏輯型 ) 的變量，則下面正確的賦值語句是(B 、bool_xA 、bool_x = False= .False.C、bool_x = #False#D 、bool_x =FalseA 、 TrueB 、 FalseC、-1D、173、設(shè) a= “ Visual Basic70、設(shè) a=2,b=3,c=4,d=5 ，表達(dá)式 ab AND c=dC、76、Dim x_y_z%D、 Static var3 As Int

23、eger可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)b=Left(a,8,12)b=Mid(a,8,5)C、D 、b=Rigth(a,5,5)b=Left(a,8,5)74、語句 Print Format$(32548.5, ( B )?！?#,#.#” )的輸出結(jié)果是A 、D 、32548.5B、 32,548.5C、 032,548.5032,548.5075、以下聲明語句中錯(cuò)誤的是(D) 。B 、 Dim var2 =A 、面使 b= “ Basic ”的語句是 (B) B 、A 、 Const var1=123 ABCC、 TrimD 、 MidpublicD、 thanksgiving(C

24、)C、 1D 、無任何值(B) 。C、 20D 、 240 歲條件的人是A 、 LtrimB、 Rtrim77、下列可為合法變量名的是(D) 。A 、IntegerB、 FalseC、78、變量未賦值時(shí)，數(shù)值型變量的值為 ( A)B 、A 、 0 空79、表達(dá)式 16/4-25*8/4 Mod52 的值為B 、A、144確的 80 、下面 If 語句統(tǒng)計(jì)滿足性別為男、職稱為副教授以上、年齡小于數(shù)，不正語句是（D ）。A 、 If sex=男 And age 40 And (duty= 教授 Or duty= 副教授 )Then n=n+1B、 If sex=男 And age 0Then n=

25、n+1C、 If sex=男 And age 40 And Right(duty,2)= 教授 Then n=n+1D、If sex= 男 And age =b And b10B、(ab)Or(b0)C、(a0)or(ba)And(b0)82、執(zhí)行語句 a=InputBox(Today,Tomorrow,Yesterday,Day before yesterday,5),一個(gè)輸入對話框，在對話框的輸入?yún)^(qū)中顯示的信息 是A 、 Today(A) 。B、TomorrowC、YesterdayD、Day before Yesterday83、VB 提供了結(jié)構(gòu)化程序設(shè)計(jì)3 種基本結(jié)構(gòu)，3 種基本結(jié)構(gòu)是

26、 B )的這(A 、遞歸結(jié)構(gòu)，分支結(jié)構(gòu)，循環(huán)結(jié)構(gòu)B、選擇結(jié)構(gòu)，過程結(jié)構(gòu)，順序結(jié)構(gòu)C、過程結(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 語句統(tǒng)計(jì)滿足性別為男、職稱為副教授以上、年齡小于 40 歲條件的人數(shù)，不 正確的語句是( D )。A 、 If sex=“男”And ageAnd InStr(duty,“教授” ) 0Then n=n+1B、 If sex=“男”And ageAnd (duty= “教授” Or duty= “副教 40授” )Then n=n+1C、 If sex=“男”And ageAnd Right(duty,2)=“教 40授”The

27、n n=n+1D、 If sex=“男”And ageAnd duty= “教授”And duty= “副教10, ”Red ” , “ Green ”) 執(zhí)行后， 變量 w 中的值是(C)。A 、 NullB、“ Red ”C、“ Green ”D、-186、賦值語句： a=123+MID( “ 123456 ” ,3,2) 執(zhí)行后， a 變量中的值是(D)。A 、“ 12334 ”B、123C、12334D、 15787、設(shè)有語句 x=InputBox( “ AAAA ”，“ BBBB ”，“” ), 程序運(yùn)行后，所產(chǎn)生的對話 框的標(biāo)題應(yīng)為 (C) 。A 、 AAAAB、空C、BBBBD、

28、出錯(cuò)，不能產(chǎn)生對話框88、下面正確的賦值語句是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)、過程結(jié)構(gòu)、順序結(jié)構(gòu)C、過程結(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(x y,x,y)B、 If x y Then Max=x Else Max=yC、 Max=x ： If y =x Then Max=yD、 If y x ThenMax=y ： Max=x91、下

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

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

31、B、 If AB Then Printf A不等于 BC、 If AB Then Print A不等于 B98、設(shè)有語句 x$=InputBox(“輸入數(shù)值” ，“ 0 ”，“示例” ）, 程序運(yùn)行后，如果從鍵盤上輸入數(shù)C、 0 是默認(rèn)值D、變量 X 的值是字符串“ 10”99、運(yùn)行下列程序段后，顯示的結(jié)果 為（A 、 4B、 9C、 13D、 49100、函數(shù)返回值的類型InputBox為A 、數(shù)值B、字符串C、變體D、數(shù)值或字符串（視輸入的數(shù)據(jù)而定） 101、一個(gè)數(shù)組說明為 Dim a（0 to 5 數(shù)組共有（A、25(B)B )J1=4: J2=9 If J1J2 Then Print

32、J2 Else Print J1， 1 to 5) As Integer，則該C) 個(gè)元素值 10 并按回車鍵，則下列敘述中正確的是（D）B、 36C、 30D、不確定102、數(shù)組聲明語句Dim a(2 to 3, -2 to 2,3 to 5) 數(shù)為 (C) 。中，數(shù)組 a 包含元素的個(gè)A、120B、75C、30D、13103、如果在上題語句前加入Option Base 1 ，則該數(shù)組共有（ D ） 個(gè)元素A、15B、16C、13D、不確定104、如果有聲明 Dim a（15） As Integer，則該數(shù)組共有（ B ）個(gè)元素A、15B、16C、13D、不確定105、一個(gè)數(shù)組說明Dim a

33、（5 ， 1 to 5） As Integer，則該數(shù)C） 個(gè)元素為 組共有（A、25B、36C、30D、不確定106、在 VB 中，默認(rèn)的數(shù)組下標(biāo)的下界從 （ A ）。0 開始，要想在通用聲明段界定下界，則應(yīng)使用A 、 Option BaseB、 Option ExplicitC、 ExplicitD、 Low Base107、如下數(shù)組聲明語句，正確的是（B）A 、 Dim a3, 4asIntegerIntegeB、 Dim a(3,4) asrC、 Dim a(n, n)asIntegerIntegeD、 Dim a34)asr108、賦給一個(gè)數(shù)組的數(shù)據(jù)的值的類型一定要（A ）A 、相同

34、B、不相同C、兩可D、都不對109、數(shù)組的下標(biāo)可取的變量類型是（A ）A 、數(shù)值型B、字符型C、日期型D、可變型110、數(shù)組聲明語 句Dim a(0 to 3, to 2,0 to 5) 中 ，a 包含元素的個(gè)數(shù)(A) 。-2 數(shù)組 為A、120B、 75C、 60D、 13111、假定有如下的 Sub 過程： Sub S (x As Single, y As Single) t = x x = t / y y = t Mod y EndSub 在窗體上添加一個(gè)命令按鈕，然后編寫如下事件過程：Private Sub Command1_Click()Dim a As Single Dim b A

35、s Single a = 5: b = 4 S a, b Print a, b End Sub 單擊命令按鈕得到的結(jié)果( D )。程序運(yùn)行時(shí)，B、 11A 、在窗體模塊 用 B、在窗體模 塊用 C、在窗體 模塊用C、 1.254D、 1.251112、用以下方式聲明的變量， Dim 進(jìn)行聲明B ）可以在整個(gè)程序中通用？Public 進(jìn)行聲明Private 進(jìn)行聲明Private x As IntegerN=10: z=N+z: y=y+z:x=x+z程序運(yùn)行后， 連續(xù)三次單 擊Static 類型D、在窗體模塊用 Static 進(jìn)行 聲明編寫事件過程：113、在窗體上添加一個(gè)命令按鈕和三個(gè)標(biāo)簽，

36、Private SubCommand1_Click() IntegerStatic y As Dim z As Integer Label1.Caption = x Label2.Caption = y Label3.Caption = z End Sub 命令按鈕，則三個(gè)標(biāo)簽中顯示的內(nèi)容分別是( A )。A、101010B、303030C、303010D、1030 30114、以下敘述中錯(cuò)誤的是 (D) 。A 、如果過程被定義為 Static 類型，則該過程中的局部變量 都是B、Sub 過程中不能嵌套定義Sub 過程C、Sub 過程中可以嵌套調(diào)用Sub 過程Text1 ，然后編寫如 過事件D

37、、事件過程可以像通用過程一樣由用戶定義過程名115、在在窗體上添加一個(gè)命令按 鈕Command1和 一個(gè)文本框程：Private Sub Command1_Click()Dim x As Integer, y As Integer, z As Integerx = 5 y = 7z = 0 Text1.Text = Call p1(x, y, z)Text1.Text = Str(z)End Sub Private Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + bEnd Sub 程序運(yùn)行后，單擊命令按鈕

38、得到的結(jié)果是( A )。A、12B、0C、Str(z)D、沒有顯示結(jié)果B)116、如果在程序中要將 a 定義為靜態(tài)變量，且為整型數(shù)，則應(yīng)使用的語句是： A 、 Redim a As IntegerB、Static a As IntegerC、Public a As IntegerD、Dim a As Integer117、以下程序的運(yùn)行結(jié)果是(C)Sub s1(b() As Integer)For i = 1 To 4b(i) = 2 * iNext iEnd SubPrivate Sub Command1_Click()Dim a(1 To 4) As Integer For i = 1 T

39、o 4a(i) = i + 5Next i s1 a() For i = 1 To 4 Print a(i)NextiEnd SubA、121416 18B、6789C、2468D、1234118、以下程序的運(yùn)行結(jié)果是 ( D )。 Function f(m As Integer) As Integer b = 1 Static c As Integer 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

40、Sum = Sum + f(a) Next i PrintSum End Sub A 、 12B、28 C 、32 D 、24119、下列程序輸出結(jié)果(C )。Private Sub Command1_Click()For i = 1 To 10GetValue iNext iPrint GetValue(i)End SubPrivate Function GetValue(ByVal a As Integer) Static S AsInteger S = S + a GetValue = SEnd FunctionA、10B、65C、66D、11120、在過程定義的變量，若希望在離開該過程

41、后，還能保存過程中局部變量的值， 則應(yīng)使用 (D) 關(guān)鍵字在過程中定義局部變量。A 、 DimB、PrivateC、PublicD、Static121、在過程定義中用 (C) 表示形參的傳值 A 、 VarB、ByDefC、ByValD、Value122、在在窗體上添加一個(gè)命令按鈕Command1和 兩個(gè)名稱分別為Label1 和 Label2 的標(biāo)簽，然后編寫如下事件過程：Private X As Integer Private Sub Command1_Click()X= 5: y = 3 Call proc(X, y) Label1.Caption = X Label2.Caption

42、= yEnd Sub Subproc(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)。 Dim x As Integer, y As Integer, z As Integer Sub s1(a AsInteger, b As Integer)Dim c As Integera = 2 * a b = b + 2 c = a +

43、 bEnd SubSub s2(a As Integer, ByVal b As Integer)Dim c As Integera = 2 * ab = b + 2c = a + bEnd SubPrivate Sub Command1_Click()x = 4 ： y = ： 4 z = 6Call s1(x, y)Print x + y + zCall s2(x, y)Print x + y + zEnd SubA、2428B、2028C、2018D、2020124、以下關(guān)于過程及過程參數(shù)的描述中，錯(cuò)誤的是(C)A 、過程的參數(shù)可以是控件名稱B、用數(shù)組作為過程的參數(shù)時(shí)，使用的是“傳地址”

44、方式C、只有函數(shù)過程能夠?qū)⑦^程中處理的信息傳回到調(diào)用的程序中D、窗體可以作為過程的參數(shù)125、以下屬于 Visual Basic合法的數(shù)組元素是(C)A 、 x8B、x 8 C、s(0)D、v8126、下列敘述中正確的是 (C) 。A 、在窗體的 Form_Load 事件過程中定義的變量是全局變量B、局部變量的作用域可以超出所定義的過程C、在某個(gè) Sub 過程中定義的局部變量可以與其它事件過程中定義的局部變量同名，但其作 用域只限于該過程0 或空字符D、在調(diào)用過程時(shí)，所有局部變量被系統(tǒng)初始化為串127、假定有以下函數(shù)過程： Function Fun(S As String) As String

45、 Dim s1 As String For i = 1 To在窗體上添加一個(gè)命令按 Dim str1 As String, str2Prinstr2 = Fun(str1)Len(S) s1 = UCase(Mid(S, i, 1) + s1 Next i Fun = s1 End FunctionAs String str2 End Sub鈕，然后編寫如下事件過程： Private Sub Command1_Click()str1 = InputBox(請輸入一個(gè)字符串 )程序運(yùn)行后，單擊命令按鈕，如果在輸入對話框中輸入字符串a(chǎn)bcdefg”，擊 確定 按鈕后程序在窗體上輸出結(jié)果(D )。A

46、 、 abcdefgB、gfedcbaC、GFEDCBAD、ABCDEFG128、若已編寫了一個(gè) Sort 子過程，在該工程中有多個(gè)窗體，為了方便的 Sort 子過 調(diào)用 程， 應(yīng)該將該過程放在 (B) 。A 、窗體模塊B、標(biāo)準(zhǔn)模塊C、類模塊D、工程129、下面子過程語句說明合法的是(D )A 、 Sub f1 ( ByVal n() AsInteger )B、Functionf1 ( f1 As Integer) As IntegerC、Sub f1 ( n() As Integer) AsIntegerD、Function ( ByVal n As Integer) Asf1 Intege

47、r130、在過程定義的變量，若希望在離開該過程后，還能保存過程中局部變量的值， 則應(yīng)使用 (D) 關(guān)鍵字在過程中定義局部變量。A 、 DimB、PrivateC、PublicD、Static131、在窗體上畫三個(gè)單選按鈕，組成一個(gè)名為chkOption 的控件數(shù)組。用于標(biāo)識各個(gè)控件數(shù)組元素的參數(shù)是 (D) 。A 、 TagB、IndexC、ListIndexD、Name132、假如列表框( List1 )有四個(gè)數(shù)據(jù)項(xiàng)，那么把數(shù)據(jù)項(xiàng)“ China ”添加到列表框的最后，應(yīng) 使用 (D) 語句。A 、 List1.AddItem 3, ChinaB、List1.AddItem China, Lis

48、t1.List1Count-1C、List1.AddItem China, 3D、List1.AddItem China133、如果列表框（ List1 ）中沒有被選定的項(xiàng)目，則 List1.RemoveItem List1.ListIndex 執(zhí)行 語句的結(jié)果 (D) 。 是A 、移去第一項(xiàng)B、移去最后一項(xiàng)C、移去最后加入列表的一項(xiàng)D、以上都不對(C) 。A 或 a 被視作相同的字 (即具有相 母1”和右側(cè)小鍵盤上的1”視作不同134、以下敘述中錯(cuò)誤的是事件過程中，從鍵盤上輸A 、在 KeyUp 和 KeyDown 入 同 KeyCode) 的B、在 KeyUp 和 KeyDown 事件過程

49、中，將鍵盤上的的數(shù)字 ( 具有不同的 KeyCode)C、KeyPress 事件中不能識別鍵盤上某個(gè)鍵的按下與釋放D、KeyPress 事件中可以識別鍵盤上某個(gè)鍵的按下與釋放135、設(shè)組合框 Combo1 中有 3 個(gè)項(xiàng)目，則以下能刪除最后一項(xiàng)的語句是 (B)A 、 Combo1.RemoveItem TextB、Combo1.RemoveItem 2C、Combo1.RemoveItem 3D、Combo1.RemoveItem Combo1.Listcount136、下列控件中，沒有 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 事件過程 Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y