第 1 頁:基本操作 |
第 2 頁:簡單應(yīng)用 |
第 3 頁:綜合應(yīng)用 |
注意:下面出現(xiàn)的“考生文件夾”均為%USER%
***********************************************************************
(1)在名稱為Form1的窗體上畫一個計時器,其名稱為Timer1;再畫一個圖像框,其名稱為Image1,在該圖像框中裝入一個圖形文件pic.ico;然后畫一個水平滾動條, 其名稱為HScroll1, Min屬性值為100,Max屬性值為1200,LargeChange屬性值為100,SmallChange屬性值為25,編寫適當(dāng)?shù)氖录^程。 程序運行后,可以使圖像框閃爍,其閃爍速度可以通過滾動條調(diào)節(jié)。
提示:
圖像框的閃爍可以通過圖像框交替地顯示和隱藏來實現(xiàn)。
要求:
程序中不得使用變量,每個事件過程中只能寫一條語句。
注意:
存盤時必須存放在考生文件夾下,工程文件名為sjt3.vbp,窗體文件名
為sjt3.frm。
解題思路:
啟動Visual Basic系統(tǒng),創(chuàng)建一個Form1窗體。
在該窗體上畫一個計時器控件,通過其屬性窗口將名稱設(shè)為Timer1。畫一個圖像框,通過其屬性窗口將名稱設(shè)為Image1,通過Picture屬性將圖形文件pic.ico裝入。畫一個水平滾動條,通過其屬性窗口將名稱設(shè)為HScroll1,Min屬性設(shè)為100,Max屬性設(shè)為1200,LargeChange屬性設(shè)為100,SmallChange屬性設(shè)為25。
點擊滾動條(即運行Change事件過程),在Change事件過程中加入語句:Timer1.Interval =HScroll1.Value。還需在計時器的Timer事件過程中加入語句:Image1.Visible = Not Image1.Visible,即完
成了圖像框交替地顯示和隱藏功能。
參考文件:c:\wexam\26990001\hlpsys\參考答案\sjt3.vbp、sjt3.frm、sjt3.frx、sjt3.vbw
請把這些文件復(fù)制到c:\wexam\26990001中,然后打開sjt3.vbp文件并運行。
**********************************************************************
(2)在考生目錄下有一個工程文件sjt4.vbp,包含了所有控件和部分程序,如圖所示。
要求:
1)利用屬性窗口設(shè)置適當(dāng)?shù)膶傩?
為List1列表框添加3個項目:宋體、黑體、楷體_GB2312;Text1文本框設(shè)置初始值為“計算機”;Hscroll1水平滾動條設(shè)置最小值和最大值分別為10和50。
2)去掉程序中的注釋符,把程序中的 ?改為正確的內(nèi)容, 完成以下功能:如果在列表框中選擇一種字體,然后移動滾動條中的滾動框,則可使文本框中的文字按所選擇的字體顯示,并可隨著滾動框的移動放大或縮小;如果不選擇字體直接移動滾動框,則顯示一個信息框,提示“請選擇字體”。
注意:
去掉程序中的注釋符,把程序中的 ?改為正確的內(nèi)容, 使其實現(xiàn)上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。
解題思路:
啟動Visual Basic系統(tǒng),打開考生文件夾下需編輯的工程文件sjt4.vbp,相應(yīng)的窗體文件名為sjt4.frm。
由于所提供的窗體控件不完整,通過屬性窗口向列表框中添加項目(List屬性),添加的項目分別為:宋體、黑體、楷體_GB2312,每個項目為一行。通過屬性窗口將文本內(nèi)容(Text屬性)設(shè)為“計算機”。通過屬性窗口將水平滾動條最小值(Min屬性)設(shè)為10,最大值(Max屬性)設(shè)為50。
由于所提供的窗體程序不完整,在水平滾動條的Private Sub HScroll1_Change()事件過程中,有二處地方
需要修改。
1) 將語句
'Text1.FontSize = ?
改為
Text1.FontSize = HScroll1.Value
2) 將語句
'Text1.FontName = ?
改為
Text1.FontName = List1.Text
參考文件:c:\wexam\26990001\hlpsys\參考答案\sjt4.vbp、sjt4.frm、sjt4.frx、sjt4.vbw
請把這些文件復(fù)制到c:\wexam\26990001中,然后打開sjt4.vbp文件并運行。
相關(guān)推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |