VB考試題及答案要點

1、123456789VB程序設(shè)計期末考試題、選擇題F列常量中，是Integer類型常量的是（ C ）。A 123 &B -38844C 123%D 32768F面選項中（）是字符連接運算符.AA &B AndC %D ModB ）。下面關(guān)于VB的集成開發(fā)環(huán)境（IDE ）的敘述中，不正確的是（A、IDE是設(shè)計、調(diào)試、運行 VB程序的工具。B用戶不能隨意關(guān)閉IDE中的窗口。C "窗體設(shè)計”窗口是用來設(shè)計應(yīng)用程序界面（窗體）的。D打開/關(guān)閉各窗口的命令主要在IDE的"視圖"菜單中。len（"程序設(shè)計”）=（ C ）。A 5B 2C 6D 10表達

2、式15 Mod 4 + 13 5 * 2的值是 DA 7B 0C 2D 4賦值語句 A=123 + Mid$（“ 123456” ,3,2執(zhí)行后，A=（ A ）。A157B12334C123D"12334"在一個語句內(nèi)寫多條語句時，用來分隔每條語句的符號是（C.A、，B ；C :D、將邏輯型數(shù)據(jù)轉(zhuǎn)換成整型數(shù)據(jù)時，轉(zhuǎn)換規(guī)則是D ）。A、將True轉(zhuǎn)換為1 B 將True轉(zhuǎn)換為1C 將True轉(zhuǎn)換為 0D 將True轉(zhuǎn)換為-1，將False轉(zhuǎn)換為0，將False轉(zhuǎn)換為-1，將False轉(zhuǎn)換為-1，將False轉(zhuǎn)換為0表達式2+3*4A5-SIN（X+1）/2中最先進行的運算是（

3、D）.A SINB 4A5C 3*4D、x+110 如果 x=2，則表達式 x+1>2 Or sin(x)>0.9AndA、不能計算B TrueC 5D、False11隨機產(chǎn)生10, 50之間整數(shù)的正確表達式是(A Round( Rnd*50)B In t(R nd*40+10)C、Round( Rnd*51)D、10+I nt(R nd*41)12 每建立一個窗體，工程管理器窗口中就會增加一個A、類模塊文件B工程文件C、窗體文件D、程序模塊文件13 INT(100*RND(1)產(chǎn)生的隨機整數(shù)的閉區(qū)間是(B.A 1,100B 0,99C、0,100D、1,9914下列數(shù)據(jù)類型中，占

4、用內(nèi)存最小的是(D).A IntegerB SingleC、BooleanD、Byte15 VisualBasic 是一種()程序設(shè)計語言.BA、過程式B非過程式C、機器D、低級16 函數(shù)Int(10*Rnd)是在(A)范圍內(nèi)的整數(shù).A 0,9B 0,1C、1,9D、1,1017 以下合法的一組Visual Basic 用戶標(biāo)識符是CA Sum 和 8abcB a#x 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile3>x+3 的值(B )oD )o(0.18 函數(shù) Len(Str(Val("123.4")的值為(B).A 5B 6C 8D

5、 1119 Int(198.555*100+0.5)/100 的值為 BA 199.6B 198.56C 200D 19820以下各表達式中,計算結(jié)果為0的是(A).A FIX(12.4)+FIX(-12.6)B CINT(12.4)+CINT(-12.6)C INT(12.4)+INT(-12.6)D FIX(13.6)+FIX(-12.6)21 MsgBox()的正確語法是( D )。A MsgBox(標(biāo)題，提示信息，按鈕類型)B MsgBox(提示信息，標(biāo)題，按鈕類型)C MsgBox(標(biāo)題，按鈕類型，提示信息)D MsgBox(提示信息，按鈕類型，標(biāo)題)22 3>8-3 OR 1

6、0+2 <=3*4 AND 5=2+3 的結(jié)果是(C).A 10B -3C、TrueD False23 表達式 4+5 6 * 7 / 8 Mod 9的值是（D）.A 7B 4C 6D 524 設(shè)a=6,則執(zhí)行 x=llf(a>5,-1,0)后,x的值為（D）A 5B 0C 6D -125下面關(guān)于VB的敘述中，不正確的是（ A）。A用VB編寫的程序可以在任何操作系統(tǒng)環(huán)境中運行。B VB是面向?qū)ο蟮目梢暬能浖_發(fā)工具。C VB是在20世紀(jì)60年代美國Dartmouth學(xué)院開發(fā)的Basic語言基礎(chǔ)上發(fā)展而形成的。D、VB是由美國Microsoft （微軟）公司開發(fā)程序設(shè)計語言。26

7、表達式 16 / 4-2A5*8 / 4 Mod 5 2 = （ A ）。A 4B 0C -2D -627聲明符號常量應(yīng)該用關(guān)鍵字(B).A PrivateB ConstC、StaticD、V26/ariant28下列數(shù)據(jù)類型中，占用內(nèi)存最大的是(D).A BooleanB IntegerC、ByteD Single29下列VB數(shù)據(jù)類型中，占用內(nèi)存最少的是(D )。A CurrencyB IntegerC、BooleanD Byte30 RGB函數(shù)通過紅.綠.藍(lán)三基色混合產(chǎn)生某種顏色，某語法為RGB(紅.綠.藍(lán)),括號中紅、綠、藍(lán)三基色的成分使用0255之間的整數(shù)若使用三個滾動條分別輸入三種基

8、色，為保證輸入數(shù)值有效,則應(yīng)設(shè)置(B)屬性A Scroll 和 ChangeB Ma)和 MinC、Smallchange 禾口 LargeChangeD Value31 k=12.5，len( str( k ) )=( B )。A 4B 5C 3D 232 表達式Abs(-5)*55/5 的值是DA 1B 5C -25D 2533 產(chǎn)生10,37之間的隨機整數(shù)的 VisualBasic表達式是(C) A Int(Rnd(1)*27)+11B Int(Rnd(1)*28)+11C Int(Rnd(1)*28)+10D In t(Rnd(1)*27)+1034工具欄中的"啟動”按鈕的作

9、用是(B).A工程管理窗口B運行一個應(yīng)用程序C打開被選中對象的代碼窗口D運行一個窗體35不需要編譯，計算機便可直接執(zhí)行的程序是(B )。A C 語言程序B 機器語言程序C 匯編語言程序D、Visual Basic 語言程序36 Vai (“123ab” )= D )。A、0B 不能轉(zhuǎn)換C 1230D、12337 表達式 16/4-2A5*8/4MOD52 的值為 AA 4B 2C 14D 2038刪除字符串前導(dǎo)和尾隨空格的函數(shù)是(D).A Rtrim()B Ltrim()C、 LcaseD Trim()39下列表達式中，其值為0的是(C).A 15 mod 9B 7/9C 79D 7 mod

10、1540 表達式Len("123程序設(shè)計ABC")的值是 BA 17B 10C 14D 2041 In t(-3.1)+ro und (-4.6)=C。A、-8B、-6C -9D -7、/、Mod *等4個算術(shù)運算符中，優(yōu)先級最低的是(A).A ModB /C *D 43下面正確的賦值語句是(D )。A x=y=1B x+2=yA2+2C x+y=1D x=y+z144 Len(”實踐應(yīng)用能力")的值是(A).A 6B 4C不能確定D 845 表達式 Mid("SHANGHAI",6,3)的值是(C).A ANGHB SHAC HAID SHA

11、NGH46 表達式 253 mod 3 *Int(4.5) 的值為(B).A 1B 8C 4D 547下面變量名稱正確的是(C)。A x 1B integerC x_1_yD x , y48 不能正確表示條件"兩個整型變量A和 B之一為0,但不能同時為0" 的布爾表達式(D).A A*B=0ANDA<>BB (A=0ORB=0)ANDA<>BC A=0ANDB<>0ORA<>0AND B=0D A*B=0AND(A=0ORB=0)49如果X是一個正的實數(shù)，將千分位四舍五入，保留兩位小數(shù)的表達式是 (C).A 0.01*int(

12、100*(x+0.05)B 0.01*int(x+0.05)C 0.01*int(100*(x+0.005)D 0.01*int(x+0.005)50表達式X+1>X是(D).A、非法表達式B字符表達式C算術(shù)表達式D關(guān)系表達式51. VisualBasic 的編程機制是(B).A、面向圖形B、事件驅(qū)動C面向?qū)ο驞可視化52下面4項中合法的變量名是(A).A X_yzB、X-YC 123abcD integer53以下可以作為VB變量名的是(C).A COS(X)B、X(-1)C、CO1D SIN54 表達式(73+1)*(185-1)的值是(B).A 8.76B、6C、6.67D 7.8

13、55下列哪個變量名的取法是不正確的(C).A、sTmeB、T_12C、T12%D T_Temp56可以同時刪除字符串前導(dǎo)和尾部空白的函數(shù)是(B).A、LtrimB、TrimC、MidD Rtrim57 VB窗體文件的擴展名是(A).A、FRMB、VBWC、VBPD BAS58 一個具有圖形用戶界面的標(biāo)準(zhǔn)EXE ”工程必須包含的文件是( A )。A、工程文件和窗體文件。B、窗體文件和標(biāo)準(zhǔn)模塊文件。C、工程文件和資源文件。D工程文件和標(biāo)準(zhǔn)模塊文件。59數(shù)學(xué)式3< X V 5寫成VB表達式是(A )。A、3<=X and X<5B、X>=3 and 5<XC、3<

14、=X or X<5D 3<=X<560 表達式 INT(8*SQR(36)*10%2)*10+0.5)/10的值是(A).A、.5B、0.48C、.05D 0.04861變量未賦值時，數(shù)值型變量的值為(C).A、空B、無任何值C、0D 162正確的變量名是(A )oA、xy_01B、sa t01C、3xyD integer63 當(dāng) Ucase$(C$)> ” A” artdcase$(C$)< ” 為'true時，貝U C$ 是 AoA、字母B、大寫字母C、小寫字母D 不一定64 表達式（-1）*Sgn（-100+lnt（Rnd*100） 的值是（A）.A

15、、1B、-1C、隨機數(shù)D 065 表達式 print Len（trim（" abed "）&"123"）的結(jié)果是 DA、abedB、9C、123D 766 Rnd函數(shù)不可能產(chǎn)生的（）值.BA 0B、1C、0.1234D .0000567下面變量名稱不正確的是（B ）。A、x1B、1xC、x1yD x_168下列哪個變量名的取法是不正確的（B）.A、T_TempB、T32#C、T32D TName69選中復(fù)選框控件時，value屬性的值，可以是（C）.A、TrueB、falseC、1D 070程序運行時，如果復(fù)選框被用戶選中，那么其Value屬性值

16、為（A ）。A 1B、FalseC、TrueD 071程序運行時，如果單選框被用戶選中，那么其Value屬性值為（D ）。A、0B、1C、FalseD True72下列（）是窗體文件的擴展名.AA、frmB、elsC、dllD bas73要使標(biāo)簽?zāi)芡笇绱绑w的背景，必須設(shè)置（C）屬性.A、AppearaneeB、BorderStyleC、BackStyleD BackColor74當(dāng)窗體被關(guān)閉時，系統(tǒng)自動執(zhí)行該窗體的( A )事件過程。A、Un loadB、LoadC、LostFocusD Click75要使窗體運行時充滿整個屏幕，應(yīng)設(shè)置其(D )屬性。A、AutoRedrawB、WidthC、

17、HeightD WindowState76要使得窗體一開始運行就充滿整個屏幕則須設(shè)置()屬性.AA、windowstateB、borderstyleC、appearaneeD drawmode77要使一個文本框具有水平和垂直滾動條，則應(yīng)先將其MultiLine屬性設(shè)置為True,然后再將ScrollBar屬性設(shè)置為(A).A、3B、0C、1D 278決定控件上文字的字體、字形、大小及效果的屬性是(C).A、TEXTB、CAPTIONC、FONTD NAME79在窗體設(shè)計器窗口雙擊窗體的任何地方，可以打開的窗口是(A).A、代碼窗口B、以上3個選項都不對C、工程管理窗口D屬性窗口80下列關(guān)于屬性

