第 1 頁:基本操作題 |
第 3 頁:簡單應用題 |
第 5 頁:綜合應用題 |
一、基本操作題
1(1)在名稱為Form1的窗體上建立一個水平滾動條,并在屬窗口中將其名稱設置為HS1Max屬性設置為100,Min屬性設置為0,Value屬性設置為100。程序運行后,滾動框位于滾動條最右端,如果單擊滾動條之外的窗體部分,則滾動框跳到最左端,如圖2-1所示。
注意:只能直接為相應的屬性賦值,不得使用任何變量。保存時必須存放在考生文件夾下,窗體文件名為sj1.frm,工程文件名為sj1.vbp。
圖2-1
(2)在Form1的窗體上繪制一個命令按鈕,名為md1,標題為Display,按鈕隱藏。編寫適當的事件過程,使程序運行后,若單擊窗體,則命令按鈕出現;
此時如果單擊命令按鈕,則在窗體上顯示Visual Basic。程序運行情況如圖2-2,2-3所示。
圖2-2 圖2-3
注意:程序中不得使用任何變量;文件必須存放在考生文件夾中,工程文件名為sj2.vbp,窗體文件名為sj2.frm。
參考解析:
(1)本題主要考查窗體上控件的基本操作。
①先在窗體上建立控件,再設置控件屬性。程序中用到的控件及其屬性見表2-1。
表2-1
控件 屬性 設置值
滾動條 Name HS1
滾動條 Min O
滾動條 Max 100
滾動條 Value 100
②滾動條的最大刻度用Max屬性來表示,最小刻度用Min屬性來表示,滾動條上的位置通過Value屬性來表示。
③單擊窗體觸發Form_Click事件,滾動框跳到最左端,即使其Value屬性為0。
④參考代碼如下:
Private Sub Form_Click()
HS1.Value=0
End Sub
⑤調試并運行程序。
⑥按題目要求存盤。
(2)①新建一個名為Form1的窗體;
②單擊工具箱中的CommandButton控件圖標,在窗體上拖拉出一個命令按鈕,在屬性窗口設置該命令按鈕名稱為Cmd1,Caption屬性為Display,Visible屬性為False;
③打開代碼窗口輸入如下代碼:
Private Sub Cmd1_Click()
Print"VisualBasic"′在窗體顯示VisualBasic
EndSub
Private Sub Form_Click()
Cmd1.Visible=True′使命令按鈕可見
EndSub
④按要求保存文件即完成本題。
相關推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |