計算機二級VB考試練習題及答案

相信很多人都報考了計算機二級VB考試，下面小編爲大家帶來了計算機二級VB考試練習題及答案，歡迎大家閱讀！

　　計算機二級VB考試練習題及答案

1.窗體中有一個名稱爲txtSpeed的文本框，一個名稱爲hsbSpeed的滾動條。

以下程序：

Private Sub hsbSpeed_Change( )

txtSpee

= hsbSpee

e

End Sub

當單擊滾動條hsbSpeed右端的箭頭時，以下說法不正確的是(B) (單)

A.此時會觸發change事件

B.此時不會觸發change事件

C.在文本框中顯示了滾動條滑塊所在位置的值

D.此時不會觸發scroll事件

2.利用窗體中的滾動條HScroll1改變窗體的背景色，可以這樣編寫代碼：

Private Sub HScroll1_Change( )

R= e

Color = RGB(R，int(Rnd*256)，int(Rnd*256))

End Sub

以下說法不正確的是(C) (單)

A.窗體的背景色是一個隨機的顏色

函數取得到的顏色有256*256*256種

C.表達式int(Rnd*256)取得隨機數的範圍爲0-256之間的整數

D.表達式int(Rnd*256)取得隨機數的範圍爲0-255之間的整數

3.窗體中有一個名稱爲Slider1的可選擇性刻度滑塊控件，一個名稱爲text1的文本框，如下程序：

Private Sub Slider1_change( )

Size =【e】

End Sub

當拖動滑塊時，以上程序實現用Slider控件設置文本框中的字體大小的功能。

4.窗體中有一個名稱爲Slider1的可選擇性刻度滑塊控件，一個名稱爲text1的文本框，如下程序：

Private Sub Slider1_change( )

Text1.【Fontsize】 = e

End Sub

當拖動滑塊時，以上程序實現用Slider控件設置文本框中的字體大小的功能。

5.窗體中有一個名稱爲Slider1的可選擇性刻度滑塊控件，要設置它的如下屬性值，可以編寫程序(A) (單)

(1)Slider控件的滑塊處於最小位置時值爲8

(2)Slider控件的滑塊處於最大位置時值爲72

(3)單擊Slider控件兩端箭頭時，滑塊的增量值爲2

(4)單擊Slider控件的空白處時，滑塊的增量值爲8

= 8：

= 72：

lChange =2：

eChange = 8

= 2：

= 8：

lChange = 72：

eChange = 8

= 8：

= 72：

lChange = 8：

eChange = 2

= 72：

= 8：

lChange = 2：

eChange = 8

6.在窗體中有一個名稱爲timer1的時鐘控件，三個名稱分別爲image1、image2 和 image3的圖像框，編寫如下程序：

Sub Form_Load( )

Image1.Picture=LoadPicture(App.Path+"utterfly.bmp")

Image2.Picture=LoadPicture(App.Path+"utterfly2.bmp")

Image3.Picture=LoadPicture(App.Path+"utterfly.bmp")

End Sub

Sub timer1_Timer( )

Static PickBmp As Boolean

+ 20, - 5

If PickBmp = False Then

ure = Image2.Picture

PickBmp = True

Else

ure = Image3.Picture

PickBmp = False

End If

End Sub

以下說法不正確的是(C) (單)

A.此程序的功能是把image1圖像框顯示圖形在butterfly.bmp和butterfly2.bmp文件之間進行切換

B.PickBmp變量是邏輯變量，作用是表示圖形的狀態

表示絕對路徑

D.要使得timer控件起作用，必須使得它的Enabled屬性設置爲true，interval屬性設置爲介於0-64767之間的數值，但不能等於0

7.在窗體中有一個名稱爲timer1的時鐘控件，三個名稱分別爲image1、image2 和 image3的圖像框，編寫如下程序：

Sub Form_Load( )

Image1.Picture=LoadPicture(App.Path+"utterfly.bmp")

Image2.Picture=LoadPicture(App.Path+"utterfly2.bmp")

