1、精選優(yōu)質(zhì)文檔-傾情為你奉上VB無(wú)紙化考試客觀練習(xí)題(附正確答案)一、單項(xiàng)選擇題（1-251題）1.以下4種描述中，錯(cuò)誤的是_ D _。A. 常量在程序執(zhí)行期間其值不會(huì)發(fā)生改變B. 根據(jù)數(shù)據(jù)類型不同，常量可分為字符型常量、數(shù)值常量、日期/時(shí)間型常量和布爾型常量C. 符號(hào)常量是用一個(gè)標(biāo)識(shí)符來(lái)代表一個(gè)常數(shù)，好象是為常數(shù)取一個(gè)名字，但仍保持常數(shù)的性質(zhì)D. 符號(hào)常量的使用和變量的使用沒有差別2.下面合法的常量是_ D _。A. 1/2 B. 'abcd' C. 1.2*5 D. False3.Visual Basic中可以用類型說明符來(lái)標(biāo)識(shí)變量的類型，其中表示貨幣型的是_ C _。A.

2、% B. # C. D. $4.下面_ B_是不合法的整常數(shù)。A.100 B.%O100 C.&H100 D.&O1005.以下關(guān)鍵字中，不能定義變量的是_A_。A. Declare B. Dim C. Public D. Private6.表達(dá)式16/4-25*8/4 MOD 52的值為_B_。A. 14 B. 4 C. 20 D. 27.用十六進(jìn)制表示Visual Basic的整型常數(shù)時(shí)，前面要加上的符號(hào)是_A_。A. &H B. &O C. H D. O8.Visual Basic日期型常量的定界符是_A_。A. # B. C. () D. 9.數(shù)學(xué)關(guān)系式

3、3x<10表示成正確的VB表達(dá)式為_B_。A. 3<=x<10 B. 3<=x AND x<10 C. x>=3 OR x<10 D. 3<=x AND <1010.下面正確的賦值語(yǔ)句是_C_。A. x+y=30 B. pi*r*r=y C. y=x+30 D. x=3y11. ，/，Mod，*四個(gè)算術(shù)運(yùn)算符中，優(yōu)先級(jí)別最低的是_C_。A. B. / C. Mod D. * 12.表達(dá)式ASC("F")的類型是_C_。A. 字符表達(dá)式 B. 關(guān)系表達(dá)式 C. 算術(shù)表達(dá)式 D. 邏輯表達(dá)式13.下面語(yǔ)句中有非法調(diào)用的是_C

4、_。A. x=Sgn(-1) B. x=Fix(-1) C. x=Sqr(-1) D. x$=Chr$(65)14.表達(dá)式23/5.8、235.8、23 Mod 5.8的運(yùn)算結(jié)果分別是_B_。A. 3、3.9655、3 B. 3.9655、3、5 C. 4、4、5 D. 3.9655、4、315.如果變量 a=2、b="abc"、c="acd"、d=5，則表達(dá)式 a<d OR b>c AND b<>c 的值為_A_。A. True B. False C. Yes D. No16.下面不正確的賦值語(yǔ)句是_B_。A. x=30-y B

5、. y=r.r C. y=x+30 D. y=x317.為了給x,y,z三個(gè)變量賦初值1，下面正確的賦值語(yǔ)句是_A_。A. x=1y=1z=1 B. x=1,y=1,z=1 C. x=y=z=1 D. xyz=118.以下4類運(yùn)算符，優(yōu)先級(jí)最低的是_D_。A. 算術(shù)運(yùn)算符 B. 字符運(yùn)算符 C. 關(guān)系運(yùn)算符 D. 邏輯運(yùn)算符19.如果在立即窗口中依次執(zhí)行下列命令：a=8 b=9 Print a>b 則輸出的結(jié)果是_C_。A. 1 B. 0 C. False D. True20.已知a=""，則表達(dá)式Left(a, 4) + Mid(a, 4, 2)的值是_B_。A.

6、B. "" C. D. 127921.在Visual Basic中，y1+z2=a*Sin(b*x+c)+k表達(dá)式的類型是_B_。A. 算術(shù)表達(dá)式 B. 關(guān)系表達(dá)式 C. 邏輯表達(dá)式 D. 字符表達(dá)式22.下列表達(dá)式的值為真的是_C_。A. "A">"a" B. "9">"a" C. "That">"Thank" D. 12>12.123.在下列算術(shù)運(yùn)算符中，運(yùn)算等級(jí)最高的是_A_。A. 取負(fù)（-） B. 乘、除（*，/） C. 取

7、模（MOD） D. 加、減（+，-）24.如果變量a=2,b=3,c=4,d=5，表達(dá)式NOT a>b AND NOT d<>c的值是_B_。A. True B. False C. 1 D. 025.在一個(gè)有（1）邏輯運(yùn)算、（2）算術(shù)運(yùn)算、（3）關(guān)系運(yùn)算混合在一起的表達(dá)式（無(wú)括號(hào)）中，其運(yùn)算順序?yàn)開C_。A. （1）（2）（3） B. （3）（2）（1） C. （2）（3）（1） D. （2）（1）（3）26.表達(dá)式A%+B&+C!-D#的結(jié)果為_D_。A. 整型 B. 長(zhǎng)整型 C. 單精度型 D. 雙精度型27.下列符號(hào)中，可以用作VB變量名的是_C_。A. c%a

8、b B. 3sum C. sum3 D. Len28.在下列表達(dá)式中，正確的日期型常量是_D_。A. "12/04/01" B. 12-04-2001 C. 12/04/01 D. #12/04/01#29.條件:1<X<=2或10<=X<15，在Visual Basic語(yǔ)言中應(yīng)寫成條件表達(dá)式_A_。A. X>1 AND X<=2 OR X>=10 AND X<15 B. X>1 OR X<=2 OR X>=10 OR X<15C. X>1 OR X<=2 AND X>=10 OR X

9、<15 D. X>1 AND X<=2 AND X>=10 AND X<1530.設(shè)有如下的記錄類型Type Student number As String name As String age As IntegerEnd Type則正確引用該記錄類型變量的代碼是_B_。A. S="張紅" B. Dim s As Student ="張紅"C. Dim s As Type Stuent D. Dim s As Type ="張紅" ="

10、張紅"31.下列程序運(yùn)行時(shí)，從鍵盤輸入字符"-"，則輸出結(jié)果是_A_。Private Sub Form_Click() op$=InputBox("op=") If op$="+" Then a=a+2 If op$="-" Then a=a-2 Print aEnd SubA. -2 B. 0 C. +2 D. +032.表達(dá)式Not（a+b=c-d）是_A_。A. 邏輯表達(dá)式 B. 字符表達(dá)式 C. 算術(shù)表達(dá)式 D. 關(guān)系表達(dá)式33."-32768"的數(shù)據(jù)類型是_D_。A. 整型常

11、量 B. 浮點(diǎn)型常量 C. 符號(hào)常量 D. 字符串型常量34.在下列4個(gè)表達(dá)式中，非法的表達(dá)式形式是_C_。A. A+B=C B. 0=1 C. "ABC"+112 D. 1/2=0.535.設(shè) x=5，表達(dá)式 x>=10 or x<=20 的值是_A_。A. True B. False C. 0 D. 表達(dá)式非法36.下列數(shù)據(jù)類型不可能占8個(gè)字節(jié)的是_ D _。A. Date B. Currency C. String D. Integer37.下列各項(xiàng)不是Visual Basic的基本數(shù)據(jù)類型的是_ A _。A. Char B. String C. Inte

12、ger D. Double38.邏輯表達(dá)式 Not "a">"b" And 9<3 or 9>3的值為_ A _。A. True B. False C. 表達(dá)式有錯(cuò) D. 條件不足39.在窗體模塊的聲明段中聲明變量時(shí)，不能使用的關(guān)鍵字是_ D _。A. Private B. Public C. Dim D. Static40.選拔身高T超過1.7米且體重W小于62.5公斤的人，表示該條件的表達(dá)式為_ C _。A. T<=1.7 And W>=62.5B. T>1.7 Or W<62.5C. T>1.7 An

13、d W<62.5D. T<=1.7 Or W>=62.541.在過程內(nèi)部定義的局部變量，僅在聲明它的_ B _中有效。A. 方法B. 過程C. 屬性D. 對(duì)象42.假設(shè)A="Good Morning."，B="Afternoon,Boys."，下列表達(dá)式中結(jié)果是"Good Boys."的是_ A_。A) Left(A,5)+Right(B,5)B) Right(A,5)+Left(B,5)C) Mid(A,1,5)+Mid(B,1,6) D) Right(A,5)+Right(B,5)43.下列關(guān)于變體類型的描述，其

