計算機二級考試VB程序設計單選題
為了使廣大考生在備戰計算機等級考試時，更快的掌握相應知識點，下面是小編搜索整理的計算機二級考試VB程序設計單選題，供參考練習，預祝考生們考出自己理想的成績!
1． Command1_Click( )事件程序的功能是：按順序讀入10名學生4門課程的成績，計算出每位學生的平均分並輸出，程序如下：
Dim n As Integer, k As Integer
Dim score As Single, sum As Single, ave As Single
sum = 0#
For n = 1 To 10
For k =1 To 4
score = InputBox(“請輸入第” & n & “名學生第” & k & “門課的成績：”)
sum = sum + score
Next k
ave = sum / 4
Print “第” & n & “個學生的平均成績為：” & ave
Next n
上述程序運行後結果不正確，調試中發現有一條語句出現在程序中的位置不對。這條語句是（ ）
（A）sum = 0# （B）sum = sum + score
（C）ave = sum / 4 （D）Print “第” & n & “個學生的平均成績為：” & ave
2． 在窗體上畫一個名稱為Command1的命令按鈕，然後編寫如下事件過程：
Private Sub Command1_Click( )
Dim num As Integer
num = 1
Do Until num > 6
Print num;
num = num + 2.4
Loop
End Sub
程序運行後，單擊命令按鈕，則窗體上顯示的內容是（ ）
（A）1 3.4 5.8（B）1 3 5
（C）1 4 7 （D）無數據輸出
3． 以下程序的輸出結果是（ ）
Dim i As Integer, a As Integer
Do While i < 20
Do While True
If i Mod 10 = 0 Then
Exit Do
Else
i = i -1
End If
Loop
i = i + 11 : a = a + i
Loop
Print a
（A）21（B）32 （C）33 （D）11
4． 在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的'命令按鈕，然後編寫如下程序：
Private Sub Command1_Click( )
Dim array1(10,10) As Integer
Dim i, j As Integer
For i = 1 To 3
For j = 2 To 4
array1(i,j) = i + j
Next j
Next i
= array1(2,3) + array1(3,4)
End Sub
程序運行後，單擊命令按鈕，在文本框中顯示的值是（ ）
（A）12 （B）13 （C）14 （D）15
5． 設有如下程序：
Option Base 0
Private Sub Form_Click( )
Dim a
Dim i As Integer
a = Array(1,2,3,4,5,6,7,8,9)
For i = 0 To 3
Print a(5 – i);
Next
End Sub
程序運行後，單擊窗體，則在窗體相顯示的內容是（ ）
（A）4 3 2 1 （B）5 4 3 2（C）6 5 4 3 （D）7 6 5 4
6． 在窗體上畫一個名稱為Command1的命令按鈕，然後編寫如下代碼：
Option Base 1
Private Sub Command1_Click( )
d = 0
c = 10
x = Array(10, 12, 21, 32, 24)
For i = 1 To 5
If x(i) > c Then
d = d + x(i)
c = x(i)
Else
d = d – c
End If
Next i
Print d
End Sub
程序運行後，單擊命令按鈕，則在窗體上輸出的內容是（ ）
（A）89 （B）99 （C）23 （D）77
7． 假定有以下函數過程：
Function Fun(S As String) As String
Dim s1 As String
For i = 1 To Len(S)
s1 = Ucase(Mid(S, i, 1)) + s1
Next i
Fun = s1
End Function
在窗體上畫一個命令按鈕，然後編寫如下事件過程：
Private Sub Comman1_Click( )
Dim Str1 As String, Str2 As String
Str1 = InputBox(“請輸入一個字符串：”)
Str2 = Fun(Str1)
Print Str2
End Sub
程序運行後，單擊命令按鈕，如果在輸入對話框中輸入字符串“abcdefg”，則單擊“確定”按鈕後在窗體上輸出的結果為（ ）
（A）abcdefg （B）ABCDEFG（C）gfedcba （D）GFEDCBA
8． 在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框，然後編寫如下代碼：
Private Sub Command1_Click( )
Dim x, y, z As Integer
x = 5
y = 7
z = 0
= “”
Call P1(x, y, z)
= Str(z)
End Sub
Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer)
c = a + b
End Sub
程序運行後，如果單擊命令按鈕，則在文本框中顯示的內容是（ ）
（A）0（B）12 （C）Str(z) （D）沒有顯示
9． 以下關於過程的敍述中錯誤的是（ ）
（A） 如果過程被定義為Static類型，則該過程中的局部變量都是Static類型
（B） Sub過程中不能嵌套定義Sub過程
（C） Sub過程中可以嵌套調用Sub過程
（D）事件過程可以像通用過程一樣由用户定義過程名
10． 在窗體上畫一個名稱為Command1的命令按鈕，再畫兩個名稱分別為Label1、Label2的標籤，然後編寫如下程序代碼：
Private X As Integer
Private Sub Command1_Click( )
X = 5: Y = 3
Call proc(X, Y)
ion = X
ion = Y
End Sub
Private Sub proc(Byval a As Integer, ByVal b As Integer)
X = a * a
Y = b + b
End Sub
單擊命令按鈕，兩個標籤中顯示的內容分別是（ ）
（A）5和3（B）25和3 （C）25和6 （D）5和6
