一、 單選題
1．在一行內(nèi)寫多條語(yǔ)句時(shí)，每個(gè)語(yǔ)句之間用________來(lái)分隔。
A） ，
B） ：
C） 、
D） ；
2．下面________是合法的變量名。
A） X_yx
B） 123abc
C） integer
D） X-Y
3．下面________是不合法的整常數(shù)。
A） 100
B） &O100
C） &H100
D） 0
4．下面________是合法的字符常數(shù)。
A） ABC$
B） "ABC"
C） ’ABC’
D） ABC
5．下面________是合法的單精度型變量。
A） num!
B） sum%
C） xint$
D） mm#
6．下面________是不合法的單精度常數(shù)。
A） 100!
B） 100.0
C） 1E+2
D） 100.0D+2
7．表達(dá)式16/4-2^5*8/4 MOD 5\2的值為________。
A） 14
B） 4
C） 20
D） 2
8．?dāng)?shù)學(xué)表達(dá)式3≤x＜10在VB中的邏輯表達(dá)式為________。
A） 3<=x<10
B） 3<=x AND x<10
C） x>=3 OR x<10
D） 3<=x AND <10
9．與數(shù)學(xué)表達(dá)式ab/3cd對(duì)應(yīng)，不正確的VB表達(dá)式為________。
A） a*b/(3*c*
D）
B） a/3*b/c/d
C） a*b/3/c/d
D） a*b/3*c*d
10. RND函數(shù)不可能是下列________值。
A） 1
B） 0
C） 0.123
D）0.00005
11. Int(198.55*100+0.5)/100的值為________。
A） 198
B） 199.6
C） 198.55
D）200
12. Int(198.555*100+0.5)/100的值為_______。
A）198
B）199.6
C）198.56
D）200
13. Print DateAdd("m"，1，#1/30/2000#)語(yǔ)句顯示的結(jié)果為________。
A） 00-2-29
B） 00-2-28
C） 00-2-30
D）00-1-31
14. 表達(dá)式DateDiff("y"，1，#12/30/1999#，#1/13/2000#)的結(jié)果為________。
A） 1
B） 11
C） 14
D） 99
15. 表達(dá)式Len（"123程序設(shè)計(jì)ABC"）的值是________。
A） 10
B） 14
C） 20
D） 17
16 .表達(dá)式LenB（"123程序設(shè)計(jì)ABC"）的值是________。
A） 10
B） 14
C） 20
D） 17
17. 下面正確的賦值語(yǔ)句是________。
A） x + y = 30
B） y = p*r*r
C） y = x + 30
D） 3y = x
18. 為了給x，y，z三個(gè)變量賦初值1，下面正確的賦值語(yǔ)句是________。
A） x = 1 : y = 1 : z = 1
B） x = 1, y = 1, z = 1
C） x = y = z = 1
D） xyz = 1
19. 賦值語(yǔ)句：a = 123 + MID("123456",3,2)執(zhí)行后，a變量的值是是________。
A） “1234”
B） 123
C） 12334
D） 157
20. 賦值語(yǔ)句：a = 123 & MID("123456",3,2)執(zhí)行后，a變量的值是是________。
A） “12334”
B） 123
C） 12334
D） 157
21. 表達(dá)式 12000 + "123" & 100 的結(jié)果為 ________。
A） 12000123100
B） 出錯(cuò)
C） 12123100
D） 12223
22. 表達(dá)式String(3, "ABCDED")的值為 ________。
A） C
B） "ABC"
C） ABC
D） "AAA"
23. 表達(dá)式InStr(3, "EFABCDEFG","EF")的值為 ________。
A） 1
B） 7
C） 2
D） “EF”
24. 以下合法的Visual Basic 標(biāo)識(shí)符是______。
A）ForLoop
B）Const
C）6abc
D）b#x
25.Visual Basic中的數(shù)值可以用十六進(jìn)制或八進(jìn)制表示，十六進(jìn)制數(shù)以&H開頭，八進(jìn)制數(shù)以______開頭。
A）$O
B）&O
C）$E
D）&E
26. 設(shè)有如下聲明：
Dim X As Integer
如果Sgn（X）的值為-1，則X的值是______。
A）整數(shù)
B）大于0的整數(shù)
C）等于0的整數(shù)
D）小于0的數(shù)
27. 產(chǎn)生[5，46]之間隨機(jī)整數(shù)VB表達(dá)式是______。
A）Int(Rnd(1)*42)+6
B）Int(Rnd(1)*42)+5
C）Int(Rnd(1))+41
D）Int(Rnd(1)*41)+5
28. 設(shè)a="Visual Basic",下面使b=" Basic"的語(yǔ)句是_______。
A） b=Left$(a,8,5)
B） b=Right$(a,5,5)
C） b=Mid$(a,8,5)
D） b=InStr(a,8)
29. 表達(dá)式Int(-17.8)+Sgn(17.8)的值是______。
A）18
B）-17
C）-18
D）-16
30. 表達(dá)式Val(".123E2CD")的值是______。
A）123
B）0
C）12.3
D）123E2CD
31．設(shè)a=5，b=10，則執(zhí)行c=int((b-A）*Rnd+A）+1后，c值的范圍為______。
A）5～10
B）6～9
C）6～10
D）5～9
32. 設(shè)有如下變量聲明
Dim TestDate AS Date
能為變量TestDate正確賦值的是______。
A）TestDate=#1/1/2007#
B）TestDate=#"1/1/2007"#
C）TestDate=date("1/1/2007")
D）Testdate=Format("m/d/yy","1/1/2007")
33. 在窗體中添加一個(gè)命令按鈕，并編寫如下程序：
Private Sub Command1_Click()
a%=2/3
b%=32/9
Print a%,b%
End Sub
運(yùn)行下列程序，輸出結(jié)果為______。
A）0 4
B）0 3
C）1 3
D）1 4
34. 以下關(guān)系表達(dá)式中，其值為False的是______。
A）"ABC">"AbC"
B）"the"<>"they"
C）"VISUAL"=UCase("Visual")
D）"Integer">"Int"
35. 若N=365，下述的語(yǔ)句中______顯示的值是33。
A）Print n - Int(n / 100) * 100
B）Print Int(n / 10) - Int(n / 100) * 10
C）Print Int(n / 10) - Int(n / 100)
D）Print Int(n - Int(n / 10) * 10) / 10
36. 表達(dá)式2*3^2+2*8/4+3 ^2的值為______。
A）64
B）31
C）49
D）22
37. 表達(dá)式Str(Len("1234"))+Str(5.9)的值為______。
A）45.9
B）4 5.9
C）12345.9
D）1234 5.9
38. 語(yǔ)句Print 5/4*6\5 Mod 2的輸出結(jié)果是______。
A）0
B）1
C）2
D）3
39. 表達(dá)式2+3*4^5+Sin(x+1)/2中最先進(jìn)行的運(yùn)算是______。
A）4^5
B）3*4
C）x+1
D）Sin()
40.表達(dá)式A%*B&-D#\3.0+F!的結(jié)果是______。
A）整型
B）長(zhǎng)整型
C）單精度型
D）雙精度型
41. 如果x是一個(gè)正實(shí)數(shù)，對(duì)x的第3位小數(shù)四舍五入的表達(dá)式是______。
A）0.01*Int(x+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)
42. 表達(dá)式Int(8 * Sqr(36 * (10 ^ (-2)) * 10 + 0.5)) / 10的值是______
A）1
B）1 6
C）1.6
D）0.16
43. 若N=235，下述的語(yǔ)句中______顯示的值為3。
A）PRINT N-INT（N/100）*100
B）PRINT INT（N/10）-INT（N/100）*10
C）PRINT INT（N/10）-INT（N/100）
D）PRINT INT（N-INT（N/10））/10
44. 在窗體上畫一個(gè)名稱為Command1 的命令按鈕，然后編寫如下事件過(guò)程：
Private Sub Command1_Click()
a$ = "VisualBasic"
Print String(3, a$)
End Sub
程序運(yùn)行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是______。
A）VVV
B）Vis
C）sic
D）ll
45. 函數(shù)String(n,"str")的功能是______。
A）把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串
B）返回由n個(gè)字符組成的字符串
C）從字符串中取出n個(gè)字符
D）從字符串中第n個(gè)字符的位置開始取子字符串
46. 以下程序段在立即窗口中輸出______。
A="your"
B="sname"
C="iscr"
Print Right(A,3)
Picture1.Print Mid(B,2,4)
Debug.Print Left(C,2)
A）name
B）our
C）is
D）ournameis
47. 設(shè)a="MicrosoftVisualBasic"，則以下使變量的b值為"VisualBasic"的語(yǔ)句是______。
A）b=Left(a,10)
B）b=Mid(a,10)
C）b=Right(a,10)
D）b=Mid(a,11,10)
48. 設(shè)a=10,b=5,c=1,執(zhí)行語(yǔ)句Print a>b>c后，窗體上顯示的是______。
A）True
B）False
C）1
D）出錯(cuò)信息
49. 設(shè)x=4，y=6，則以下不能在窗體上顯示出"A=10"的語(yǔ)句是______。
A）Print A=x+y
B）Print"A=";x+y
C）Print "A="+Str(x+y)
D）Print"A="&x十y
50. 下面表達(dá)式中,______的運(yùn)算結(jié)果與其他三個(gè)不同。
A）Exp(-3.5)
B）Int(-3.5)+0.5
C）-Abs(-3.5)
D）Sgn(-3.5)-2.5
51. 設(shè)a=5,b=4,c=3,d=2，下列表達(dá)式的值是_______
3>2*b Or a=c And b<>c Or c>d
A）1
B）True
C）False
D）2
52. 設(shè)a="MicrosoftVisualBasic", 則以下使變量b的值為"VisualBasic"的語(yǔ)句是_______。
A）b=Left(a,10)
B）b=Mid(a,10)
C）b=Right(a,10)
D）b=Mid(a,11,10)
53. 假定有如下的窗體事件過(guò)程：
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c = Mid(a$, 1, 9)
MsgBox a$, 34, b$
End Sub
程序運(yùn)行后單擊窗體，則在彈出的信息框中的標(biāo)題欄中顯示的信息是_______。
A）Microsoft Visual
B）Microsoft
C）Basic
D）34
54. 在窗體上畫一個(gè)文本框，然后編寫如下事件過(guò)程：
Private Sub Form_Click()
x = InputBox("請(qǐng)輸入一個(gè)整數(shù)")
Print x + Text1.Text
End Sub
程序運(yùn)行時(shí)，在文本框中輸入456，然后單擊窗體，在輸入對(duì)話框中輸入123，單擊“確定”按鈕后，在窗體上顯示的內(nèi)容是_______。
A）123
B）456
C）579
D）123456
55. 可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是_______。
A） Ltrim
B） Rtrim
C） Trim
D） Mid
56. \、/、Mod、*四個(gè)算術(shù)運(yùn)算符中，優(yōu)先級(jí)別最低的是_______。
A） \
B） /
C） Mod
D） *
57. 在VisualBasic中，日期 ／時(shí)間型常量要用_______括起來(lái)
A） "
B）#
C） *
D） {}
58. 設(shè)a%=20,b$=”30”,則下列輸出結(jié)果是”2030”的語(yǔ)句是_______。
A）Print str(A）
B）Print “a”+b
C）Print a+b
D）Print a & b
59. 下列關(guān)于變體數(shù)據(jù)類型的敘述中正確的是_______。
A） 變體是一種沒(méi)有類型的數(shù)據(jù)
B） 給變體變量賦某一種類型數(shù)值后，就不能再賦給另一種類型數(shù)值
C） 一個(gè)變量沒(méi)有定義就賦值，該變量即為變體類型
D） 變體的空值就表示該變體值為0
60. 表達(dá)式Fix(-32.68)+Int(-23.02)的值為 _______。
A） -55
B） -56
C） -57
D） –58
61. 在VB中，若要強(qiáng)制變量必須先定義才能使用，應(yīng)該用_______語(yǔ)句說(shuō)明。
A） Public Const
B） Option Explicit
C） Type 數(shù)據(jù)類型名
D） DefDbl
62 執(zhí)行以下程序段后，變量c$的值為_______。
a$="Visual Basic Programing"
b$="Quick"
c$=b$ & UCase(Mid$(a$,7,6)) & Right$(a$,11)
A） Visual BASIC Programing
B） Quick Basic Programing
C） QUICK Basic Programing
D） Quick BASIC Programing
63 .語(yǔ)句Print 5 * 5 \ 5 / 5的輸出結(jié)果是_______。
A） 5
B）25
C） 0
D）1
64. 語(yǔ)句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的輸出結(jié)果是_______。
A） -36
B）1
C） -1
D）-72
65. 假定Picture1和Text1分別為圖片框和文本框的名稱，下列不正確的語(yǔ)句是_______。
A） Print 2.5
B）Picture1.Print 2.5
C） Debug. Print 2.5
D） Text1.Print 2.5
66. 以下聲明語(yǔ)句中錯(cuò)誤的是_______。
A）Const var1=123
B）Dim var2 = ’ABC’
C）Dim var3%
D）Static var3 As Integer
67. 下列可作為Visual Basic變量名的是______。
A）A#A
B）4A
C）?xy
D）constA
68. 下列符號(hào)______不是VB中的合法變量名。
A）ABCabc
B）bd_1234
C）22wed
D）cmd$
69. 下列敘述中不正確的是______。
A）變量名的第一個(gè)字符必須是字母
B）變量名的長(zhǎng)度不超過(guò)255個(gè)字符
C）變量名可以包含小數(shù)點(diǎn)或者內(nèi)嵌的類型聲明字符
D）變量名不能使用關(guān)鍵字
70. 下列符號(hào)常量的聲明中，______是不合法的。
A）Const a As Single=1.1
B）Const a As Integer="15b"
C）Const a As Double=1
D）Const a As String = "Sin1"
71. 下面______不是字符串常量
A）"語(yǔ)言"
B）" "
C）"5"
D）#False#
72. 以下不合法的常量是 ______。
A）10^2
B）100
C）100.0
D）10E+01
73. 設(shè)有如下聲明：
Dim X As Integer
如果Sgn（X）的值為-1，則X的值是______。
A）整數(shù)
B）大于0的整數(shù)
C）等于0的整數(shù)
D）小于0的數(shù)
74. Rnd函數(shù)不可能產(chǎn)生______的值。
A）0
B）1
C）0.1234
D）0.00005
75. 在Visual Basic中，如果一個(gè)變量未作類型聲明而直接使用，則該變量的數(shù)據(jù)類型是______。
A）字符串型
B）數(shù)值型
C）變體類型
D）可以是任何類型
76. 設(shè)有如下語(yǔ)句：
Dim a,b As Integer
c="VisualBasic"
d=#7/20/2005#
以下關(guān)于這段代碼的敘述中，錯(cuò)誤的是______。
A）a被定義為Integer類型變量
B）b被定義為Integer類型變量
C）c中的數(shù)據(jù)是字符串
D）d中的數(shù)據(jù)是日期類型
77. Abs(-8)+Len("ABCD")的值是______。
A）12
B）14
C）8ABCD
D）-8ABCD
78. 設(shè)A="963214587",則表達(dá)式Val(Left(A,4)+Mid(A,4,2))的值為_____。
A）963214
B）963221
C）963216321
D）963213214
79. 如果X是一個(gè)正實(shí)數(shù)，將百分位四舍五入，保留一位小數(shù)的表達(dá)方式是______。
A）0.1*Int(X+0.05)
B）0.1*Int(10*(X+0.05))
C）0.1*Int(10*X)
D）Int(X+0.05)
80. 從鍵盤上輸入兩個(gè)字符串，分別保存在變量str1、str2中。確定第二個(gè)字符串在第一個(gè)字符串中起始位置的函數(shù)是______。
A） Left
B）Mid
C）String
D）Instr
81．已知A$=“12345678”，則表達(dá)式Val(Left(A$，4)+Mid(A$，4，2))的值為________。
A） 123456
B） 123445
C） 8
D） 6
82．在直角坐標(biāo)系中，x、y是坐標(biāo)系中任意點(diǎn)的位置，用x與y表示在第一或第三象限的表達(dá)式，以下不正確的是______。
A）(x>0 and y>0) and (x<0 and y<0)
B）(x>0 and y>0) and (x<0 and y<0)
C）x*y>0
D）x*y=Abs(x*y)
83．語(yǔ)句：Print “Sqr(9)=” ; Sqr(9)的輸出結(jié)果是_______。
A）Sqr(9)= Sqr(9)
B）Sqr(9)=3
C）”3”=3
D）3= Sqr(9)
84．下面程序段的輸出結(jié)果為________。
X = 10 ：Y = 20
Print X ；”+” ；Y ；”= ”；
Print X + Y
A）10 + 20 = 30
B）10 + 20 = 30
C）X+ Y = 30
D）10 + 20 = 30
85．若要處理一個(gè)值為50000的整數(shù)，應(yīng)采用哪種VB基本數(shù)據(jù)類型描述更合適？_______
A）Integer
B）Long
C）Single
D）String
86．以下函數(shù)表達(dá)式中，其值等于-3的是________。
A）Int(-3.5)
B）Fix(-3.5)
C）Round(-3.5)
D）Abs(-3.5)
87．以下函數(shù)表達(dá)式中，其值不等于3的是________。
A）Int(3.5)
B）Fix(3.5)
C）Round(3.5)
D）Abs(-3)
88．以下函數(shù)表達(dá)式中，其值不等于-4的是________。
A）Int(-3.5)
B）Fix(-4.5)
C）Round(-3.5)
D）Abs(-3.5)
89．以下函數(shù)表達(dá)式中，其值等于4的是________。
A）Int(3.5)
B）Fix(3.5)
C）Round(3.5)
D）Abs(3.5)
90．以下函數(shù)表達(dá)式中，其值等于3.5的是________。
A）Int(3.5)
B）Fix(3.5)
C）Round(3.5)
D）Abs(3.5)
二、 填空題
1. 整型變量X中存放了一個(gè)兩位數(shù)，要將兩位數(shù)交換位置，例如13變成31，實(shí)現(xiàn)的表達(dá)式是___【1】____。
2. 數(shù)學(xué)表達(dá)式 的VB表達(dá)式是___【2】____。
3. 數(shù)學(xué)表達(dá)式 的VB表達(dá)式是___【3】____。
4. 表示x是5的倍數(shù)或9的倍數(shù)的邏輯表達(dá)式是___【4】____。
5. 已知a=3.5，b=5.0，c=2.5，d=true，則表達(dá)式a>=0 AND a+c > b+3 OR NOT d的值是___【5】____。
6. 表達(dá)式Ucase(Mid(“abcdefgh”，3，4))的值是___【6】____。
7. 要以××××年××月××日形式顯示當(dāng)前機(jī)器內(nèi)日期的Format函數(shù)格式為__【7】____。
8. 計(jì)算距中華人民共和國(guó)建國(guó)60周年有多少天的函數(shù)表達(dá)式是___【8】____。
9. 計(jì)算離你畢業(yè)2012年6月30日還有多少個(gè)星期的函數(shù)表達(dá)式是___【9】____。
10. 表示s字符變量是字母(不區(qū)分大小寫)的邏輯表達(dá)式是__【10】____。
11. a$=Lcase("Hello") a$的返回值是：_【11】___；
b$=Ucase("Hello") b$的返回值是：__【12】__。
12. 與數(shù)學(xué)表達(dá)式 對(duì)應(yīng)的Visual Basic表達(dá)式是 【13】 。
13. 若A=20，B=80，C=70，D=30，則表達(dá)式A+B>160 Or (B+C>200 And Not D>60)的值是_【14】___。
14. 描述“X是小于100的非負(fù)整數(shù)”的Visual Basic表達(dá)式是【15】 。
15. 產(chǎn)生一在[3，X]區(qū)間的隨機(jī)整數(shù)應(yīng)使用表達(dá)式_【16】_。
參考答案
一、單選題
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
B A D B A D B B D A C C A C A
16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
C C A D A C D B A B D B C B C
31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
C A D A C B B B C D B C B A B
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
C B B A A B B C D C C B D C B
61 62 63 64 65 66 67 68 69 70 71 72 73 74 75
B D B C D B D C C B D A D B C
76 77 78 79 80 81 82 83 84 85 86 87 88 89 90
A A B B D B A B A B B C D C D
二、填空題
【1】 (X mod 10) * 10 + x\10
【2】 Sqr(x+e(3))/abs(x-y)-log(3*x)
【3】 (a + B）/(1/(c+5)-c*d/2)
【4】 x mod 5 OR x mod 9
【5】 False
【6】 CDEF
【7】 Format(date,“yyyy年mm月dd日”)
【8】 DateDiff(“d”,#10/1/2009#,now)+1
【9】 DateDiff(“w”,now,#6/10/2012#)
【10】 UCase(s)>=’A’ AND UCase(s)>=’Z’
【11】 "hello"
【12】 "HELLO"
【13】 (Cos^2(a+B）)/(3*x)+5~(Cos(a+B）*Cos(a+B）)/(3*x)+5
【14】 False
【15】 X<100 and X>=0 and X=int(X)或X%<100 And X%0>=0
【16】 INT(3+(X-3)*RND）~INT(3+(X-3)*RND(P))
1．在一行內(nèi)寫多條語(yǔ)句時(shí)，每個(gè)語(yǔ)句之間用________來(lái)分隔。
A） ，
B） ：
C） 、
D） ；
2．下面________是合法的變量名。
A） X_yx
B） 123abc
C） integer
D） X-Y
3．下面________是不合法的整常數(shù)。
A） 100
B） &O100
C） &H100
D） 0
4．下面________是合法的字符常數(shù)。
A） ABC$
B） "ABC"
C） ’ABC’
D） ABC
5．下面________是合法的單精度型變量。
A） num!
B） sum%
C） xint$
D） mm#
6．下面________是不合法的單精度常數(shù)。
A） 100!
B） 100.0
C） 1E+2
D） 100.0D+2
7．表達(dá)式16/4-2^5*8/4 MOD 5\2的值為________。
A） 14
B） 4
C） 20
D） 2
8．?dāng)?shù)學(xué)表達(dá)式3≤x＜10在VB中的邏輯表達(dá)式為________。
A） 3<=x<10
B） 3<=x AND x<10
C） x>=3 OR x<10
D） 3<=x AND <10
9．與數(shù)學(xué)表達(dá)式ab/3cd對(duì)應(yīng)，不正確的VB表達(dá)式為________。
A） a*b/(3*c*
D）
B） a/3*b/c/d
C） a*b/3/c/d
D） a*b/3*c*d
10. RND函數(shù)不可能是下列________值。
A） 1
B） 0
C） 0.123
D）0.00005
11. Int(198.55*100+0.5)/100的值為________。
A） 198
B） 199.6
C） 198.55
D）200
12. Int(198.555*100+0.5)/100的值為_______。
A）198
B）199.6
C）198.56
D）200
13. Print DateAdd("m"，1，#1/30/2000#)語(yǔ)句顯示的結(jié)果為________。
A） 00-2-29
B） 00-2-28
C） 00-2-30
D）00-1-31
14. 表達(dá)式DateDiff("y"，1，#12/30/1999#，#1/13/2000#)的結(jié)果為________。
A） 1
B） 11
C） 14
D） 99
15. 表達(dá)式Len（"123程序設(shè)計(jì)ABC"）的值是________。
A） 10
B） 14
C） 20
D） 17
16 .表達(dá)式LenB（"123程序設(shè)計(jì)ABC"）的值是________。
A） 10
B） 14
C） 20
D） 17
17. 下面正確的賦值語(yǔ)句是________。
A） x + y = 30
B） y = p*r*r
C） y = x + 30
D） 3y = x
18. 為了給x，y，z三個(gè)變量賦初值1，下面正確的賦值語(yǔ)句是________。
A） x = 1 : y = 1 : z = 1
B） x = 1, y = 1, z = 1
C） x = y = z = 1
D） xyz = 1
19. 賦值語(yǔ)句：a = 123 + MID("123456",3,2)執(zhí)行后，a變量的值是是________。
A） “1234”
B） 123
C） 12334
D） 157
20. 賦值語(yǔ)句：a = 123 & MID("123456",3,2)執(zhí)行后，a變量的值是是________。
A） “12334”
B） 123
C） 12334
D） 157
21. 表達(dá)式 12000 + "123" & 100 的結(jié)果為 ________。
A） 12000123100
B） 出錯(cuò)
C） 12123100
D） 12223
22. 表達(dá)式String(3, "ABCDED")的值為 ________。
A） C
B） "ABC"
C） ABC
D） "AAA"
23. 表達(dá)式InStr(3, "EFABCDEFG","EF")的值為 ________。
A） 1
B） 7
C） 2
D） “EF”
24. 以下合法的Visual Basic 標(biāo)識(shí)符是______。
A）ForLoop
B）Const
C）6abc
D）b#x
25.Visual Basic中的數(shù)值可以用十六進(jìn)制或八進(jìn)制表示，十六進(jìn)制數(shù)以&H開頭，八進(jìn)制數(shù)以______開頭。
A）$O
B）&O
C）$E
D）&E
26. 設(shè)有如下聲明：
Dim X As Integer
如果Sgn（X）的值為-1，則X的值是______。
A）整數(shù)
B）大于0的整數(shù)
C）等于0的整數(shù)
D）小于0的數(shù)
27. 產(chǎn)生[5，46]之間隨機(jī)整數(shù)VB表達(dá)式是______。
A）Int(Rnd(1)*42)+6
B）Int(Rnd(1)*42)+5
C）Int(Rnd(1))+41
D）Int(Rnd(1)*41)+5
28. 設(shè)a="Visual Basic",下面使b=" Basic"的語(yǔ)句是_______。
A） b=Left$(a,8,5)
B） b=Right$(a,5,5)
C） b=Mid$(a,8,5)
D） b=InStr(a,8)
29. 表達(dá)式Int(-17.8)+Sgn(17.8)的值是______。
A）18
B）-17
C）-18
D）-16
30. 表達(dá)式Val(".123E2CD")的值是______。
A）123
B）0
C）12.3
D）123E2CD
31．設(shè)a=5，b=10，則執(zhí)行c=int((b-A）*Rnd+A）+1后，c值的范圍為______。
A）5～10
B）6～9
C）6～10
D）5～9
32. 設(shè)有如下變量聲明
Dim TestDate AS Date
能為變量TestDate正確賦值的是______。
A）TestDate=#1/1/2007#
B）TestDate=#"1/1/2007"#
C）TestDate=date("1/1/2007")
D）Testdate=Format("m/d/yy","1/1/2007")
33. 在窗體中添加一個(gè)命令按鈕，并編寫如下程序：
Private Sub Command1_Click()
a%=2/3
b%=32/9
Print a%,b%
End Sub
運(yùn)行下列程序，輸出結(jié)果為______。
A）0 4
B）0 3
C）1 3
D）1 4
34. 以下關(guān)系表達(dá)式中，其值為False的是______。
A）"ABC">"AbC"
B）"the"<>"they"
C）"VISUAL"=UCase("Visual")
D）"Integer">"Int"
35. 若N=365，下述的語(yǔ)句中______顯示的值是33。
A）Print n - Int(n / 100) * 100
B）Print Int(n / 10) - Int(n / 100) * 10
C）Print Int(n / 10) - Int(n / 100)
D）Print Int(n - Int(n / 10) * 10) / 10
36. 表達(dá)式2*3^2+2*8/4+3 ^2的值為______。
A）64
B）31
C）49
D）22
37. 表達(dá)式Str(Len("1234"))+Str(5.9)的值為______。
A）45.9
B）4 5.9
C）12345.9
D）1234 5.9
38. 語(yǔ)句Print 5/4*6\5 Mod 2的輸出結(jié)果是______。
A）0
B）1
C）2
D）3
39. 表達(dá)式2+3*4^5+Sin(x+1)/2中最先進(jìn)行的運(yùn)算是______。
A）4^5
B）3*4
C）x+1
D）Sin()
40.表達(dá)式A%*B&-D#\3.0+F!的結(jié)果是______。
A）整型
B）長(zhǎng)整型
C）單精度型
D）雙精度型
41. 如果x是一個(gè)正實(shí)數(shù)，對(duì)x的第3位小數(shù)四舍五入的表達(dá)式是______。
A）0.01*Int(x+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)
42. 表達(dá)式Int(8 * Sqr(36 * (10 ^ (-2)) * 10 + 0.5)) / 10的值是______
A）1
B）1 6
C）1.6
D）0.16
43. 若N=235，下述的語(yǔ)句中______顯示的值為3。
A）PRINT N-INT（N/100）*100
B）PRINT INT（N/10）-INT（N/100）*10
C）PRINT INT（N/10）-INT（N/100）
D）PRINT INT（N-INT（N/10））/10
44. 在窗體上畫一個(gè)名稱為Command1 的命令按鈕，然后編寫如下事件過(guò)程：
Private Sub Command1_Click()
a$ = "VisualBasic"
Print String(3, a$)
End Sub
程序運(yùn)行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是______。
A）VVV
B）Vis
C）sic
D）ll
45. 函數(shù)String(n,"str")的功能是______。
A）把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串
B）返回由n個(gè)字符組成的字符串
C）從字符串中取出n個(gè)字符
D）從字符串中第n個(gè)字符的位置開始取子字符串
46. 以下程序段在立即窗口中輸出______。
A="your"
B="sname"
C="iscr"
Print Right(A,3)
Picture1.Print Mid(B,2,4)
Debug.Print Left(C,2)
A）name
B）our
C）is
D）ournameis
47. 設(shè)a="MicrosoftVisualBasic"，則以下使變量的b值為"VisualBasic"的語(yǔ)句是______。
A）b=Left(a,10)
B）b=Mid(a,10)
C）b=Right(a,10)
D）b=Mid(a,11,10)
48. 設(shè)a=10,b=5,c=1,執(zhí)行語(yǔ)句Print a>b>c后，窗體上顯示的是______。
A）True
B）False
C）1
D）出錯(cuò)信息
49. 設(shè)x=4，y=6，則以下不能在窗體上顯示出"A=10"的語(yǔ)句是______。
A）Print A=x+y
B）Print"A=";x+y
C）Print "A="+Str(x+y)
D）Print"A="&x十y
50. 下面表達(dá)式中,______的運(yùn)算結(jié)果與其他三個(gè)不同。
A）Exp(-3.5)
B）Int(-3.5)+0.5
C）-Abs(-3.5)
D）Sgn(-3.5)-2.5
51. 設(shè)a=5,b=4,c=3,d=2，下列表達(dá)式的值是_______
3>2*b Or a=c And b<>c Or c>d
A）1
B）True
C）False
D）2
52. 設(shè)a="MicrosoftVisualBasic", 則以下使變量b的值為"VisualBasic"的語(yǔ)句是_______。
A）b=Left(a,10)
B）b=Mid(a,10)
C）b=Right(a,10)
D）b=Mid(a,11,10)
53. 假定有如下的窗體事件過(guò)程：
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c = Mid(a$, 1, 9)
MsgBox a$, 34, b$
End Sub
程序運(yùn)行后單擊窗體，則在彈出的信息框中的標(biāo)題欄中顯示的信息是_______。
A）Microsoft Visual
B）Microsoft
C）Basic
D）34
54. 在窗體上畫一個(gè)文本框，然后編寫如下事件過(guò)程：
Private Sub Form_Click()
x = InputBox("請(qǐng)輸入一個(gè)整數(shù)")
Print x + Text1.Text
End Sub
程序運(yùn)行時(shí)，在文本框中輸入456，然后單擊窗體，在輸入對(duì)話框中輸入123，單擊“確定”按鈕后，在窗體上顯示的內(nèi)容是_______。
A）123
B）456
C）579
D）123456
55. 可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是_______。
A） Ltrim
B） Rtrim
C） Trim
D） Mid
56. \、/、Mod、*四個(gè)算術(shù)運(yùn)算符中，優(yōu)先級(jí)別最低的是_______。
A） \
B） /
C） Mod
D） *
57. 在VisualBasic中，日期 ／時(shí)間型常量要用_______括起來(lái)
A） "
B）#
C） *
D） {}
58. 設(shè)a%=20,b$=”30”,則下列輸出結(jié)果是”2030”的語(yǔ)句是_______。
A）Print str(A）
B）Print “a”+b
C）Print a+b
D）Print a & b
59. 下列關(guān)于變體數(shù)據(jù)類型的敘述中正確的是_______。
A） 變體是一種沒(méi)有類型的數(shù)據(jù)
B） 給變體變量賦某一種類型數(shù)值后，就不能再賦給另一種類型數(shù)值
C） 一個(gè)變量沒(méi)有定義就賦值，該變量即為變體類型
D） 變體的空值就表示該變體值為0
60. 表達(dá)式Fix(-32.68)+Int(-23.02)的值為 _______。
A） -55
B） -56
C） -57
D） –58
61. 在VB中，若要強(qiáng)制變量必須先定義才能使用，應(yīng)該用_______語(yǔ)句說(shuō)明。
A） Public Const
B） Option Explicit
C） Type 數(shù)據(jù)類型名
D） DefDbl
62 執(zhí)行以下程序段后，變量c$的值為_______。
a$="Visual Basic Programing"
b$="Quick"
c$=b$ & UCase(Mid$(a$,7,6)) & Right$(a$,11)
A） Visual BASIC Programing
B） Quick Basic Programing
C） QUICK Basic Programing
D） Quick BASIC Programing
63 .語(yǔ)句Print 5 * 5 \ 5 / 5的輸出結(jié)果是_______。
A） 5
B）25
C） 0
D）1
64. 語(yǔ)句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的輸出結(jié)果是_______。
A） -36
B）1
C） -1
D）-72
65. 假定Picture1和Text1分別為圖片框和文本框的名稱，下列不正確的語(yǔ)句是_______。
A） Print 2.5
B）Picture1.Print 2.5
C） Debug. Print 2.5
D） Text1.Print 2.5
66. 以下聲明語(yǔ)句中錯(cuò)誤的是_______。
A）Const var1=123
B）Dim var2 = ’ABC’
C）Dim var3%
D）Static var3 As Integer
67. 下列可作為Visual Basic變量名的是______。
A）A#A
B）4A
C）?xy
D）constA
68. 下列符號(hào)______不是VB中的合法變量名。
A）ABCabc
B）bd_1234
C）22wed
D）cmd$
69. 下列敘述中不正確的是______。
A）變量名的第一個(gè)字符必須是字母
B）變量名的長(zhǎng)度不超過(guò)255個(gè)字符
C）變量名可以包含小數(shù)點(diǎn)或者內(nèi)嵌的類型聲明字符
D）變量名不能使用關(guān)鍵字
70. 下列符號(hào)常量的聲明中，______是不合法的。
A）Const a As Single=1.1
B）Const a As Integer="15b"
C）Const a As Double=1
D）Const a As String = "Sin1"
71. 下面______不是字符串常量
A）"語(yǔ)言"
B）" "
C）"5"
D）#False#
72. 以下不合法的常量是 ______。
A）10^2
B）100
C）100.0
D）10E+01
73. 設(shè)有如下聲明：
Dim X As Integer
如果Sgn（X）的值為-1，則X的值是______。
A）整數(shù)
B）大于0的整數(shù)
C）等于0的整數(shù)
D）小于0的數(shù)
74. Rnd函數(shù)不可能產(chǎn)生______的值。
A）0
B）1
C）0.1234
D）0.00005
75. 在Visual Basic中，如果一個(gè)變量未作類型聲明而直接使用，則該變量的數(shù)據(jù)類型是______。
A）字符串型
B）數(shù)值型
C）變體類型
D）可以是任何類型
76. 設(shè)有如下語(yǔ)句：
Dim a,b As Integer
c="VisualBasic"
d=#7/20/2005#
以下關(guān)于這段代碼的敘述中，錯(cuò)誤的是______。
A）a被定義為Integer類型變量
B）b被定義為Integer類型變量
C）c中的數(shù)據(jù)是字符串
D）d中的數(shù)據(jù)是日期類型
77. Abs(-8)+Len("ABCD")的值是______。
A）12
B）14
C）8ABCD
D）-8ABCD
78. 設(shè)A="963214587",則表達(dá)式Val(Left(A,4)+Mid(A,4,2))的值為_____。
A）963214
B）963221
C）963216321
D）963213214
79. 如果X是一個(gè)正實(shí)數(shù)，將百分位四舍五入，保留一位小數(shù)的表達(dá)方式是______。
A）0.1*Int(X+0.05)
B）0.1*Int(10*(X+0.05))
C）0.1*Int(10*X)
D）Int(X+0.05)
80. 從鍵盤上輸入兩個(gè)字符串，分別保存在變量str1、str2中。確定第二個(gè)字符串在第一個(gè)字符串中起始位置的函數(shù)是______。
A） Left
B）Mid
C）String
D）Instr
81．已知A$=“12345678”，則表達(dá)式Val(Left(A$，4)+Mid(A$，4，2))的值為________。
A） 123456
B） 123445
C） 8
D） 6
82．在直角坐標(biāo)系中，x、y是坐標(biāo)系中任意點(diǎn)的位置，用x與y表示在第一或第三象限的表達(dá)式，以下不正確的是______。
A）(x>0 and y>0) and (x<0 and y<0)
B）(x>0 and y>0) and (x<0 and y<0)
C）x*y>0
D）x*y=Abs(x*y)
83．語(yǔ)句：Print “Sqr(9)=” ; Sqr(9)的輸出結(jié)果是_______。
A）Sqr(9)= Sqr(9)
B）Sqr(9)=3
C）”3”=3
D）3= Sqr(9)
84．下面程序段的輸出結(jié)果為________。
X = 10 ：Y = 20
Print X ；”+” ；Y ；”= ”；
Print X + Y
A）10 + 20 = 30
B）10 + 20 = 30
C）X+ Y = 30
D）10 + 20 = 30
85．若要處理一個(gè)值為50000的整數(shù)，應(yīng)采用哪種VB基本數(shù)據(jù)類型描述更合適？_______
A）Integer
B）Long
C）Single
D）String
86．以下函數(shù)表達(dá)式中，其值等于-3的是________。
A）Int(-3.5)
B）Fix(-3.5)
C）Round(-3.5)
D）Abs(-3.5)
87．以下函數(shù)表達(dá)式中，其值不等于3的是________。
A）Int(3.5)
B）Fix(3.5)
C）Round(3.5)
D）Abs(-3)
88．以下函數(shù)表達(dá)式中，其值不等于-4的是________。
A）Int(-3.5)
B）Fix(-4.5)
C）Round(-3.5)
D）Abs(-3.5)
89．以下函數(shù)表達(dá)式中，其值等于4的是________。
A）Int(3.5)
B）Fix(3.5)
C）Round(3.5)
D）Abs(3.5)
90．以下函數(shù)表達(dá)式中，其值等于3.5的是________。
A）Int(3.5)
B）Fix(3.5)
C）Round(3.5)
D）Abs(3.5)
二、 填空題
1. 整型變量X中存放了一個(gè)兩位數(shù)，要將兩位數(shù)交換位置，例如13變成31，實(shí)現(xiàn)的表達(dá)式是___【1】____。
2. 數(shù)學(xué)表達(dá)式 的VB表達(dá)式是___【2】____。
3. 數(shù)學(xué)表達(dá)式 的VB表達(dá)式是___【3】____。
4. 表示x是5的倍數(shù)或9的倍數(shù)的邏輯表達(dá)式是___【4】____。
5. 已知a=3.5，b=5.0，c=2.5，d=true，則表達(dá)式a>=0 AND a+c > b+3 OR NOT d的值是___【5】____。
6. 表達(dá)式Ucase(Mid(“abcdefgh”，3，4))的值是___【6】____。
7. 要以××××年××月××日形式顯示當(dāng)前機(jī)器內(nèi)日期的Format函數(shù)格式為__【7】____。
8. 計(jì)算距中華人民共和國(guó)建國(guó)60周年有多少天的函數(shù)表達(dá)式是___【8】____。
9. 計(jì)算離你畢業(yè)2012年6月30日還有多少個(gè)星期的函數(shù)表達(dá)式是___【9】____。
10. 表示s字符變量是字母(不區(qū)分大小寫)的邏輯表達(dá)式是__【10】____。
11. a$=Lcase("Hello") a$的返回值是：_【11】___；
b$=Ucase("Hello") b$的返回值是：__【12】__。
12. 與數(shù)學(xué)表達(dá)式 對(duì)應(yīng)的Visual Basic表達(dá)式是 【13】 。
13. 若A=20，B=80，C=70，D=30，則表達(dá)式A+B>160 Or (B+C>200 And Not D>60)的值是_【14】___。
14. 描述“X是小于100的非負(fù)整數(shù)”的Visual Basic表達(dá)式是【15】 。
15. 產(chǎn)生一在[3，X]區(qū)間的隨機(jī)整數(shù)應(yīng)使用表達(dá)式_【16】_。
參考答案
一、單選題
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
B A D B A D B B D A C C A C A
16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
C C A D A C D B A B D B C B C
31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
C A D A C B B B C D B C B A B
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
C B B A A B B C D C C B D C B
61 62 63 64 65 66 67 68 69 70 71 72 73 74 75
B D B C D B D C C B D A D B C
76 77 78 79 80 81 82 83 84 85 86 87 88 89 90
A A B B D B A B A B B C D C D
二、填空題
【1】 (X mod 10) * 10 + x\10
【2】 Sqr(x+e(3))/abs(x-y)-log(3*x)
【3】 (a + B）/(1/(c+5)-c*d/2)
【4】 x mod 5 OR x mod 9
【5】 False
【6】 CDEF
【7】 Format(date,“yyyy年mm月dd日”)
【8】 DateDiff(“d”,#10/1/2009#,now)+1
【9】 DateDiff(“w”,now,#6/10/2012#)
【10】 UCase(s)>=’A’ AND UCase(s)>=’Z’
【11】 "hello"
【12】 "HELLO"
【13】 (Cos^2(a+B）)/(3*x)+5~(Cos(a+B）*Cos(a+B）)/(3*x)+5
【14】 False
【15】 X<100 and X>=0 and X=int(X)或X%<100 And X%0>=0
【16】 INT(3+(X-3)*RND）~INT(3+(X-3)*RND(P))