當前位置:才華齋>計算機>計算機二級>

2017年9月計算機二級考試VB測試題

計算機二級 閱讀(2.06W)

2017年計算機二級考試將在就業開始。你報考了VB科目嗎?你知道怎樣複習計算機二級考試VB 科目嗎?為了方便考生備考計算機二級考試VB 科目。下面是小編為大家帶來的計算機二級考試VB測試題,歡迎閱讀。

2017年9月計算機二級考試VB測試題

  測試題一:

1. 下面關於圖片框和影象框的說法中正確的是(   )

(A) 影象框和圖片框均可通過Print方法顯示文字

(B) 在影象框裡只能顯示圖片,不能包含其它控制元件,而圖片框可以包含控制元件

(C) 影象框比圖片框佔用的記憶體多、執行速度慢

(D) 在圖片框和影象框中顯示的圖片均可放大和縮小

2. 在窗體上畫兩個名稱為Text1和Text2的文字框和一個名稱為Command1的命令按鈕,然後編寫如下事件過程:

Private Sub Command1_Click( )

Dim x As Integer, n As Integer

x = 1

n = 0

Do While x < 20

x = x * 3

n = n + 1

Loop

= Str(x)

= Str(n)

End Sub

程式執行後,單擊命令按鈕,在兩個文字框中顯示的值分別是(   )

(A)15和1 (B)27和3 (C)195和3 (D)600和4

3. 在窗體上畫一個名稱為Text1的文字框和一個名稱為Command1的命令按鈕,然後編寫如下事件過程:

Private Sub Command1_Click( )

Dim i As Integer, n As Integer

For i = 0 To 50

i = i + 3

n = n + 1

If i > 10 Then Exit For

Next

= Str(n)

End Sub

程式執行後,單擊命令按鈕,在文字框中顯示的值是(   )

(A)2 (B)3 (C)4 (D)5

4. 在窗體上畫一個名稱為Command1的命令按鈕,然後編寫如下事件過程:

Private Sub Comman1_Click( )

x = 0

n = InputBox(“ “)

For i = 1 To n

For j = 1 To i

x = x + 1

Next j

Next i

Print x

End Sub

程式執行後,單擊命令按鈕,如果輸入3,則在窗體上顯示的內容是(   )

(A)3 (B)4 (C)5 (D)6

5. 在窗體上畫一個命令按鈕,然後編寫如下事件過程:

Private Sub Command1_Click( )

For i = 1 To 4

x = 4

For j = 1 To 3

x = 3

For k = 1 To 2

x = x + 6

Next k

Next j

Next i

Print x

End Sub

程式執行後,單擊命令按鈕,輸出結果是(   )

(A)7 (B)15 (C)157 (D)538

6. 在窗體上畫一個命令按鈕,然後編寫如下事件過程:

Private Sub Command_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、3、2、1、-1,則輸出的結果為(   )

(A)2 (B)3 (C)14 (D)15

7. 在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Label1的'標籤,然後編寫如下事件過程:

Private Sub Command1_Click( )

s = 0

For i =1 To 15

x = 2 * i -1

If x Mod 3 =0 Then s = s + 1

Next i

ion = s

End Sub

程式執行後,單擊命令按鈕,則標籤中顯示的內容是(   )

(A)1 (B)5 (C)27 (D)45

8. 在窗體上畫一個名稱為Command1的命令按鈕和兩個名稱分別為Text1、Text2的文字框,然後編寫如下事件過程:

Private Sub Command1_Click( )

a =

Select Case n

Case 1 To 20

x = 10

Case 2,4,6

x = 20

Case Is < 10

x = 30

Case 10

x = 40

End Select

= x

End Sub

程式執行後,如果在文字框Text1中輸入10,然後單擊命令按鈕,則在Text2中顯示的內容是(   )

(A)10 (B)20 (C)30 (D)40

9. 有如下程式:

a = 10

b = 4

For j = 1 To 20 Step -2

a = a + 5

b = b + 4

Next j

Print a;b

執行後,輸出的結果是(   )

(A)10 4 (B)60 24 (C)110 44 (D)55 40

10. 設有如下程式:

Private Sub Command1_Click( )

Dim sum As Double, x As Double

sum = 0

n = 0

For i = 1 To 5

x = n / i

n = n + 1

sum = sum + x

Next

End Sub

該程式通過For迴圈計算一個表示式的值,這個表示式是(   )

(A)1 + 1 /2 + 3/ 4 + 4 / 5 (B)1 + 1 /2 + 2 / 3 + 3 / 4

(C)1 / 2 + 2 / 3 + 3 / 4 + 4 / 5 (D)1 + 1 / 2 + 1 / 3 + 1 / 4 + 1 / 5

  測試題二:

1. 語句Print Format$(12345,”#######”);Format$(12345,”###”)的輸出結果是(   )

(A)12345□□12345 (B)1234512345

(C)12345□123 (D)□□12345123

2. 下列語句執行後,產生的資訊框的標題是(   )

Dim s As String

s = MsgBox(“ABCD”,,”EFGH,””,5)

(A)ABCD (B)無標題 (C)EFGH (D)程式出錯

3. 執行語句Print Format(1234.567, “##,##0.00”)後,輸出結果是(   )

(A)1234.57 (B)1,234.57 (C)1,234.567 (D)1,234.56

4. 下列事件過程執行時,資訊框中出現的結果是(   )

Private Sub Command1_Click( )

MsgBox Str(123+123)

End Sub

(A)123+345 (B)123 (C)246 (D)顯示出錯資訊

5. 以下能夠觸發文字框Change事件的操作是(   )

(A)文字框失去焦點 (B)文字框獲得焦點

(C)設定文字框的焦點 (D)改變文字框的內容

6. 表示滾動條控制元件取值範圍最大值的屬性是(   )

(A)Max (B)LargeChange (C)Value (D)Max-Min

7. 當某個單選按鈕處於選中狀態時,它的(   )屬性為Ture

(A)Caption (B)Value (C)Style (D)Checked

8. 複選框的狀態有(   )種,可通過設定它的(   )屬性來設定它的狀態

(A)1 (B)2 (C)3 (D)4

(A)Alignment (B)Value (C)Style (D)Checked

9. 要使文字框在顯示文字時,只顯示出一串“*”,則應把它的(   )屬性設定為“*”

(A)Caption (B)PasswordChar (C)Text (D)Value

10. 在下面四組圖形格式中,全部都是Visual Basic支援的圖形檔案是(   )

(A) 點陣圖、圖示、3DS圖形檔案、GIF檔案

(B) 點陣圖、Flash圖形檔案、圖示檔案、GIF檔案

(C) 點陣圖、Flash圖形檔案、3DS圖形檔案、GIF檔案

(D) 點陣圖、圖示、圖元檔案、JPEG檔案、GIF檔案