(31) 下列過程定義語句中，形參個數為不確定數量的過程是
A) Private Sub Pro3(x As Double,y As Single)
B) Private Sub Pro3(Arr(3),Option x,Option y)
C) Private Sub Pro3(ByRef x,ByVal y,Arr( ))
D) Private Sub Pro3(ParamArray Arr( ))
(32) 單擊命令按鈕時，下列程序的執行結果為
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=12: y=32
Call PCS(x, y)
Print x; y
End Sub
Public Sub PCS(ByVal n As Integer, ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A) 12 32
B) 2 32
C) 2 3
D) 12 3
(33) 單擊一次命令按鈕后，下列程序的執行結果是
Private Sub Command1_Click()
s=P(1) + P(2) + P(3) + P(4)
Print s
End Sub
Public Function P(N As Integer)
Static Sum
For i=1 To N
Sum=Sum + i
Next i
P=Sum
End Function
A) 15
B) 25
C) 35
D) 45
(34) 下列程序的執行結果為
Private Sub Command1_Click()
Dim s1 As String, s2 As String
s1="abcdef"
Call Invert(s1, s2)
Print s2
End Sub
Private Sub Invert(ByVal xstr As String, ystr As String)
Dim tempstr As String
i=Len(xstr)
Do While i >=1
tempstr=tempstr + Mid(xstr, i, 1)
i=i - 1
Loop
ystr=tempstr
End Sub
A) fedcba
B) abcdef
C) afbecd
D) defabc
(35) 閱讀下列程序：
Private Sub Command1_Click()
Dim i As Integer, k As Integer
k=2
For i=1 To 3
Print H(k) ;
Next i
End Sub
Function H(j As Integer)
a=0
Static b
a=a + 1
b=b + 1
H=a*b + j
End Function
程序運行后，單擊命令按鈕輸出結果是
A) 2 3 4
B) 3 4 5
C) 5 6 7
D) 3 5 6
填空題：
(1) 數據結構分為邏輯結構與存儲結構，線性鏈表屬于 【1】 。
(2) 在面向對象方法中，類之間共享屬性和操作的機制稱為 【2】 。
(3) 耦合和內聚是評價模塊獨立性的兩個主要標準，其中 【3】 反映了模塊內各成分之間的聯系。
(4) 一個項目具有一個項目主管，一個項目主管可管理多個項目，則實體"項目主管"與實體"項目"的聯系屬于 【4】 的聯系。
(5) 數據庫設計分為以下6個設計階段：需求分析階段、 【5】 、邏輯設計階段、物理設計階段、實施階段、運行和維護階段。
(6) 新建一個工程，內有兩個窗體，窗體Form1上有一個命令按鈕Command1，單擊該按鈕，Form1窗體消失，顯示Form2窗體，程序如下：
Private Sub Command1_Click()
【6】
Form2. 【7】
End Sub
試補充完整。
(7) 用戶可以用 【8】 語句定義自己的數據類型。
(8) 在窗體上畫一個命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click()
x=0
Do Until x=-1
a=InputBox("請輸入第一個數字a的值")
a=Val(A)
b=InputBox("請輸入第二個數字b的值")
b=Val(b)
x=InputBox("請輸入第三個數字x的值")
x=Val(x)
a=a + b + x
Loop
Print a
End Sub
在程序運行后，單擊命令按鈕，在對話框中分別輸入5，4，8，5，8，-1，輸出結果為 【9】 。
(9) 當對象得到焦點時，會觸發 【10】 事件，當對象失去焦點時將觸發 【11】 事件。
(10) 把窗體的KeyPreView屬性設置為True，并編寫如下兩個事件過程：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Print KeyCode
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序運行后，如果按下B鍵，則在窗體上輸出的數值是 【12】 和 【13】 。
(11) 在文件對話框中，假定有一個名為"fc.exe"的文件，它位于"d:＼pp"目錄下，則"FileName"屬性的值為 【14】 ；FileTitle屬性的值為 【15】 。
一、選擇題：
01-05 B A B D D
06-10 D D A B C
11-15 A A B C C
16-20 A D D C C
21-25 A C B A B
26-30 D A B C B
31-35 D A C A B
二、填空題：
(1) 存儲結構
(2) 繼承
(3) 內聚
(4) 一對多(1∶N)
(5) 概念設計階段
(6) Me.Hide
show
(7) Type語句
(8) 12
(9) GotFocus
LostFocus
(10) 66
98
(11) d:＼pp\fc.exe
fc.exe
希望與更多計算機等級考試的網友交流，請進入計算機等級考試論壇
更多信息請訪問：考試吧計算機等級考試欄目
