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

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

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

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

　　1.窗體中有一個(gè)名稱(chēng)為txtSpeed的文本框，一個(gè)名稱(chēng)為hsbSpeed的滾動(dòng)條。

　　以下程序：

　　Private Sub hsbSpeed_Change( )

　　txtSpee

　　D.Text = hsbSpee

　　D.Value

　　End Sub

　　當單擊滾動(dòng)條hsbSpeed右端的箭頭時(shí)，以下說(shuō)法不正確的是(B) (單)

　　A.此時(shí)會(huì )觸發(fā)change事件

　　B.此時(shí)不會(huì )觸發(fā)change事件

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

　　D.此時(shí)不會(huì )觸發(fā)scroll事件

　　2.利用窗體中的滾動(dòng)條HScroll1改變窗體的背景色，可以這樣編寫(xiě)代碼：

　　Private Sub HScroll1_Change( )

　　R= HScroll1.Value

　　form1.BackColor = RGB(R，int(Rnd*256)，int(Rnd*256))

　　End Sub

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

　　A.窗體的背景色是一個(gè)隨機的顏色

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

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

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

　　3.窗體中有一個(gè)名稱(chēng)為Slider1的可選擇性刻度滑塊控件，一個(gè)名稱(chēng)為text1的文本框，如下程序：

　　Private Sub Slider1_change( )

　　Text1.FontSize =【Slider1.value】

　　End Sub

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

　　4.窗體中有一個(gè)名稱(chēng)為Slider1的可選擇性刻度滑塊控件，一個(gè)名稱(chēng)為text1的文本框，如下程序：

　　Private Sub Slider1_change( )

　　Text1.【Fontsize】 = slider1.value

　　End Sub

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

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

　　(1)Slider控件的滑塊處于最小位置時(shí)值為8

　　(2)Slider控件的滑塊處于最大位置時(shí)值為72

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

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

　　A.Slider1.Min = 8：

　　Slider1.Max = 72：

　　Slider1.SmallChange =2：

　　Slider1.LargeChange = 8

　　B.Slider1.Min = 2：

　　Slider1.Max = 8：

　　Slider1.SmallChange = 72：

　　Slider1.LargeChange = 8

　　C.Slider1.Min = 8：

　　Slider1.Max = 72：

　　Slider1.SmallChange = 8：

　　Slider1.LargeChange = 2

　　D.Slider1.Min = 72：

　　Slider1.Max = 8：

　　Slider1.SmallChange = 2：

　　Slider1.LargeChange = 8

　　6.在窗體中有一個(gè)名稱(chēng)為timer1的時(shí)鐘控件，三個(gè)名稱(chēng)分別為image1、image2 和 image3的圖像框，編寫(xiě)如下程序：

　　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

　　Image1.Move Image1.Left + 20, Image1.Top - 5

　　If PickBmp = False Then

　　Image1.Picture = Image2.Picture

　　PickBmp = True

　　Else

　　Image1.Picture = Image3.Picture

　　PickBmp = False

　　End If

　　End Sub

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

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

　　B.PickBmp變量是邏輯變量，作用是表示圖形的狀態(tài)

　　C.App.Path表示絕對路徑

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

　　7.在窗體中有一個(gè)名稱(chēng)為timer1的時(shí)鐘控件，三個(gè)名稱(chēng)分別為image1、image2 和 image3的圖像框，編寫(xiě)如下程序：

　　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

　　Image1.Move Image1.Left + 20, Image1.Top - 5

　　If PickBmp = False Then

　　Image1.Picture = Image2.Picture

　　PickBmp = True

　　Else

　　Image1.Picture = Image3.Picture

　　PickBmp = False

　　End If

　　End Sub

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

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

　　B.也可以將timer1控件的timer事件改寫(xiě)為change事件

　　C.App.Path表示相對路徑

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

　　8 .在ProgressBar進(jìn)度條控件中，它的Value屬性決定該控件被填充多少�！�

　　9 .UpDown控件通常與伙伴控件"捆綁"在一起使用�！�

　　10 .Animation控件可以用來(lái)顯示有聲音的AVI視頻文件 ×。

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

　　A.Open方法用于打開(kāi)文件

　　B.Play方法用于播放動(dòng)畫(huà)，格式為： Animation1.play AVI動(dòng)畫(huà)文件路徑

　　C.Stop方法用于停止播放

　　D.Close方法用于關(guān)閉文件

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

　　A.MouseDown事件

　　B.MouseUp事件

　　C.MouseMove事件

　　D.Move事件

　　13.下面的事件不屬于鍵盤(pán)事件的是(D) (單)

　　A.KeyPress事件

　　B.KeyDown事件

　　C.KeyUp事件

　　D.KeyMove事件

　　14.在窗體中有一個(gè)名稱(chēng)為command1的命令按鈕，一個(gè)名稱(chēng)為text1的文本框，一個(gè)名稱(chēng)為commondialog1的通用對話(huà)框，編寫(xiě)如下程序：

　　Sub command1_Click( )

　　CommonDialog1.Action = 3

　　text1.ForeColor = CommonDialog1.Color

　　End Sub

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

　　A.打開(kāi)一個(gè)顏色對話(huà)框

　　B.打開(kāi)一個(gè)字體對話(huà)框

　　C.把文本框的背景顏色設置為對話(huà)框選擇的字體顏色

　　D.把文本框的背景顏色設置為對話(huà)框中選擇的顏色

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

　　Sub command1_Click( )

　　CommonDialog1.Action = 5

　　For i = 1 To CommonDialog1.Copies

　　Printer.Print text1.Text

　　Next i

　　Printer.EndDoc

　　End Sub

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

　　B.語(yǔ)句Printer.EndDoc表示結束文擋打印

　　C.打開(kāi)的打印對話(huà)框

　　D.以上說(shuō)法都不正確

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

　　Sub command1_Click( )

　　CommonDialog1.FileName = "default.txt"

　　CommonDialog1.DefaultExt = "Txt"

　　CommonDialog1.Action = 2

　　End Sub

　　A.設置缺省文件名為default.txt

　　B.設置缺省擴展名為T(mén)xt

　　C.顯示的是文件"打開(kāi)"對話(huà)框

　　D.顯示的是"另存為"對話(huà)框

　　17.在窗體中建立了三個(gè)名稱(chēng)分別為EditCut、EditCopy和EditPaste的命令按鈕，一個(gè)名稱(chēng)為text1的文本框。

　　如下程序：

　　Private Sub EditCopy_Click( )

　　st = Text1.SelText '將選中的內容存放到st變量中

　　End Sub

　　Private Sub EditCut_Click( )

　　st = Text1.SelText '

　　Text1.SelText = ""

　　End Sub

　　Private Sub EditPaste_Click( )

　　Text1.Text = Left(Text1, Text1.SelStart) + st + Mid(Text1, Text1.SelStart

　　+ 1)

　　End Sub

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

　　A.語(yǔ)句st = Text1.SelText的作用是：將text1文本框中選擇的內容存放到st變量中

　　B.語(yǔ)句Text1.SelText = "" 的作用是：將text1文本框中選擇的內容清除

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

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

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

　　Private Sub FileOpen_Click( )

　　CommonDialog1.InitDir = "C:"

　　CommonDialog1.Filter = "文本文件 | *.Txt"

　　CommonDialog1.ShowOpen

　　End Sub

　　A.顯示"文件"打開(kāi)對話(huà)框

　　B.打開(kāi)的對話(huà)框的初始目錄為C盤(pán)根目錄

　　C.打開(kāi)的對話(huà)框的文件類(lèi)型為文本文件

　　D.以上說(shuō)法都不正確

　　19.雙精度型數據的類(lèi)型符為(A) (單)

　　A.#

　　B.*

　　C.&

　　D.@

　　20.整型數據的類(lèi)型符為(B) (單)

　　A.#

　　B.%

　　C.&

　　D.@