1.窗體中有一個名稱為txtSpeed的文本框,一個名稱為hsbSpeed的滾動條。
以下程序:
Private Sub hsbSpeed_Change( )
txtSpee
D.Text = hsbSpee
D.Value
End Sub
當單擊滾動條hsbSpeed右端的箭頭時,以下說法不正確的是(B) (單)
A.此時會觸發(fā)change事件
B.此時不會觸發(fā)change事件
C.在文本框中顯示了滾動條滑塊所在位置的值
D.此時不會觸發(fā)scroll事件
2.利用窗體中的滾動條HScroll1改變窗體的背景色,可以這樣編寫代碼:
Private Sub HScroll1_Change( )
R= HScroll1.Value
form1.BackColor = RGB(R,int(Rnd*256),int(Rnd*256))
End Sub
以下說法不正確的是(C) (單)
A.窗體的背景色是一個隨機的顏色
B.RGB函數(shù)取得到的顏色有256*256*256種
C.表達式int(Rnd*256)取得隨機數(shù)的范圍為0-256之間的整數(shù)
D.表達式int(Rnd*256)取得隨機數(shù)的范圍為0-255之間的整數(shù)
3.窗體中有一個名稱為Slider1的可選擇性刻度滑塊控件,一個名稱為text1的文本框,如下程序:
Private Sub Slider1_change( )
Text1.FontSize =【Slider1.value】
End Sub
當拖動滑塊時,以上程序實現(xiàn)用Slider控件設置文本框中的字體大小的功能。
4.窗體中有一個名稱為Slider1的可選擇性刻度滑塊控件,一個名稱為text1的文本框,如下程序:
Private Sub Slider1_change( )
Text1.【Fontsize】 = slider1.value
End Sub
當拖動滑塊時,以上程序實現(xiàn)用Slider控件設置文本框中的字體大小的功能。
5.窗體中有一個名稱為Slider1的可選擇性刻度滑塊控件,要設置它的如下屬性值,可以編寫程序(A) (單)
(1)Slider控件的滑塊處于最小位置時值為8
(2)Slider控件的滑塊處于最大位置時值為72
(3)單擊Slider控件兩端箭頭時,滑塊的增量值為2
(4)單擊Slider控件的空白處時,滑塊的增量值為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.在窗體中有一個名稱為timer1的時鐘控件,三個名稱分別為image1、image2 和 image3的圖像框,編寫如下程序:
Sub Form_Load( )
Image1.Picture=LoadPicture(App.Path+"\butterfly.bmp")
Image2.Picture=LoadPicture(App.Path+"\butterfly2.bmp")
Image3.Picture=LoadPicture(App.Path+"\butterfly.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
以下說法不正確的是(C) (單)
A.此程序的功能是把image1圖像框顯示圖形在butterfly.bmp和butterfly2.bmp文件之間進行切換
B.PickBmp變量是邏輯變量,作用是表示圖形的狀態(tài)
C.App.Path表示絕對路徑
D.要使得timer控件起作用,必須使得它的Enabled屬性設置為true,interval屬性設置為介于0-64767之間的數(shù)值,但不能等于0
7.在窗體中有一個名稱為timer1的時鐘控件,三個名稱分別為image1、image2 和 image3的圖像框,編寫如下程序:
Sub Form_Load( )
Image1.Picture=LoadPicture(App.Path+"\butterfly.bmp")
Image2.Picture=LoadPicture(App.Path+"\butterfly2.bmp")
Image3.Picture=LoadPicture(App.Path+"\butterfly.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
以下說法不正確的是(B) (單)
A.此程序的功能是把image1圖像框顯示圖形在butterfly.bmp和butterfly2.bmp文件之間進行切換
B.也可以將timer1控件的timer事件改寫為change事件
C.App.Path表示相對路徑
D.要使得timer控件起作用,必須使得它的Enabled屬性設置為true,interval屬性設置為介于0-64767之間的數(shù)值,但不能等于0
8 .在ProgressBar進度條控件中,它的Value屬性決定該控件被填充多少。√
9 .UpDown控件通常與伙伴控件"捆綁"在一起使用!
10 .Animation控件可以用來顯示有聲音的AVI視頻文件 ×。
11.對Animation控件所使用的方法描述不正確的是(B) (單)
A.Open方法用于打開文件
B.Play方法用于播放動畫,格式為: Animation1.play AVI動畫文件路徑
C.Stop方法用于停止播放
D.Close方法用于關閉文件
12.下面的事件不屬于鼠標器事件的是(D) (單)
A.MouseDown事件
B.MouseUp事件
C.MouseMove事件
D.Move事件
13.下面的事件不屬于鍵盤事件的是(D) (單)
A.KeyPress事件
B.KeyDown事件
C.KeyUp事件
D.KeyMove事件
14.在窗體中有一個名稱為command1的命令按鈕,一個名稱為text1的文本框,一個名稱為commondialog1的通用對話框,編寫如下程序:
Sub command1_Click( )
CommonDialog1.Action = 3
text1.ForeColor = CommonDialog1.Color
End Sub
當單擊命令按鈕時,對程序的運行說法正確的是(B) (單)
A.打開一個顏色對話框
B.打開一個字體對話框
C.把文本框的背景顏色設置為對話框選擇的字體顏色
D.把文本框的背景顏色設置為對話框中選擇的顏色
15.當單擊命令按鈕時,對以下程序說法不正確的是(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中的內(nèi)容
B.語句Printer.EndDoc表示結束文擋打印
C.打開的打印對話框
D.以上說法都不正確
16.當單擊命令按鈕時,對以下程序說法不正確的是(C) (單)
Sub command1_Click( )
CommonDialog1.FileName = "default.txt"
CommonDialog1.DefaultExt = "Txt"
CommonDialog1.Action = 2
End Sub
A.設置缺省文件名為default.txt
B.設置缺省擴展名為Txt
C.顯示的是文件"打開"對話框
D.顯示的是"另存為"對話框
17.在窗體中建立了三個名稱分別為EditCut、EditCopy和EditPaste的命令按鈕,一個名稱為text1的文本框。
如下程序:
Private Sub EditCopy_Click( )
st = Text1.SelText '將選中的內(nèi)容存放到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
對以上程序說法不正確的是(D) (單)
A.語句st = Text1.SelText的作用是:將text1文本框中選擇的內(nèi)容存放到st變量中
B.語句Text1.SelText = "" 的作用是:將text1文本框中選擇的內(nèi)容清除
C.單擊EditCut命令按鈕實現(xiàn)了text1文本框中選擇的內(nèi)容清除
D.單擊Editcopy命令按鈕實現(xiàn)了text1文本框中所有內(nèi)容的粘貼
18.對以下程序說法不正確的是(D) (單)
Private Sub FileOpen_Click( )
CommonDialog1.InitDir = "C:\"
CommonDialog1.Filter = "文本文件 | *.Txt"
CommonDialog1.ShowOpen
End Sub
A.顯示"文件"打開對話框
B.打開的對話框的初始目錄為C盤根目錄
C.打開的對話框的文件類型為文本文件
D.以上說法都不正確
19.雙精度型數(shù)據(jù)的類型符為(A) (單)
A.#
B.*
C.&
D.@
20.整型數(shù)據(jù)的類型符為(B) (單)
A.#
B.%
C.&
D.@
微信搜索"考試吧"了解更多考試資訊、下載備考資料
相關推薦:
2018全國計算機等級考試備考經(jīng)驗及應試技巧匯總
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |