一、選擇題(1～20每小題2分，21～30每小題3分，共70分)

1.VB表達(dá)式Sqr(a+b)^3*2中優(yōu)先進(jìn)行運(yùn)算的是( )（本題分值：2分）

A.Sqr函數(shù)
B.+
C.＾
D.*

2.以下不具有Picture屬性的對(duì)象是：( )（本題分值：2分）

A.窗體
B.圖片框
C.圖像框
D.文本框

3.在窗體的單擊事件中有如下程序:

程序運(yùn)行后單擊鼠標(biāo)左鍵，輸出的結(jié)果是( )（本題分值：2分）

A.1
B.15
C.90
D.120

4.系統(tǒng)符號(hào)常量的定義可以通過(guò)( )獲得.（本題分值：2分）

A.對(duì)象瀏覽器
B.代碼窗口
C.屬性窗口
D.工具箱

5.Integer類型的數(shù)據(jù)由( )字節(jié)組成。（本題分值：2分）

A.1
B.2
C.3
D.4

6.Long類型的數(shù)據(jù)由( )字節(jié)組成.（本題分值：2分）

A.2
B.4
C.8
D.16

7.表達(dá)式2*4^2-2*6/3+3的值是( )（本題分值：2分）

A.34
B.31
C.30
D.28

8.在用菜單編輯器設(shè)計(jì)菜單時(shí)，必須輸入的項(xiàng)是( )（本題分值：2分）

A.快捷鍵
B.標(biāo)題
C.索引
D.名稱

9.下面程序運(yùn)行后，S的值是( )


（本題分值：2分）

A.27
B.20
C.32
D.37

10.下列語(yǔ)句正確的是( )

（本題分值：2分）

A.If X≠Y Then Print "X不等于Y"
B.If X＜＞Y Then Print "X不等于Y"
C.If X＞＜Y Print "X不等于Y"
D.If X≠Y Print "X不等于Y"

11.計(jì)算分段函數(shù)：

下面程序段中正確的是( )

（本題分值：2分）

A.
B.
C.
D.

12.已知X＜Y，A＞B，正確表示它們之間關(guān)系的式子是( )（本題分值：2分）

A.Sgn(Y-X)-Sgn(A-B)＜0
B.Sgn(Y-X)-Sgn(A-B)=-2
C.Sgn(X-Y)-Sgn(A-B)=0
D.Sgn(X-Y)-Sgn(A-B)=-1

13.代數(shù)式對(duì)應(yīng)的VB表達(dá)式是( ) （本題分值：2分）

A.(Sin(3.14159-T)＾2/3)/(A*B)
B.Sin(3.14159-T)＾(2/3)/A*B
C.Sin(3.14159-T)＾(2/3)/(A*B)
D.(Sin(π-T)＾(2/3))/(A*B)

14.下面程序運(yùn)行后，窗體(Form1)中輸出的結(jié)果是( )


（本題分值：2分）

A.TrueTrue
B.True True
C.-1-1
D.X=3 Y=5

15.ComboBox組合框的類型由( )屬性確定。（本題分值：2分）

A.Style
B.ItemData
C.IMEMode
D.DragMode

16.如果X的值小于或等于Y的平方，則打印"OK"，表示這個(gè)條件的單行格式If語(yǔ)句是( ) （本題分值：2分）

A.If x＜=y^2 Then Print ″OK″
B.If x＜=y^2 Print ″OK″
C.If x＜=y^2 Then ″OK″
D.If x＜=y^2 Then Print ″OK″

17.要獲得文件列表框中當(dāng)前被選中的文件的文件名，則應(yīng)使用哪個(gè)屬性?( ) （本題分值：2分）

A.Dir
B.Path
C.Drive
D.FileName

18.下面程序執(zhí)行的結(jié)果是( )


（本題分值：2分）

A.123
B.456
C.″579″
D.579

[NextPage]

19.模擬方形骰子投擲的表達(dá)式是( )（本題分值：2分）

A.Int(6*Rnd(1))
B.Int(1+6*Rnd(1))
C.Int(6*Rnd(1)-1)
D.Int(7*Rnd(1)-1)

20.在一個(gè)有①邏輯運(yùn)算②算術(shù)運(yùn)算及③關(guān)系運(yùn)算混合在一起的表達(dá)式(無(wú)括號(hào))中，其運(yùn)算順序?yàn)? )
（本題分值：2分）

A.①②③
B.③②①
C.②③①
D.②①③

21.邏輯與(And)運(yùn)算的結(jié)果為"真"，與它所連接的兩個(gè)條件必須是( )（本題分值：2分）

A.前一個(gè)為"真"，后一個(gè)為"假"
B.前一個(gè)為"假"，后一個(gè)也為"假"
C.前一個(gè)為"真"，后一個(gè)也為"真"
D.前一個(gè)為"假"，后一個(gè)為"真"

22.下列運(yùn)算結(jié)果中，值最大的是( )（本題分值：2分）

A.3
B.3/4
C.4 Mod 3
D.3 Mod 4

23.在設(shè)計(jì)菜單時(shí)，如果要在菜單中加入一個(gè)菜單分隔項(xiàng)，則菜單分隔項(xiàng)的標(biāo)題必須設(shè)置為( ) （本題分值：2分）

A.冒號(hào)(:)
B.加號(hào)(+)
C.減號(hào)(-)
D.感嘆號(hào)(!)

24.在Do Until…Loop循環(huán)中，判斷循環(huán)表達(dá)式與結(jié)束循環(huán)的關(guān)系是( )（本題分值：2分）

A.先判斷循環(huán)表達(dá)式，當(dāng)表達(dá)式值為假時(shí)結(jié)束循環(huán)
B.先判斷循環(huán)表達(dá)式，當(dāng)表達(dá)式值為真時(shí)結(jié)束循環(huán)
C.先執(zhí)行循環(huán)體，后判斷循環(huán)表達(dá)式，當(dāng)表達(dá)式值為假時(shí)結(jié)束循環(huán)
D.先執(zhí)行循環(huán)體，后判斷循環(huán)表達(dá)式，當(dāng)表達(dá)式值為真時(shí)結(jié)束循環(huán)

25.在While循環(huán)中，判斷循環(huán)表達(dá)式與結(jié)束循環(huán)的關(guān)系是( ) （本題分值：2分）

A.先判斷循環(huán)表達(dá)式，當(dāng)表達(dá)式值為假時(shí)執(zhí)行循環(huán)體
B.先判斷循環(huán)表達(dá)式，當(dāng)表達(dá)式值為真時(shí)執(zhí)行循環(huán)體
C.先執(zhí)行循環(huán)體，后判斷循環(huán)表達(dá)式
D.無(wú)論循環(huán)體表達(dá)式的值真假與否，循環(huán)體至少執(zhí)行一次

26.若有以下說(shuō)明語(yǔ)句：

則下面表示記錄變量ABC1的成員T1正確的是( ) （本題分值：2分）

A.ABC1→T1
B.T1
C.T1.ABC1
D.ABC1.T1

27.當(dāng)函數(shù)EOF()的返回值為-1時(shí)，表示文件的指針指向( ) （本題分值：2分）

A.開(kāi)頭
B.結(jié)尾
C.第一個(gè)記錄
D.最后一個(gè)記錄

28.設(shè)a=6，則執(zhí)行x=IIf(a＞5,-1,0)后,x的值為( ) （本題分值：2分）

A.5
B.6
C.0
D.-1

29.下面程序運(yùn)行時(shí)用鼠標(biāo)左鍵單擊窗體，輸出的值是( )


（本題分值：2分）

A.ZXY
B.YZX
C.YZY
D.ZYZ

30.在窗體上畫(huà)一個(gè)命令按鈕，然后編寫如下程序：

程序運(yùn)行后單擊命令按鈕，N的值是( ) （本題分值：2分）

A.5
B.6
C.10
D.11

    二、填空題(每空2分，共30分)

1.為顯示彈出式菜單，可以使用 方法。（本題分值：2分）

2.為了能夠通過(guò)鍵盤訪問(wèn)主菜單項(xiàng)，可在菜單編輯器的"標(biāo)題"選項(xiàng)中的某字母前插入符號(hào)。運(yùn)行時(shí)，該字母會(huì)帶有下劃線，按Alt鍵和該字母就可以訪問(wèn)相應(yīng)的主菜單項(xiàng)。
（本題分值：2分）

3.在用手工方式設(shè)計(jì)工具欄時(shí)，可以設(shè)置工具按鈕的屬性為其添加功能提示。

（本題分值：2分）

4.定義動(dòng)態(tài)數(shù)組需要分兩步進(jìn)行，首先在模塊級(jí)或過(guò)程級(jí)定義一個(gè)沒(méi)有下標(biāo)的數(shù)組，然后在使用語(yǔ)句定義數(shù)組的實(shí)際元素個(gè)數(shù)。

（本題分值：4分）

5.在執(zhí)行KeyPress事件過(guò)程時(shí)，KeyAscii是所按鍵的值。對(duì)于有上檔字符和下檔字符的鍵，當(dāng)執(zhí)行KeyDown事件過(guò)程時(shí)，KeyCode是 字符的 值。

（本題分值：6分）

6.表達(dá)式(a-b)/(1+x*x-Exp(x))的數(shù)學(xué)式是 。

（本題分值：2分）

【正確答案】
【9】

7.a,T,Z,9這四個(gè)字符中的ASCII碼值最大的是。

（本題分值：2分）

8.以下程序代碼將整型動(dòng)態(tài)數(shù)組X聲明為具有20個(gè)元素的數(shù)組，并給數(shù)組的所有元素賦值1。
As Integer
Private Sub Command1_Click()
  ReDim
   For    I=1    To    20
     X(I)=1
     Print X(I)
   Next    I
End Sub

（本題分值：4分）

9. 以下程序代碼使用二維數(shù)組A表示矩陣，實(shí)現(xiàn)單擊命令按鈕Command1時(shí)使矩陣的兩條對(duì)角線上的元素值全為1，其余元素值全為0。 Private    Sub    Command1_Click()
   Dim    A(4,4)
   For    i=1    To    4
     For    j=1    To    4
       A()=0
     Next    j
       A()=1
       A()=1
   Next    i
   For    i=1    To    4
     For    j=1    To    4
     Print A(i,j);
     Next    j
     Print
   Next    i
End Sub

（本題分值：6分）