Image3.Picture=LoadPicture(App.Path+"utterfly.bmp")

End Sub

Sub timer1_Timer( )

Static PickBmp As Boolean

+ 20, - 5

If PickBmp = False Then

ure = Image2.Picture

PickBmp = True

Else

ure = Image3.Picture

PickBmp = False

End If

End Sub

以下說法不正確的是(B) (單)

A.此程序的功能是把image1圖像框顯示圖形在butterfly.bmp和butterfly2.bmp文件之間進行切換

B.也可以將timer1控件的timer事件改寫爲change事件

表示相對路徑

D.要使得timer控件起作用，必須使得它的Enabled屬性設置爲true，interval屬性設置爲介於0-64767之間的數值，但不能等於0

8 .在ProgressBar進度條控件中，它的Value屬性決定該控件被填充多少。√

9 wn控件通常與夥伴控件"捆綁"在一起使用。√

10 ation控件可以用來顯示有聲音的AVI視頻文件 ×。

11.對Animation控件所使用的方法描述不正確的是(B) (單)

方法用於打開文件

方法用於播放動畫，格式爲： AVI動畫文件路徑

方法用於停止播放

e方法用於關閉文件

12.下面的事件不屬於鼠標器事件的是(D) (單)

eDown事件

eUp事件

eMove事件

事件

13.下面的事件不屬於鍵盤事件的是(D) (單)

ress事件

own事件

p事件

ove事件

14.在窗體中有一個名稱爲command1的命令按鈕，一個名稱爲text1的文本框，一個名稱爲commondialog1的通用對話框，編寫如下程序：

Sub command1_Click( )

on = 3

Color = r

End Sub

當單擊命令按鈕時，對程序的運行說法正確的是(B) (單)

A.打開一個顏色對話框

B.打開一個字體對話框

C.把文本框的背景顏色設置爲對話框選擇的字體顏色

D.把文本框的背景顏色設置爲對話框中選擇的'顏色

15.當單擊命令按鈕時，對以下程序說法不正確的是(D) (單)

Sub command1_Click( )

on = 5

For i = 1 To es

t

Next i

oc

End Sub

A.此文件的功能是打印文本框text1中的內容

B.語句oc表示結束文擋打印

C.打開的打印對話框

D.以上說法都不正確

16.當單擊命令按鈕時，對以下程序說法不正確的是(C) (單)

Sub command1_Click( )

Name = ""

ultExt = "Txt"

on = 2

End Sub

A.設置缺省文件名爲

B.設置缺省擴展名爲Txt

C.顯示的是文件"打開"對話框

D.顯示的是"另存爲"對話框

17.在窗體中建立了三個名稱分別爲EditCut、EditCopy和EditPaste的命令按鈕，一個名稱爲text1的文本框。

如下程序：

Private Sub EditCopy_Click( )

st = ext '將選中的內容存放到st變量中

End Sub

Private Sub EditCut_Click( )

st = ext '

ext = ""

End Sub

Private Sub EditPaste_Click( )

= Left(Text1, tart) + st + Mid(Text1, tart

+ 1)

End Sub

對以上程序說法不正確的是(D) (單)

A.語句st = ext的作用是：將text1文本框中選擇的內容存放到st變量中

B.語句ext = "" 的作用是：將text1文本框中選擇的內容清除

C.單擊EditCut命令按鈕實現了text1文本框中選擇的內容清除

D.單擊Editcopy命令按鈕實現了text1文本框中所有內容的粘貼

18.對以下程序說法不正確的是(D) (單)

Private Sub FileOpen_Click( )

Dir = "C:"

er = "文本文件 | *"

Open

End Sub

A.顯示"文件"打開對話框

B.打開的對話框的初始目錄爲C盤根目錄

C.打開的對話框的文件類型爲文本文件

D.以上說法都不正確

19.雙精度型數據的類型符爲(A) (單)

A.#

B.*

C.&

D.@

20.整型數據的類型符爲(B) (單)

A.#

B.%

C.&

D.@