(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",則在文本框內(nèi)顯示的內(nèi)容是
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) 菜單的索引號可以不連續(xù)
正確答案: 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中,要將一個窗體從內(nèi)存中釋放,應使用的語句是
A) Hide
B) Unload
C) Load
D) Show
正確答案: B
(35) 在Visual Basic中按文件的編碼方式不同,可將文件分為
A) 順序文件和隨機文件
B) 文本文件和數(shù)據(jù)文件
C) ASCII文件和二進制文件
D) 數(shù)據(jù)文件和可執(zhí)行文件
正確答案: C
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |