16.執(zhí)行語句s=Len(Mid("VisualBasic",1,6))后,s的值是(A)
A.Visual
B.Basic
C.6
D.11
17.以下敘述中錯誤的是(D)
A.下拉式菜單能用菜單編輯器建立
B.在多窗體程序中,每個窗體都可以建立自己的菜單系統(tǒng)
C.能夠對菜單項的Click事件編程
D.如果把一個菜單項的Enabled屬性設置為False,則該菜單項不可見
18.在窗體上畫一個命令按鈕,其名稱為Command1,然后編寫如下事件過程:
Private Sub Command1_Click( )
a = "12345"
Print Format$(a, "000.00")
End Sub
程序運行后,單擊命令按鈕,窗體上顯示的是(B)
A.123.45
B.12345.00
C.12345
D.00123.45
19.以下關于函數(shù)過程的敘述中,正確的是(A)
A.函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關系
B.在函數(shù)過程中,過程的返回值可以有多個
C.當數(shù)組作為函數(shù)過程的參數(shù)時,既能以傳值方式傳遞,也能以傳址方式傳遞
D.如果不指明函數(shù)過程參數(shù)的類型,則該參數(shù)不能有數(shù)據類型的參數(shù)
20.以下關于變量作用域的敘述中,正確的是(C)
A.用dim定義變量是靜態(tài)變量
B.靜態(tài)變量必須在標準模塊中聲明
C.用public定義變量是全局變量
D.Static類型變量的作用域范圍是它所在的窗體或模塊文件
21.確定一個控件在窗體上的位置的屬性是(C)
A.Width和Height
B.Width或Height
C.Top和Left
D.Top或Left
22.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click( )
Text1.Text = "Visual"
Me.Text1 = "Basic"
Text1 = "Program"
End Sub
程序運行后,如果單擊命令按鈕,則在文本框中顯示的是(C)
A.Visual
B.Basic
C.Program
D.出錯
23.以下關系表達式中,其值為False的是(A)
A."ABC">"AbC"
B."the"<>"they"
C."VISUAL"=UCase("Visual")
D."Integer">"Int"
24.語句Print int(5/4*6\5) Mod 2的輸出結果是(B)
A.0
B.1
C.2
D.3
25.在窗體上畫一個文本框、一個標簽和一個命令按鈕,其名稱分別為Text1、Label1和Command1,然后編寫如下兩個事件過程:
Private Sub Command1_Click( )
strText = InputBox("請輸入")
Text1.Text = strText
End Sub
Private Sub Text1_Change( )
Label1.Caption = Right(Trim(Text1.Text), 3)
End Sub
程序運行后,單擊命令按鈕,如果在輸入對話框中輸入abcdef,則在標簽中顯示的內容是(D)
A.空
B.abcdef
C.abc
D.def
26.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click( )
x = -5
If x >0 Then
y = x ^ 2
Else
y = x
End If
Print y
End Sub
程序運行后,單擊命令按鈕,窗體上顯示的是(A)
A.-5
B.25
C.1
D.-1
27.一個工程中含有窗體Form1、Form2和標準模塊Model1,如果在Form1中有語句Pubilc X As
Integer,在Model1中有語句Pubilc Y As Integer,則以下敘述中正確的是(A)
A.變量X、Y的作用域相同
B.Y的作用域是Model1
C.在Form1的任何地方中可以直接使用Y
D.在Form2中可以直接使用X和Y
28.在窗體上畫一個名稱為Drive1的驅動器列表框,一個名稱為Dir1的目錄列表框。當改變當前驅動器時,目錄列表框應該與之同步改變。設置兩個控件同步的命令放在一個事件過程中,這個事件過程是(A)
A.Drive1_Change
B.Drive1_Click
C.Dir1_Click
D.Dir1_KeyPress
29.在窗體上畫一個命令按鈕(其NAME屬性為Command1),然后編寫如下代碼:
Option Base 1
Private Sub Command1_Click( )
Dim a
s = 0
a = Array(1, 2, 3, 4)
For I = 4 To 1 Step -1
s = s + a(I)
Next I
Print s
End Sub
運行上面的程序,單擊命令按鈕,其輸出結果是(D)
A.4321
B.1234
C.34
D.10
30.在窗體上畫一個名稱為Text1的文本框,編寫以下代碼:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 65 Or KeyAscii> 90 Then
msgBox "請輸入大寫字母"
KeyAscii = 0
End If
End Sub
以下能說明該事件過程正確是(A)
A.要求文本框只能接收大寫字母的輸入
B.要求文本框只能接收小寫字母的輸入
C.要求文本框只能接收數(shù)字的輸入
D.要求文本框只能接收65到90之間的數(shù)值的輸入
微信搜索"考試吧"了解更多考試資訊、下載備考資料
相關推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |