一、選擇題：35題，2分/題，共70分
下列各題A)、B)、C)、D)四個選項中，只有一個選項是正確的，請將正確選項塗寫在答題卡相應位置上，答在試卷上不得分。
1.當執行程式時，系統自動執行啟動窗體的某個事件過程。這個事件過程是(A)
A)Load
B)Click
C)Unload
D)GotFocus
2.無論何控制元件，都具有一個共同屬性。這個屬性是(C)
A)Text
B)Font
C)Name
D)Caption
3.在一行內寫多條語句時，語句之間要用某個符號分隔。這個符號是(D)
A)，
B);
C)、
D)：
4.表示式3∧2*2+3 MOD 104的值是(C)
A)18
B)1
C)19
D)0
5.下面的變數名合法的是(A)
A)k_name
B)k ame
C)name
D)k-name
6.設有如下變數宣告Dim time1 As Date,為變數time1正確賦值的表示式是(A)
A)time1 = #11:34:04 #
B)time1 = Format(Time,"yy:mm:dd")
C)time1 = #"11:34:04"#
D)time1 = Format("hh:mm:ss",Time)
7.表示式12000 + "129" & 200的值是(B)
A)12329
B)"12129200"
C)"12000129200"
D)"12329"
8.若設a = 4,b = 5,則下列表達式值為真的是(D)
A)(True+a)>0 And b>10
B)a>b Or b>10-a
C)(False-b< 0) Eqv (a>b)
D)a>b Xor b+3>5
9.當窗體上的文字或圖形被覆蓋或最小化後能恢復原貌，需要設定窗體的屬性是(D)
A)Appearance
B)Visible
C)Enable
D)Autoredraw
10.在窗體上畫一個名稱為Command1的命令按鈕，編寫以列程式：
Private Sub Command1_Click( )
Dim a As Integer
Static b As Integer
a = a + b
b = b + 4
Print a,b
End Sub
程式執行後，單擊該命令按鈕三次，螢幕上顯示的值是(D)
A)4 12
B)0 4
C)4 8
D)8 12
al Basic是一種面向物件的程式設計語言，構成物件的三要素是(B)
A)屬性、控制元件和方法
B)屬性、事件和方法
C)窗體、控制元件和過程
D)控制元件、過程和模組
12.下列程式段錯誤的是(A)
A)Dim a As Integer
a = array(1,2,3,4)
B)Dim a(),b()
a = array(1,2,3,4):b = a
C)Dim a As Variant
a = array(1,"asd",true)
D)Dim a() As Variant
a = array(1,2,3,4)
13.表示式String(1,"I am student") + Replace("am harass","rass","ppy") & "!"的值是(A)
A)"I am happy!"
B)"I am student I am s am harass studentam happy!"
C)"I am student am harass!"
D)"I am student am happy!"
14.下列程式段中，能正常結束迴圈的是(C)
A)I = 1
Do
I = I + 2
Loop Until I = 10
B)I = 5
Do
I = I + 1
Loop Until I < 0
C)I = 10
Do
I = I + 1
Loop Until I > 0
D)I = 6
Do
I = I - 2
Loop Until I = 1
15.引用列表框(List1)最後一個數據項應使用的表示式是(B)
A)(Count)
B)(Count-1)
C)(ListCount)
D)(ListCount-1)
16.有如下程式：
Option Base 1
Private Sub Command1_Click()
Dim x,y(3,3)
x = Array(1,2,3,4,5,6,7,8,9)
For i = 1 To 3
For j = 1 To 3
y(i,j) = x(i*j)
If(j > = i) Then Print y(i,j);
Next j
Next i
End Sub
執行時輸入出的結果是(D)
A)1 2 3
2 4 6
4 6 8
B)1 2 3
2 4 6
3 6 9
C)1
2 4
3 6 9
D)1 2 3
4 6
9
17.在窗體上畫一個名稱為Command1的命令按鈕，編寫如下程式：
Private Sub Command1_Click()
Print pl(3,7)
End Sub
Public Function pl(x As Single,n As Integer) As Single
If n=0 Then
pl=1
Else
If n Mod 2=1 Then
pl=x*x+n
Else
P1=x*x-n
End If
End If
End Function
程式執行後，單擊該命令按鈕，螢幕上顯示的結果是(D)
A)2
B)1
C)0
D)16
18.以下屬性和方法中，可重定義座標系的是(C)
A)DrawStyle屬性
B)DrawWidth屬性
C)Scale方法
D)ScaleMode屬性
19.在窗體上畫一個文字框，然後編寫如下事件過程：
Private Sub Form_Load()
= ""
ocus
For i = 1 To 5
Sum = Sum +i
Next i
= Sum
End Sub
上述程式的執行結果是(D)
A)在文字框中輸出15
B)在文字框中輸出0
C)在文字框中輸出不定值
D)出錯
20.已知x代表某個百分制成績，下列程式段用於顯示對應的五級製成績，正確的是(C)
A)If x > = 60 Then
Print "及格"
ElseIf x > = 70 Then
Print "中"
ElseIf x > = 80 Then
Print "良"
ElseIf x > = 90 Then
Print "優"
Else
Print "不及格"
End If
B)If x < 90 Then
Print "良"
ElseIf x < 80 Then
Print "中"
ElseIf x < 70 Then
Print "及格"
ElseIf x < 60 Then
Print "不及格"
Else
Print "優"
End If
C)If x > = 90 Then
Print "優"
ElseIf x > = 80 Then
Print "良"
ElseIf x > = 70 Then
Print "中"
ElseIf x > = 60 Then
Print "及格"
Else
Print "不及格"
End If
D)Select Case x
Case x > = 90
Print "優"
Case x > = 80
Print "良"
Case x > = 70
Print "中"
Case x > = 60
Print "及格"
Case Else
Print "不及格"
End Select
21.下面說法不正確的是(D)
A)滾動條的重要事件是Change和Scroll
B)框架的主要作用是將控制元件進行分組，以完成各自相對獨立的功能
C)組合框是組合了文字框和列表框的特性而形成的一種控制元件
D)計時器控制元件可以通過對Visible屬性的設定，在程式執行期間顯示在窗體上
22.在窗體上畫一個名稱為Check1複選框，在程式執行的過程中，若選中複選框，則e的值是(D)
A)True
B)2
C)0
D)1
23.在下列關於選單的說法中，錯誤的是(B)
A)每一個選單項都是一個控制元件，與其他控制元件一樣都有自己的屬性和事件
B)除了Click事件之外，選單項還能響應其他的如 DblClick等事件過程
C)選單項的快捷鍵不可以任意設定
D)在程式執行時，如果選單項的Enabled屬性為False，則該選單項變成灰色，不能被使用者選擇
24.下面關於多重窗體的敘述中，正確的是(B)
A)作為啟動物件的Main 子過程只能放在窗體模組內
B)如果啟動物件是Main 子過程，則程式啟動時不載入任何窗體，以後由該過程根據不同情況決定是否載入窗體或載入哪一個窗體
C)沒有啟動窗體，程式不能執行
D)以上都不對
25.與鍵盤操作有關的事件有KeyPress、KeyUp和KeyDown事件，當用戶按上並且釋放一個鍵後，這三個事件發生的順序是(A)
A)KeyDown、KeyPress、KeyUp
B)KeyDown、KeyUp、KeyPress
C)KeyPress、KeyDown、、KeyUp
D)沒有規律
26.要從磁碟上讀入一個檔名為“c:”的順序檔案，下面程式段正確的是(A)
A)F="c:"
Open F For Input As # 1
B)F="c:"
Open "F" For Input As # 2
C)Open "c:" For Output As # 2
D)Open c: For Input As # 1
27.下列關於過程敘述不正確的是(D)
A)過程的傳值呼叫是將實參的`具體值傳值遞給形參
B)過程的傳址呼叫是將實參在記憶體的地址傳遞給形參
C)過程的傳值呼叫引數是單向傳遞的，過程的傳址呼叫引數是雙向傳遞的
D)無論過程傳值呼叫還是過程傳址呼叫，引數傳遞都是雙向的
28.執行了下面程式後，組合框中資料項的值是(D)
Private Sub Form_Click()
For i=1 to 6
tem i
Next i
For i= 1 to 3
veItem i
Next i
End Sub
A)1 5 6
B)1 3 5
C)4 5 6
D)2 4 6
29.若在Shape 控制元件內以FillStyle屬性所指定的圖案填充區域，而填充圖案的線條顏色由FillColor屬性指定，非線條的區域由Back Color屬性填充，則應(A)
A)將Shape控制元件的FillSte屬性設定為2至7間的某個值，BackStyle屬性設定為1