14、中正確的是_ C _。A. 變體是一種沒有類型的數(shù)據(jù)B. 變體的空值就表示該變體的值為0C. 一個(gè)變量沒有定義就賦值，該變量即為變體類型D. 變體是賦給變量某一種類型數(shù)據(jù)后，就不能再賦給它另一類型的數(shù)值44.下列程序段的運(yùn)行結(jié)果為_B_。For i=3 To 1 Step -1 Print Space(5-i); For j=1 To 2*i-1 Print "*" Next j PrintNext iA. * B. * C. * D. * * * * * * * * *45.執(zhí)行 PRINT 18/2*3,-32 命令后，輸出結(jié)果為_C_。A. 3 9 B. 3 -9 C

15、. 27 -9 D. -9 2746.執(zhí)行 PRINT 9.43.7,9.4 MOD 3.7 命令后，輸出結(jié)果為_ A _。 A. 2 1 B. 3 0 C. 2 20 D. 1 247.運(yùn)行以下程序段后，輸出結(jié)果為_ C _。x%=1/4y%=11/4PRINT x%;y%A. 0.25 0.75 B. 0 2 C. 0 3 D. 1 348.窗體里有兩個(gè)對(duì)象，分別是圖片框Picture1和標(biāo)簽Label1，下面關(guān)于Print方法的使用中，錯(cuò)誤的一條是_ D _。A. Picture1.Print 147 B. Print 147 C. Printer.Print 147 D. Label1