18、設(shè)置的敘述錯誤的是(D).A、 一個控件具有什么屬性是VB預(yù)先設(shè)計好的，用戶可以改變B、 一個控件的屬性即可以在屬性窗口中設(shè)置，也可以用程序代碼設(shè)置C、 一個控件的屬性在屬性窗口中設(shè)置，還可以利用程序代碼為其設(shè)置新值D 個控件具有什么屬性是VB預(yù)先設(shè)計好的，用戶不能改變81 MaxLength屬性可以設(shè)置文本框可以輸入與顯示的最多字符個數(shù)，當(dāng)其值為0時表示(D).A、不允許輸入字符B、以上都不正確C、 不允許輸入任何字符，但顯示不限制D輸入的字符長度不限82下面(C)控件不具有Caption屬性.A、標(biāo)簽框B、命令按鈕C、文本框D單選鈕83要使標(biāo)簽?zāi)軌蝻@示所需要的東西，則在程序中應(yīng)設(shè)置其哪一屬

19、性的值(D).A NameB、TextC、AutoSizeD Caption84程序運行時，要限制文本框的輸入長度，那么應(yīng)設(shè)置（A ）oA、MaxLengthB、EnabledC、LockedD MultiLine85事件的名稱（D）.A、是不固定的B、有的由用戶定義，有的由系統(tǒng)定義C、都要由用戶定義D都是由系統(tǒng)預(yù)先定義86若設(shè)置窗體的BorderStyle=1，則在程序運行時窗體的行為是（A）。A、窗體沒有最大化和最小化按鈕，窗體可以移動，但不能改變大小。B、窗體有最大化和最小化按鈕，窗體既可以移動，也可以改變大小。C窗體沒有最大化和最小化按鈕，窗體既不能移動，也不能改變大小。D窗體有最大化

20、和最小化按鈕，窗體可以移動，但不能改變大小。87如果要設(shè)置窗體的標(biāo)題欄，應(yīng)選擇以下那種屬性（D）.A、TipsB、NameC、TextD Caption88要把一個命令按鈕設(shè)置成無效，應(yīng)設(shè)置其哪一屬性值（D）.A VisibleB、DefaultC、CancelD Enabled89將焦點主動設(shè)置到指定的控件或窗體上，應(yīng)采用（C）方法.A SetTextB、GetGataC、SetFocusD SetData90要使標(biāo)簽控件的大小隨Caption屬性值而自動調(diào)整，應(yīng)設(shè)置其（ B ）屬性。A AlignmentB、AutoSizeC、WidthD Caption91能夠改變窗體邊框線類型的屬性是

21、（C）.A、FontStyleB、BorderC、BorderStyleD BackStyle92要使Forml窗體的標(biāo)題欄顯示"歡迎使用VB",以下語句正確的是（A）.A、Forml.Caption='歡迎使用 VB"B、Forml.Caption="歡迎使用 VB"C、Forml.Caption=歡迎使用 VBD Forml.Caption= /歡迎使用 VB，93文本框所沒有的屬性是(D).A、VisibleB、BackColorC、EnabledD Caption94在VB境中，工程文件的擴展名是(D).A、.frxB、.bas

22、C、.frmD .vbp95如果要在命令按鈕上顯示圖形文件，應(yīng)設(shè)置命令按鈕的(B).A、Style屬性和Graphics屬性B、Style屬性和Picture屬性C、Picture 屬性D Graphics 屬性)屬性。96要使鼠標(biāo)指向 命令按鈕”時，出現(xiàn)一個提示文本，應(yīng)設(shè)置其( AA、ToolTipTextB、StyleC、PictureD Caption97不論何控件，共同具有的屬性是(B).A、ForeColorB、NameC、CaptionD Text98要使標(biāo)簽控件標(biāo)題內(nèi)容居中顯示，應(yīng)設(shè)置其(B )屬性。A、ToolTipTextB、AlignmentC、BackStyleD App

23、earanee99使命令按鈕獲得焦點”的方法是( A)。A、SetFocusB、MoveC、RefreshD LinkSend100改變控件在窗體中的上下位置應(yīng)修改控件的()屬性.CA、HeightB、WideC、TopD Left101、語句 PRINT"SGN(-26)="SGN(-26)的輸出結(jié)果為(C)A、SGN(-26)=-26B、SGN(-26)=26C、SGN(-26)=-1D SGN(-26)=+1102、 若要使得文本框的初始值為空，則應(yīng)更改文本框的屬性是(A)A、textB、indexC、nameD caption103、 要使得標(biāo)簽?zāi)茏詣訑U充以滿足字體

24、大小則可對其（C）屬性進行設(shè)置.A、tagB、alignmentC、autosizeD use mnemonic104、 為了把焦點移到某個指定的控件，所使用指定的控件的（C ）方法.A VisibleB、RefreshC、SetFocusD GetFocus105、如果要給字體加刪除線，可以選擇下列那種屬性（C）.A、FontSizeB、FontNameC、FontStrikethruD FontUnderLine106、要設(shè)置標(biāo)簽控件字體的大小，應(yīng)設(shè)置其（A ）屬性。A、FontB、HeightC、WidthD Caption107、 每個窗體對應(yīng)一個窗體文件，窗體文件的擴展名是（A ）.

25、A、.frmB、.vbpC、.basD .cls108、標(biāo)簽控件最重要的屬性是（A）.A、captionB、textC、nameD width109、（A）對象不具有Caption屬性.A、TimerB、FormC、OptionD Label110、 一個窗體上有三個文本框，按放置順序分別是：Text1，Text2，Text3，若使程序運行時 Text3首先獲得 焦點”那么，應(yīng)設(shè)置其（ B ）屬性值為0。A、IndexB、TabindexC、TagD Top111、 如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是（D ）.A、BorderStyleB、NameC、BackColorD、Caption

26、112、欲使某命令按鈕失效，應(yīng)修改命令按鈕的（C）屬性.A EnableB、CaptionC、EnabledD、Visible113、為使文本框顯示滾動條，必須首先設(shè)置的屬性是（D）.A、AutosizeB、ScrollbarsC、AlignmentD Mulitiline114、改變控件在窗體中的左右位置應(yīng)修改該控件的（B）屬性.A、RightB、LeftC、WidthD Top115、 要使標(biāo)簽中顯示的文本靠右顯示，則應(yīng)將其Alignment屬性設(shè)置為（A）.A、1B、3C、2D 0116、 當(dāng)設(shè)置文本框的ScrollBars=Both而文本框確沒有顯示出滾動條，原因是（A ）。A、文本框

27、的 MultiLine=FalseB、文本框中沒有內(nèi)容C、文本框的 MultiLine=True D文本框的Locked=True117、要使文本框獲得輸入焦點，則應(yīng)采用文本框控件的哪個方法（D）.A、KeyPressB、LostFocusC、GodFocusD SetFocus118、假設(shè)窗體上有一個標(biāo)簽控件（ Label1）和一個時鐘控件（Timer），要想每隔1秒鐘，在標(biāo) 簽Label1上顯示一次系統(tǒng)當(dāng)前時間，應(yīng)在（ A ）事件過程中編寫實現(xiàn)該功能的程序。A、Private Sub Timer1_Timer()B、Private Sub Label1_DblClick()C、Privat

28、e Sub Label1_Change()D、Private Sub Label1_Click()119、如果設(shè)計時在屬性窗口將命令按鈕的（B）屬性設(shè)置為False,則運行時按鈕從窗體上消失.A DisabledPictureB、VisibleC、DefaultD Enabled120、 一個窗體上有兩個文本框，按放置順序分別是：Textl, Text2，要想在Textl中按回車”鍵，焦點”自動轉(zhuǎn)到Text2上，應(yīng)在( D)事件過程中編寫程序。A、Private Sub Text1_Click()B、Private Sub Text2_GotFocus()C、Private Sub Text1

29、_LostFocus()D、Private Sub Text1_KeyPress(KeyAscii As Integer)121、文本框中選定的內(nèi)容，由下列(A )屬性反映.A、SeltextB、CaptionC、sellenghtD Text122、 下面4項中不屬于面向?qū)ο笙到y(tǒng)三要素的是(A ).A、變量B、事件C、方法D屬性123、 若要使命令按鈕不可操作，要設(shè)置的屬性是(A ).A、EnabledB、VisibleC、CaptionD BackColor124、 文本框控件中將Text的內(nèi)容全部顯示為所定義的字符的屬性項是(D).A、PasswordB、以上都不是C、需要編程來實現(xiàn)D

30、PasswordChar125、 如果Print方法在窗體的Load事件過程中不起作用，原因是(A)屬性值為false。A、AutoRedrawB、ControlBoxC、MoveableD MaxButton126、inputBox函數(shù)返回值的類型為(C).A、變體B、數(shù)值C、字符串D數(shù)值或字符串(視輸入的數(shù)據(jù)而定)127、窗體的Caption屬性的作用是(B).A、確定窗體的邊界類型B、確定窗體的標(biāo)題C、確定窗體的名稱D確定窗體的字體128、欲使標(biāo)簽的內(nèi)容自動換行，必須設(shè)置屬性（A）.A WordwrapB、AutoSizeC、AlignmentD left129、用來設(shè)置粗體字的屬性是

31、DA、FontItalicB、FontSizeC、FontNameD FontBold130、 Text1控件在運行時不可見，是設(shè)置下列（B）屬性的結(jié)果.A CancelB、VisibleC、ControlBoxD Enabled131、 若要使標(biāo)簽控件顯示時，不覆蓋其背景內(nèi)容，應(yīng)設(shè)置標(biāo)簽控件的（D）屬性.A、BORDERSTYLEB、BACKCOLORC、FORECOLORD BACKSTYLE132、要使 命令按鈕”在程序運行時不可見，可以將其（C ）屬性設(shè)置為False。A CancelB、DefaultC、VisibleD Enabled133、下列賦值語句正確的是（D）.A Text

32、1.name=Text1.Name+Text2.NameB、Text1.Caption=Text1.Caption+Text2.CaptionC、Text1.Enable=Text1.Enable+Text2.EnableD Text1.text=Text.text+Text2.text134、 不具有輸入數(shù)據(jù)功能的控件是 （C）控件.A、列表框B、選項按鈕C、窗體D文本框135、 程序運行后，在窗體上單擊鼠標(biāo)，此時窗體不會接收到的事件是（A）.A LoadB、ClickC、MouseDownD、MouseUp136、 列表框和組合框的（B）屬性的值，表示其列表中項目的個數(shù)。A ListI n

33、dexB、ListCou ntC、ListD、Text137、在定義靜態(tài)數(shù)組時，關(guān)于下標(biāo)的敘述中，正確的是（A ）oA、省略下界，一般系統(tǒng)默認(rèn)為：下界是 0B、下標(biāo)可以是字符型C、 下標(biāo)下界最小為：-32768 ，下標(biāo)上界最大為：32767D、下標(biāo)可以是變量。138、下列程序：Private Sub Textl _Change（）Print Textl ；End Sub當(dāng)在文本框輸入"1234"這4個字符時，窗體上顯示的是DA、1234 B 、1 121231234C、1 234D 1121231234139、下面（）對象在運行時一定不可見.CA、LineB、OptionC

34、、TimerD Text140、 若要清除列表框的所有內(nèi)容，可用什么方法實現(xiàn) CA、以上均不可以B、ClsC、ClearD RemoveItem141、 要使時鐘控件Timer1的Timer事件不起作用，以下正確的語句是 AA、Timer1.Enabled=FalseB、Timer1.Index=0C、Timer1.Interval=1000D Timer1.Visible=False142、 為使計時器控件每隔5秒鐘產(chǎn)生一個計時器事件仃imer事件）,則應(yīng)將其Interval屬性值設(shè)置為（D）.A、300B、5C、500D 5000143、 將數(shù)據(jù)項"China"添加到列

35、表框（List1）中成為第一項應(yīng)使用的語句是（A ）。A、List1.AddItem " China " ,0B、Listl.Addltem " China " ,1C、Listl.Addltem 0," China "D Listl.Addltem 1," China "144、 在程序代碼中修改滾動條的value屬性時將激發(fā)滾動條的（D）事件.A、scrollB、dragdropC、gotfocusD change145、循環(huán)結(jié)構(gòu) For I%= -1 to -17 Step -2共執(zhí)行（C）次.A、6B、5C

36、、9D 8146、執(zhí)行下面的程序段后,x的值為（D）x=5For i=1 To 20 Step 2x=x+i5Next iA、24B、23C、22D 21147、 由For k=10 to 0 step 3:next k循環(huán)語句控制的循環(huán)次數(shù)是 （D）.A、-11B、12C、-10D 0148、 下列方法中可用于列表框動態(tài)添加數(shù)據(jù)的是（D）.A、removeitemB、addlistC、addD additem149、 組合框控件是將（）組合成一個控件.AA、列表框控件和文本框控件B、復(fù)選框控件和選項按鈕控件C、標(biāo)簽控件和列表框控件D標(biāo)簽控件和文本框控件150、 下面程序段輸出的結(jié)果是DPri

37、vate Sub Command1_Click（）For i = 0 To 20 Step 5 x = x + iNextPrint "X=" xEnd SubA、X=50B、X=218C、X=210D X=58151、定時器的Interval屬性以()為單位指定Timer事件之間的時間間隔.CA、分B、微秒C、毫秒D秒152、 由For k=35 to 0 step 3:next k循環(huán)語句控制的循環(huán)次數(shù)是 ().AA、0B、-10C、12D -11153、 在列表框中當(dāng)前被選中的列表項的序號是由下列哪個屬性表示() CA、ListB、IndexC、ListIndexD

38、TabIndex154、 設(shè)計動畫通常使用時鐘控件()來控制動畫速度.CA、EnabledB、TimerC、IntervalD Move155、 為了能在列表框中利用 Ctrl和Shift鍵進行多個列表項的選擇，則應(yīng)將列表框的Multiselect屬性設(shè)置為().CA、1B、3C、2D 0156、 引用列表框的最后一項應(yīng)使用().DA、List1. List(ListCount-1)B、List1. List(List1.ListCount)C、List1.List(ListCount)D List1. List(List1.ListCount-1)157、列表框控件中的列表內(nèi)容是通過()屬性

39、設(shè)置的.AA、ListB、CaptionC、NameD Text填空1. 在窗體上已建立多個控件，如Textl , Labell , Command,1若要使程序一運行焦點就定位在Comma nd控件上，應(yīng)對 Comma nd控件的_tabindex 屬性設(shè)置為_Tablndex。2. 日期表達式 #2/24/02# - #2/12/02#的值為 _12 。3 .已知 a=2.5 , b=5.0 ,c=2.5，d=True，則表達式：a>=0 ANDa+c>b+3 ORNOTd 的值是 _false。4. 表示x是5的倍數(shù)或是9的倍數(shù)的邏輯表達式為 _x mod 5 = 0 OR

40、x mod 9 = 0 。5. 在剛建立工程時，使窗體上的所有控件具有相同的字體格式，就對_font_的屬性進行設(shè)置。6.Int(-2.6)、Int(2.6) 、Fix(-2.6)、Fix(3.6) 的值分別是 _-3、_2_、_-2_、3_。7. Label和TextBox控件用來顯示和輸入文本，如果僅需要讓應(yīng)用程序在窗體中顯示文本信息，可使用_label _控件；若允許用戶輸入文本，則應(yīng)使用_Textbox 控件。8. 若命令按鈕的名稱為 Cmdopen ，程序要求單擊該命令按鈕時，打開一個窗口frm1，請對以下事件過程填空。Private Sub Cmdope n_Click() frm

