2017年計算機二級考試即將在九月份進行，VB是計算機二級考試的科瑪之一，你知道計算機二級考試VB科目都考哪些知識嗎?為了方便考生備考計算機二級考試VB 科目。下面是小編為大家帶來的計算機二級考試VB鞏固題，歡迎閱讀。
鞏固題一：
1. 要使窗體Form1顯示出來，應使用( 【55】 )
(A)Load Form1 (B)Form1 Load (C)1 (D)
2. 在使用通用對話方塊之前要先將( 【56】 )新增到工具箱中。
(A)Active X (B)ComboBox (C)CommonDialog (D)Color
3. 用Open語句開啟檔案時，若省略For子句，則隱含開啟檔案的存取方式為( 【57】 )
(A)Binary (B)Random (C)Input (D)OutPut
4. 設有以下迴圈結構
Do
迴圈體
Loop While <條件>
則以下敘述中錯誤的是
(A)“條件”可以是關係表示式、邏輯表示式或常數
(B)迴圈體中可以使用Exit Do語句
(C)若“條件”是一個為0的常數，則一次也不執行迴圈體
(D)如果“條件”總是為True，則不停地執行迴圈體
5. 要獲得開啟檔案的長度(位元組數)應用使用( 【58】 )函式。
(A)FileLen (B)Len (C)Loc (D)Lof
6. 給檔案改名的VB語句正確的是( 【59】 )
(A)Name 原檔名 To 新檔名 (B)Rename 原檔名 To 新檔名
(C)Name 原檔名 As 新檔名 (D)Rename 原檔名 As 新檔名
7. 在窗體上畫一個名稱為Command1的命令按鈕，然後編寫如下的事件過程：
Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
For i = 1 To 10
a(i) = i
Next
Call Swap 【5】
For i = 1 To 10
Print a(i);
Next
End Sub
Sub Swap(b() As Integer)
n=【5】
For i = 1 To n / 2
t = b(i)
b(i) = b(n)
b(n) = t
【5】
Next
End Sub
上述程式的功能是，通過呼叫過程Swap，調換陣列中數值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換，……，a(5)與a(6)的值互換。請填空。
8. 在窗體上畫一個標籤(名稱為Label1)和一個計時器(名稱為Timer1)，然後編寫如下幾個事件過程：
Private Sub Form_Load()
led = False
rval = 【5】
End Sub
Private Sub Form_Click()
led = 【6】
End Sub
Private Sub Timer1_Timer()
ion = 【7】
End Sub
程式執行後，單擊窗體，將在標籤中顯示當前時間，每隔1秒鐘變換一次(見圖)。請填空。
9. 下面程式用選擇法將陣列a中的10個整數按升序排列。演算法是：從陣列中找出最小的值，將該數與第1個數交換，這樣第1個數組元素是最小的數。再從第2個數開始，找出其後各陣列元素中最小的數，將該數與第2個數交換位置，這樣第2個數是次小的'數。如此重複上述過程，即可將陣列排序。請完善以下的程式：
Option Base 1
Private Sub Command1_Click( )
Dim a (1 To 10 ) As Integer , i As Integer , j As Integer , k As Integer
For i=1 To 10
a ( i ) = Val ( InputBox ( “請輸入第a( ” & i & “ ) 個數：”))
Next i
For i = 1 To 9
【60】
For j = i + 1 To 10
If a ( k ) 【61】 a ( j ) Then k = j
Next j
Temp = a (i ) : 【62】 : a ( k ) = Temp
Next i
For i = 1 To 10
Print a ( i ) ,
Next i
End Sub
【60】(A)k = 0 (B)k = 1 (C)k = i (D)k = j
【61】(A)= (B)< > (C)< (D)>
【62】(A)a (i) = a (j) (B)a (j) = a (i) (C)a (k) = a (i) (D)a (i) = a (k)
10. 設有程式：
Option Base 1
Private Sub Command1_Click()
Dim arr1, Max as Integer
arr1 = Array(12, 435, 76, 24, 78, 54, 866, 43)
【12】 = arr1(1)
For i = 1 To 8
If arr1(i) > Max Then 【13】
Next i
Print "最大值是: "; Max
End Sub
以上程式的功能是：用Array函式建立一個含有8個元素的陣列，然後查詢並輸出該陣列中元素的最大值。請填空。
鞏固題二：
1. 執行以下程式段後，變數c$的值為( 【45】 )
a$ = “ Visual Basic 6.0 Programing ”
b$ = “ Design ”
c$ = Lcase ( Mid$ ( a$ , 7 , 6)) & Right$ ( a$ , 11 ) & b$
(A)Visual basic 6.0 design (B)basic ProgramingDesign
(C)BASIC ProgramingDesign (D)Visual BASIC 6.0 design
2. 假定有一個選單項，名為MenuDiv，為了在執行時使該選單項失效(變灰)，應使用的語句是( 【46】 )
(A)MenuDiv . Visible = False (B)MenuDiv . Visible =True
(C)MenuDiv . Enabled = False (D)MenuDiv . Enabled = True
3. 為了暫時關閉計時器，應把該計時器的某個屬性設定為False，這個屬性是( 【47】 )
(A)Enabled (B)Interval (C)Timer (D)Visible
4. 為了把一個記錄型變數Stu的內容寫入隨機檔案中的指定位置，所使用的語句格式為( 【48】 )
(A)Put #檔案號 , 記錄號 , Stu (B)Put #檔案號 , Stu , 記錄號
(C)Get #檔案號 , 記錄號 , Stu (D)Get #檔案號 , Stu , 記錄號
5. Sub過程的定義( 【49】 )
(A)一定要有形參 (B)一定要有過程的名稱
(C)一定要指明是公有的還是私有的 (D)一定要指定其型別
6. Function過程有別於Sub過程的最主要的特點是( 【50】 )
(A)Function過程一定要有形參，而Sub過程可以沒有形參
(B)Function過程的終端語句是End Function，而Sub過程的終端語句是End Sub
(C)Function過程用於計算函式值，而Sub過程用於改變屬性值
(D)Function過程要返回函式值，而Sub過程沒有值的返回
7. 要定義一個過程為區域性過程，應用使用( 【51】 )關鍵字。
(A)Public (B)Static (C)Sub (D)Private
8. 下列定義Func為函式過程的定義語句中錯誤的是( 【52】 )
(A)Function Func ( a As Integer ) As Integer
(B)Static Function Func ( a )
(C)Private Public Func ( a ) As Integer
(D)Private Function Func ( a As Single )
9. 標準模組存檔後，形成的磁碟副檔名為( 【53】 )
(A) (B) (C) (D)
10. 下列函式呼叫中錯誤的是( 【54】 )
(A)Str$ = InputBox ( “請輸入資料 ” )
(B)InputBox ( “請輸入資料 ” )
(C)Msg = MsgBox ( “是否繼續輸入資料?” )
(D)MsgBox ( “是否繼續輸入資料?” )