16、.Print 14749.下面的_ B _語(yǔ)句可以實(shí)現(xiàn)：先在窗體上輸出大寫字母A，然后在同一行的第10列輸出小寫字母b。A. Print "A"Tab(9);"b" B. Print "A"Tab(10);"b" C. Print "A"Space(10);"b" D. Print "A"Tab(8);"b"50.閱讀下面的程序段：n1=InputBox("請(qǐng)輸入第一個(gè)數(shù)：")n2=InputBox("請(qǐng)輸

17、入第二個(gè)數(shù)：")Print n1+n2當(dāng)輸入分別為111和222時(shí)，程序輸出為_ A _。A. B. 222 C. 333 D. 程序出錯(cuò)51.語(yǔ)句Print Format（"HELLO", "<"）的輸出結(jié)果是_ B _。A. HELLO B. hello C. He D. he52.設(shè)a=2:b=0，則語(yǔ)句 Print (a=2) And (b=-2) 的輸出結(jié)果是_ D _。A. True B. 結(jié)果不確定 C. -1 D. False53.以下程序段運(yùn)行后，輸出字符的排列順序是_ D _。For i=1 To 6 If i Mod

18、 2=0 Then Print "#" Else Print "*" End IfNext iA. #*#*# B. # C. * D. *#*#*# 54.用MsgBox函數(shù)顯示的對(duì)話框，以下敘述正確的是_ D _。A. 該對(duì)話框有一個(gè)“確定”按鈕B. 該對(duì)話框有“是”，“否”兩個(gè)按鈕C. 該對(duì)話框有“是”，“否”，“取消”三個(gè)按鈕 D. 該對(duì)話框通過選擇參數(shù)可以得到以上不同的的按鈕組合 55.與語(yǔ)句Dim abc%作用相同的語(yǔ)句是_ A _。A. Dim abc As Integer B. Dim abc As Long C. Dim abc As

19、String D. Dim abc As Date56.設(shè)a=1,b=2,c=3,d=4，則表達(dá)式IIf(a<b,c,d)的結(jié)果為_ B _。A. 4 B. 3 C. 2 D. 157.Rnd函數(shù)不可能為下列_ B_值。A. 0 B. 1 C. 0.1234 D. 0.000558.表達(dá)式Int(198.555*100+0.5)/100的值為_ C_。A. 198 B. 199.6 C. 198.56 D. 20059.Print Month(#5/30/2005#)語(yǔ)句顯示的結(jié)果是_ C_。A. 3 B. 4 C. 5 D. 660.若Y="welcome!"，則表

20、達(dá)式 Left(Y,Len(Y)-1)的值是_ C _。A. "welcome!" B. "w" C. "welcome" D. ""61.變量string$=" Hello , world! "，函數(shù)Trim(string)的結(jié)果是_ C_。A. "Hello , world! " B. " Hello , world!"C. "Hello , world!" D. "Hello ,world! "62.下列表達(dá)式

21、中，表達(dá)式_ A_的運(yùn)算結(jié)果與其它3個(gè)不同。A. Int(-3.5)-1.5 B. Int(-4.5)+0.5 C. -Abs(-4.5) D. Fix(-4.5)-0.563.表達(dá)式Sgn(-2)-3.5的值是_ D_。A. -1.5 B. -2.5 C. -3.5 D. -4.564.函數(shù)Mid("",3,4)的值是_ A_。A. "3456" B. "456" C. 3456 D. 45665.要使變量x賦值為1100間（含1，不含100）的一個(gè)隨機(jī)整數(shù)，正確的語(yǔ)句是_ D_。A. x=Int(100*Rnd) B. x=Int

22、(101*Rnd) C. x=1+Int(100*Rnd) D. x=1+Int(99*Rnd) 66.Visual Basic表達(dá)式Cos(0)+Abs(1)+Int(Rnd)的值是_D_。A. 1 B. -1 C. 0 D. 267.可實(shí)現(xiàn)從字符串任意位置截取字符的函數(shù)是_B_。A. Instr( ) B. Mid( ) C. Left( ) D. Right( )68.實(shí)現(xiàn)將小寫字母轉(zhuǎn)換成大寫字母的函數(shù)是_C_。A. Str( ) B. Upper( ) C. Ucase( ) D. Lcase( )69.能實(shí)現(xiàn)數(shù)值格式化輸出的函數(shù)是_D_。A. Str( ) B. Mid( ) C.

23、Chr( ) D. Format( )70.設(shè)a=6，則執(zhí)行x=IIf(a>5,-1,0)后，x的值為_ D_。A. 5 B. 6 C. 0 D. -171.表達(dá)式Int(5*Rnd+1)* Int(5*Rnd-1) 值的范圍是_ D_。A. 0,15 B. -1,15 C. -4,15 D. -5,1572.可以同時(shí)刪除字符串前導(dǎo)和尾部空格的函數(shù)是_C_。A. Ltrim B. Rtrim C. Trim D. Mid73.當(dāng)函數(shù)MsgBox返回值為1，對(duì)應(yīng)的符號(hào)常量是vbOK，那么此時(shí)表示用戶做的操作是_ A_。A. 用戶單擊了對(duì)話框中的“確定”按鈕 B. 用戶單擊了對(duì)話框中的“取消

24、”按鈕C. 用戶單擊了對(duì)話框中的“是”按鈕 D. 用戶單擊了對(duì)話框中的“否”按鈕74.函數(shù)Int(Rnd*5)+1產(chǎn)生的隨機(jī)整數(shù)的范圍是_D_。A. 0,6 B. 1,6 C. 0,5 D. 1,575.在VB中，InputBox函數(shù)的默認(rèn)返回值類型為字符串，用InputBox函數(shù)輸入數(shù)值型數(shù)據(jù)時(shí)，下列操作中可以有效防止程序出錯(cuò)的操作是_A_。A. 在函數(shù)InputBox前面使用Val函數(shù)進(jìn)行類型轉(zhuǎn)換B. 在函數(shù)InputBox前面使用Str函數(shù)進(jìn)行類型轉(zhuǎn)換C. 在函數(shù)InputBox前面使用Value函數(shù)進(jìn)行類型轉(zhuǎn)換D. 在函數(shù)InputBox前面使用String函數(shù)進(jìn)行類型轉(zhuǎn)換76.已知a

25、=""，則表達(dá)式Right(a, 4) + Mid(a, 3, 2)的值是_B_。A. "" B. "" C. D. 77.表達(dá)式Len("123程序設(shè)計(jì)ABC")的值是_A_。A. 10 B. 14 C. 20 D. 1778.賦值語(yǔ)句g = 123 + Mid("", 3, 2)執(zhí)行后，變量g中的值是_D_。A. "12334" B. 123 C. 12334 D. 15779.如果x是一個(gè)正實(shí)數(shù)，對(duì)x的第3位小數(shù)四舍五入的表達(dá)式是_B_。A. 0.01 * Int(x

26、+ 0.005) B. 0.01 * Int(100 * (x + 0.005)C. 0.01 * Int(100 * (x + 0.05) D. 0.01 * Int(x + 0.05)80.以下程序執(zhí)行后，輸出的結(jié)果是_A_。m$="123"n$="456"k$=LCASE$(m$)j$=UCASE$(n$)Print k$ , j$A. 123 456 B. !#$% C. 49 52 D. 33 3681.MsgBox函數(shù)的返回值的類型是_A_。A. 整型B. 字符串C. 邏輯值 D. 日期型82.A=5，B=8，則(B-A)*Rnd+A的結(jié)果是

27、介于_A_之間的數(shù)。A. 58 B. 05 C. 35 D. 0383.使用下列語(yǔ)句：Dim x(1 to 10,3) As Single，則數(shù)組占用內(nèi)存空間的字節(jié)數(shù)是_C_。A. 132 B. 80 C. 160 D. 12084.用Select Case語(yǔ)句選擇|x|<=10情況的語(yǔ)句為：Case_B_。A. Not (-10 To 10) B. -10 To 10 C. Is Abs(x)>10 D. Is <-10 Or >1085.若x=1，執(zhí)行語(yǔ)句If x Then x = 0 Else x = 1的結(jié)果是_D_。A. 實(shí)時(shí)錯(cuò)誤 B. 編譯錯(cuò)誤 C. x=1

28、 D. x=086.以下程序代碼能執(zhí)行的是_C_。A.If a=1 Then b=0 Else c=0 End IfB.If a=1 Then : B=0: ElseIf C=0 Then : D=0C.If a = 1 Then b = 0 ElseIf c = 0 Then d = 0 End IfD. If a = 1 Then b = 0 Else If c = 0 d = 0 End If87.下列程序段的循環(huán)結(jié)構(gòu)執(zhí)行后，i的輸出值是_C_。Dim y as IntegerFor i = 1 To 10 Step 2 y = y + iNext iPrint iA. 25 B. 10

29、 C. 11 D. 因?yàn)閥初值不知道，所以不確定88.循環(huán)結(jié)構(gòu) For i = 1 To 10 Step 1.5 的執(zhí)行次數(shù)是_A_。A. 7 B. 8 C. 9 D. 1089.下列結(jié)構(gòu)中不屬于循環(huán)結(jié)構(gòu)的是_C_。A. For/Next B. While/Wend C. With/End With D. Do/Loop90.下列結(jié)構(gòu)中不屬于分支結(jié)構(gòu)的是_ C_。A. If/End If B. Select Case/End Select C. With/End With D. If/Else/End If91.以下程序段的運(yùn)行結(jié)果是_ D_。Private Sub Form_Click()

30、m = 1 n = 1 Do m = m * n n = n + 1 Loop Until n > 4 Print mEnd SubA. 25 B. 45 C. 55 D. 2492.以下程序段的運(yùn)行結(jié)果是_A_。Private Sub Form_Click() Dim s As Long, f As Long Dim n As Integer, i As Integer f = 1 n = 4 For i = 1 To n f = f * i s = s + f Next i Print "s=" sEnd SubA. 33 B. 34 C. 35 D. 3693.

31、以下程序段的運(yùn)行結(jié)果是_B_。Private Sub Form_Click() Dim I As Integer, X As String, Y As String X = "ABCDEFG" For I = 4 To 1 Step -1 Y = Y + Mid(X, I, 1) Next I Print YEnd SubA. ABCD B. DCBA C. DEFG D. GFED94.以下程序段的運(yùn)行結(jié)果是_C_。Private Sub Form_Click() Dim b As Integer, k As Integer b = 1 For k = 1 To 5 b

32、= b * k If b >= 15 Then Exit For End If Next k Print k, bEnd SubA. 3 15 B. 2 12 C. 4 24 D. 5 1595.以下程序段的運(yùn)行結(jié)果是_ A_。Private Sub Form_Click() a = 1 b = a Do Until a >= 5 X = a * b Print Str(a) & "*" & Str(b) & "=" Str(X), a = a + b b = b + a LoopEnd SubA. 1*1=1 2*3

33、=6 B. 1*1=2 2*2=4 C. 1*1=1 3*3=9 D. 1*1=2 3*2=696.以下程序段的運(yùn)行結(jié)果是_B_。Private Sub Form_Click() x = "abcdef" y = Asc("b") - Asc("a") z = Len(x) Print y,zEnd SubA. 1 2 B. 1 6 C. 2 2 D. 2 697.下面程序段運(yùn)行后，顯示的結(jié)果是_A_。Dim xIf x Then Print x Else Print x+1A. 1 B. 0 C. -1 D. 顯示出錯(cuò)信息98.運(yùn)行

34、下列程序段，顯示的結(jié)果是_A_。x=Int(Rnd)+5Select Case x Case 5 Print "優(yōu)秀" Case 4 Print "良好" Case 3 Print "通過" Case Else Print "不通過"End SelectA. 優(yōu)秀 B. 良好 C. 通過 D. 不通過99.下列If語(yǔ)句統(tǒng)計(jì)滿足性別為男、職稱為副教授以上、年齡小于40歲條件的人數(shù)，不正確的語(yǔ)句是_D_。A. If sex=男And age<40 And InStr(duty,教授)>0 Then n=n+

35、1B. If sex=男And age<40 and(duty=教授or duty=副教授) Then n=n+1C. If sex=男And age<40 And Right(duty,2)=教授 Then n=n+1D. If sex=男And age<40 And duty=教授And duty=副教授 Then n=n+1100.下面分別是求兩個(gè)數(shù)中的大數(shù)的四個(gè)程序段，_ 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=y D. If

36、y>=x Then Max=y Max=x101.以下正確的程序段是_ B_。A. For x=1 To Step 10 B. For x=3 To -3 Step -3 Next x Next xC. For x=1 To 10 D. For x=10 To 1 re: Next x Next y If i=10 Then GoTo re102.下列循環(huán)能正常結(jié)束的是_C_。A. i=5 B. i=1 DO DO i=i+1 i=i+2 Loop Until i<0 Loop Until i=10C. i=10 D. i=6 DO DO i=i+1 i=i-2 Loop Unti

37、l i>10 Loop Until i=1103.若要退出For循環(huán)，可使用的語(yǔ)句為_D_。A. Exit B. Exit Do C. Time D. Exit For104.當(dāng)a=1,b=3,c=5,d=4時(shí)，執(zhí)行下面一段程序后，x的值為_B_。If a<b Then If c<d Then x=1 Else x=2 End IfElse If c<d Then x=3 Else x=4 End IfEnd IfA. 1 B. 2 C. 3 D. 4105.執(zhí)行如下程序段時(shí)，從鍵盤輸入-5，輸出的結(jié)果是_A_。x=-5s=Val(InputBox("請(qǐng)輸入s

38、的值:")Select Case s Case Is>0 y=x+1 Case Is=0 y=x+2 Case Else y=x+3End SelectPrint x;yA. -5 -2 B. -5 -4 C. -5 -3 D. -5 -5106.下面程序段的作用是_D_。m=0:n=0For i=1 To 10 x= Val(InputBox("請(qǐng)輸入x的值:") If x>0 Then m=m+x ElseIf x<0 Then n=n+1 End IfNext iPrint m,nA. 計(jì)算從鍵盤輸入的數(shù)據(jù)之和，并統(tǒng)計(jì)輸入數(shù)據(jù)的數(shù)目B. 分

39、別計(jì)算從鍵盤輸入的正數(shù)之和與負(fù)數(shù)之和C. 分別計(jì)算從鍵盤輸入的正數(shù)和負(fù)數(shù)的個(gè)數(shù)D. 計(jì)算從鍵盤輸入的正數(shù)之和，并統(tǒng)計(jì)負(fù)數(shù)的個(gè)數(shù)107.如果從鍵盤輸入的數(shù)據(jù)依次是1、2、3、4、5、6、7、8、9、10，下面程序段的運(yùn)行結(jié)果是_A_。s=0For i=1 To 10 x=Val(InputBox("請(qǐng)輸入x的值:") If x/3=Int(x/3) Then s=s+x End IfNext iPrint "s="s A. s=18 B. s=27 C. s=36 D. s=54108.在條件語(yǔ)句If x=1 Then y=2中，下列說法正確是_C_。A.

40、 x=1和y=2均為賦值語(yǔ)句 B. x=1和y=2均為關(guān)系表達(dá)式 C. x=1為關(guān)系表達(dá)式，y=2為賦值語(yǔ)句 D. x=1為賦值語(yǔ)句，y=2為關(guān)系表達(dá)式109.統(tǒng)計(jì)某大學(xué)在副教授以上職稱的高級(jí)職稱中，女性人才總數(shù)可用語(yǔ)句_D_。A. IF A$="女" AND B$="副教授" OR B$="教授" THEN N=N+1B. IF B$="副教授" AND B$="教授" AND A$="女" THEN N=N+1 C. IF B$>="副教授" A

41、ND A$="女" THEN N=N+1 D. IF A$="女" AND (B$="副教授" OR B$="教授") THEN N=N+1110.以下程序段執(zhí)行后，變量s、x的值分別為_ C_。 Dim s As Integer, x As Integers = 10: x = 1Do While x < 10 s = s + 2 x = x + 2LoopPrint s, xA. 50 11 B.20 10 C. 20 11 D. 100 10111.下列程序中 s = s + j 語(yǔ)句共執(zhí)行了_ B_次

42、。Dim s As IntegerDim i As Integer, j As IntegerFor i = 1 To 10 Step 2 For j = 1 To 5 Step 2 s = s + j Next jNext iPrint sA. 10 B. 15 C. 20 D. 25112.以下程序段執(zhí)行后，變量x的值為_C_。 x = 0For i = 1 To 5 For j = 1 To 5 x = x + 1 Next jNext iPrint xA. 15 B. 20 C. 25 D. 30 113.下列程序中語(yǔ)句 a=a-1 執(zhí)行的次數(shù)是_B_。a=0For b=1 To -2

43、 Step -1 a=a-1Next bA. 2 B. 4 C. 3 D. 0114.以下程序段的執(zhí)行結(jié)果是_D_。For x=1 To 2 a=0 For y=1 To x+1 a=a+1 Next y Print a;Next xA. 1 1 B. 0 0 C. 1 2 D. 2 3 115.以下程序段的執(zhí)行結(jié)果是_A_。n=0For i=0 To 1 For j=0 To 1 n=n+1 Next jNext iPrint nA. 4 B. 2 C. 1 D. 0 116.以下程序段的執(zhí)行結(jié)果是_A_。For i=1 To 4 x=2 For j=1 To 3 x=1 For k=1 T

44、o 2 x=x+3 Next k Next jNext iPrint xA. 7 B. 6 C. 56 D. 72 117.用語(yǔ)句 Dim A(-3 to 5) As Long 定義的數(shù)組元素個(gè)數(shù)是_C_。A. 7 B. 8 C. 9 D.10118.如下數(shù)組聲明語(yǔ)句，_B_正確。A. Dim a3,4 as Integer B. Dim a(3,4) as Integer C. Dim a(n,n) as Integer D. Dim a3,4 as Integer 119.以下程序運(yùn)行的結(jié)果是_D_。Dim aa=Array(1, 3, 4, 5, 6, 7)For i = LBound(

45、a) To UBound(a) a(i) = a(i) * a(i)Next iPrint a(i)A. 49 B. 0 C. 不確定 D. 下標(biāo)越界120.在窗體上添加一個(gè)命令按鈕Command1，然后編寫如下代碼：Private Sub Command1_Click() Dim city As Variant city = Array("北京", "上海", "天津", "重慶") Print city(1)End Sub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是_D_。 A. 空白 B. 錯(cuò)誤提示 C. 北京 D.

46、 上海121.以下程序運(yùn)行的結(jié)果是_C_。Option Base 0Private Sub Form_Click() Dim a Dim i As Integer a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) For i = 0 To 3 Print a(5 - i); Next iEnd Sub A. 4 3 2 1 B. 5 4 3 2 C. 6 5 4 3 D. 7 6 5 4122.在窗體上畫一個(gè)命令按鈕Command1，然后編寫如下代碼：Private Sub Command1_Click() Dim arr1(10), arr2(10) As Integer n = 3 For i = 1 To 5 arr1(i) = i arr2(n) = 2 * n + i Next i Print arr1(n),arr2(n); End Sub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是_B_。A. 11 3 B. 3 11 C. 13 3 D. 3 13123.在窗體上畫一個(gè)命令按