41、1.show end sub9. 表達式93 7 Mod 2 A 2 的值是_1_。10. 表達式 Ucase(Mid( abcdefgh ”3,4)的值是 _CDEF_11. 當(dāng)程序運行時，要求窗體中的文本框呈現(xiàn)空白，則在設(shè)計時，應(yīng)當(dāng)在此文本框的 屬性 窗口中，把此文本框的 text _ 屬性設(shè)置成空白。12. 已知 a=3 , b=4 ，c=5 ，表達式 a>b and Not c>a Or c>b And c<a+b的值是 _ true 。表達式 c>a And Not b<c 的值是 _ false 。程序設(shè)計1. ''【程序改錯】題

42、目：程序功能：求1+2+3，直到其和超出3000為 止，并輸出結(jié)果。Opti on ExplicitPrivate Sub Form_Click()ClsDim i As In tegerDim s As Si nglei =0I*ERROR*DoI*ERROR*'* ERROR* *Loop s > 3000Print " 從 1 到:"i;" 的和是 ”;sEnd Sub答案 【學(xué)生答案】i = i + 2【參考答案】i=i+12. ''【程序改錯】 862'題目：以下程序段用于輸出100-300的所有素數(shù)Opti on

43、ExplicitPrivate Sub Form_Click()Dim n As Integer, k As Integer, i As Integer, swit As IntegerFor n = 101 To 300 Step 2k = In t(Sqr( n)i = 2 swit = 1I*ERROR*'* ERROR* *While swit = 0If n Mod i = 0 Thenswit = 1Else '* ERROR* *i = i - 1 End IfWendIf swit = 0 The nPrint n;End IfNext nEnd Sub答案【學(xué)

44、生答案】swit = 1【參考答案】swit=0【學(xué)生答案】While swit = 0【參考答案】While i<=k And swit =0While k>=i And swit=0While swit=0 And i<=kWhile swit=0 And k>=i【學(xué)生答案】i = i - 1【參考答案】i=i+13.0pti on ExplicitPrivate Sub Form_Click()Dim i As Integer, j As Integer, k As IntegerPrint Tab(30); "9*9 table"Print

45、: PrintPrint” * "Fori = 1 To 9I*ERROR*Print Tab(i * 6); iNext iPrintForj = 1 To 9Print j;""For k = 1 To jPrint Tab(k * 6); j * k;""I*ERROR*Next jPrintI*ERROR*Next k答案【學(xué)生答案】Print Tab(i * 6); i【參考答案】Print Tab(i * 6); i;【學(xué)生答案】Next j【參考答案】Next k【學(xué)生答案】Next k【參考答案】Next j4.'

46、9;【程序改錯】'題目：以下程序段用于計算 5的N次方。Opti on ExplicitPrivate Sub Form_Click()Dim n As Integer, k As Integer, s As Longn = In putBox(" I nput n ")I*ERROR*'* ERROR* *s = 0Do While k <= ns = s * 5k = k + 1 '* ERROR* *Next的”;"n次方是”;sPrin t "5End Sub答案【學(xué)生答案】k = 0【參考答案】k=1【學(xué)生答案】s

47、 = 0【參考答案】s=1【學(xué)生答案】Next【參考答案】loop5.'【程序改錯】 '題目：以下程序段用于打印如圖 1所示的九九乘法表:Opti on ExplicitPrivate Sub Form_Click()Dim i As In teger, j As In teger, k As In tegerPrint Tab(30); "9*9 table"Print: PrintPrint” * "Fori = 1 To 9I*ERROR*Print Tab(i * 6); iNext iPrintForj = 1 To 9Print j;&

48、quot;"'* ERROR* *For k = 1 To 9'* ERROR* *Print Tab(j * 6); j * k;""Next kPrintNext jEnd Sub答案【學(xué)生答案】Print Tab(i * 6); i【參考答案】Print Tab(i*6);i;【學(xué)生答案】For k = 1 To 9【參考答案】For k = 1 To j【學(xué)生答案】Print Tab(j * 6); j * k;"" 【參考答案】Print Tab(k*6);j*k;""6. '【程序改錯】題

49、目：下面程序可輸出如下圖形:*Opti on ExplicitPrivate Sub Form_Click()Dim m As Integer, n As Integer, s As String, i As Integer, j As Integer n = 4For i = 5 To 1 Step -1I*ERROR*Print Spc( n)For j = 1 To 2 * m - 1 Print s;Next jPrintI*ERROR*m = m - 1Next i答案【學(xué)生答案】Print Spc( n)【參考答案】Print Spc( n);Print Spc(i); ?Spc(

50、 n);?Spc(i);【學(xué)生答案】I*ERROR*n = n + 1【參考答案】n=n-1n=_1+ n【學(xué)生答案】m = m - 1【參考答案】m=m+17.'題目：以下程序段用于輸出100-300的所有素數(shù)Opti on ExplicitPrivate Sub Form_Click()Dim n As Integer, k As Integer, i As Integer, swit As IntegerFor i = 101 To 299k = In t(Sqr(i)For n = 2 To kIf i Mod n = 0 The n'* ERROR* *ExitEnd

51、 IfNext n'* ERROR* *If n < k The nPrint i;End IfNext n 'Print i 答案'* ERROR* *【學(xué)生答案】Exit【參考答案】exit for【學(xué)生答案】If n < k The n【參考答案】If n>k ThenIf k<n Then【學(xué)生答案】Next n【參考答案】n ext iNext i程序填空1. '從鍵盤輸入三個整數(shù)，從其中找出最大值并輸出到窗口Private Sub Form_Click()Dim a%, b%, c%, max%a = Val(InputBox("請輸入一個整數(shù)")I*FILL*")")b = Val(lnputBox("請輸入一個整數(shù) c = Val(lnputBox("請輸入一個整數(shù) max