(30) 有如下程序：
Private Sub Command1_Click()
   Dim a As Single
   Dim b As Single
   a=2: b=4
   Call CS (a, b)
End Sub
Sub CS (x As Single, y As Single)
   t=x
   x=t ＼ y
   y=t Mod y
End Sub
程序運行后，單擊命令按鈕，a和b的值分別為
A) 0 0       
B) 1 1
C) 0 2       
D) 1 2
正確答案:  C

(31) 下面有一段程序代碼，如果從鍵盤上輸入"Computer"，則在文本框內顯示的內容是
Private Sub Text1_KeyPress(KeyAscii As Integer)
   If KeyAscii >=65 And KeyAscii <=122 Then
     KeyAscii=42
   End If
End Sub
A) Computer      
B) 什么都沒有
C) ********      
D) 程序出錯
正確答案:  C

(32) 下列有關子菜單的說法中，錯誤的是
A) 除了Click事件之外，菜單項不可以響應其他事件
B) 菜單項的索引號必須從1開始
C) 每個菜單項都是一個控件，與其他控件一樣也有其屬性和事件
D) 菜單的索引號可以不連續
正確答案:  B

(33) 在窗體上畫一個通用對話框，其名稱為CommonDialog1，然后畫一個命令按鈕，并編寫如下事件過程：
Private Sub Command1_Click()
   CommonDialog1.Flags=vbOFNHideReadOnly
   CommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.*) |*.txt|" _
                       & Batch Files(*.bat) |*.bat"
   CommonDialog1.FilterIndex=1
   CommonDialog1.ShowOpen
   MsgBox CommonDialog1.FileName
End Sub
程序運行后，單擊命令按鈕，將顯示一個"打開"對話框，此時在"文件類型"框中顯示的是
A) All Files(*.*)     
B) Text Files(*.*)
C) Batch Files(*.bat)    
D) All Files(*.*) |Text Files(*.*)
正確答案:  A

(34) 在Visual Basic中，要將一個窗體從內存中釋放，應使用的語句是
A) Hide       
B) Unload
C) Load       
D) Show
正確答案:  B

(35) 在Visual Basic中按文件的編碼方式不同，可將文件分為
A) 順序文件和隨機文件   
B) 文本文件和數據文件
C) ASCII文件和二進制文件  
D) 數據文件和可執行文件
正確答案:  C