2017計算機二級考試VB鞏固題

2017年計算機二級考試即將在九月份進行,VB是計算機二級考試的科瑪之一,你知道計算機二級考試VB科目都考哪些知識嗎?爲了方便考生備考計算機二級考試VB 科目。下面是小編爲大家帶來的計算機二級考試VB鞏固題,歡迎閱讀。

2017計算機二級考試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 ( “是否繼續輸入數據?” )