(21) 以下屬于Visual Basic合法的數組元素是
A) x8       
B) x［8］
      C) s(0)       
      D) v［8］
 正確答案:  C

(22) 編寫如下兩個事件過程：
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
 Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
 Print Chr(KeyAscii)
End Sub
在一般情況下(即不按住Shift鍵和鎖定大寫鍵時) 運行程序，如果按"A"鍵，則程序輸出的結果是

A)  A        
     a
B)  a
            A        
C) A        
            A         
      D)  a
           a
正確答案:  C

(23) 要使菜單項MenuOne在程序運行時失效，使用的語句是
A) MenuOne.Visible=True   
B) MenuOne.Visible=False
C) MenuOne.Enabled=True   
D) MenuOne.Enabled=False
正確答案:  D

(24) 在窗體上建立通用對話框需要添加的控件是
A) Data控件      
B) From控件
      C) CommonDialog控件    
    D) VBComboBox控件
正確答案:  C

(25) 在Visual Basic中，要將一個窗體加載到內存進行預處理但不顯示，應使用的語句是
A) Load       
B) Show
C) Hide       
D) Unload
正確答案:  A

(26) 運行下列程序段后，顯示的結果為
J1=23
J2=32
If J1<J2 Then Print J2 Else Print J1
A) 23     
B) 32
C) 55     
D) 2332
正確答案:  B

(27) 下列語句正確的是
A) If A≠B Then Print "A不等于B"
B) If A<>B Then Printf "A不等于B"
C) If A<>B Then Print "A不等于B"
D) If A≠B Print "A不等于B"
正確答案:  C

(28) 下面語句正確的是
A) If x<3�硑 And x>y Then y=x^3
B) If x<3�硑 And x>y Then y=3x
C) If x<3�硑:x>y Then y=x^3
D) If x<3�硑 And x>y Then y=x* *3
正確答案:  A

(29) 計算z的值，當x大于y時，z=x；否則z=y。下列語句錯誤的是
A) If x>=y Then z=x : z=y   
B) If x>=y Then z=x Else z=y
C) z=y : If x>=y Then z=x   
D) If x<=y Then z=y Else z=x
正確答案:  A

(30) 下列程序段執行結果為
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A) -3 3       
B) 5 -9
C) 3 -3       
D) -6 5
正確答案:  A