注意：下面出現(xiàn)的“考生文件夾”均為%USER%

　　***********************************************************************

　　(1)在名稱為Form1的窗體上畫一個(gè)計(jì)時(shí)器，其名稱為Timer1;再畫一個(gè)圖像框，其名稱為Image1，在該圖像框中裝入一個(gè)圖形文件pic.ico;然后畫一個(gè)水平滾動(dòng)條， 其名稱為HScroll1， Min屬性值為100，Max屬性值為1200，LargeChange屬性值為100，SmallChange屬性值為25，編寫適當(dāng)?shù)氖录�過(guò)程。 程序運(yùn)行后，可以使圖像框閃爍，其閃爍速度可以通過(guò)滾動(dòng)條調(diào)節(jié)。

　　提示：

　　圖像框的閃爍可以通過(guò)圖像框交替地顯示和隱藏來(lái)實(shí)現(xiàn)。

　　要求：

　　程序中不得使用變量，每個(gè)事件過(guò)程中只能寫一條語(yǔ)句。

　　注意：

　　存盤時(shí)必須存放在考生文件夾下，工程文件名為sjt3.vbp，窗體文件名

　　為sjt3.frm。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，創(chuàng)建一個(gè)Form1窗體。

　　在該窗體上畫一個(gè)計(jì)時(shí)器控件，通過(guò)其屬性窗口將名稱設(shè)為Timer1。畫一個(gè)圖像框，通過(guò)其屬性窗口將名稱設(shè)為Image1，通過(guò)Picture屬性將圖形文件pic.ico裝入。畫一個(gè)水平滾動(dòng)條，通過(guò)其屬性窗口將名稱設(shè)為HScroll1，Min屬性設(shè)為100，Max屬性設(shè)為1200，LargeChange屬性設(shè)為100，SmallChange屬性設(shè)為25。

　　點(diǎn)擊滾動(dòng)條(即運(yùn)行Change事件過(guò)程)，在Change事件過(guò)程中加入語(yǔ)句：Timer1.Interval =HScroll1.Value。還需在計(jì)時(shí)器的Timer事件過(guò)程中加入語(yǔ)句：Image1.Visible = Not Image1.Visible，即完

　　成了圖像框交替地顯示和隱藏功能。

　　參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt3.vbp、sjt3.frm、sjt3.frx、sjt3.vbw

　　請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開(kāi)sjt3.vbp文件并運(yùn)行。

　　**********************************************************************

　　(2)在考生目錄下有一個(gè)工程文件sjt4.vbp，包含了所有控件和部分程序，如圖所示。

　　要求：

　　1)利用屬性窗口設(shè)置適當(dāng)?shù)膶傩?

　　為L(zhǎng)ist1列表框添加3個(gè)項(xiàng)目：宋體、黑體、楷體_GB2312;Text1文本框設(shè)置初始值為“計(jì)算機(jī)”;Hscroll1水平滾動(dòng)條設(shè)置最小值和最大值分別為10和50。

　　2)去掉程序中的注釋符，把程序中的 ?改為正確的內(nèi)容， 完成以下功能：如果在列表框中選擇一種字體，然后移動(dòng)滾動(dòng)條中的滾動(dòng)框，則可使文本框中的文字按所選擇的字體顯示，并可隨著滾動(dòng)框的移動(dòng)放大或縮小;如果不選擇字體直接移動(dòng)滾動(dòng)框，則顯示一個(gè)信息框，提示“請(qǐng)選擇字體”。

　　注意：

　　去掉程序中的注釋符，把程序中的 ?改為正確的內(nèi)容， 使其實(shí)現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，打開(kāi)考生文件夾下需編輯的工程文件sjt4.vbp，相應(yīng)的窗體文件名為sjt4.frm。

　　由于所提供的窗體控件不完整，通過(guò)屬性窗口向列表框中添加項(xiàng)目(List屬性)，添加的項(xiàng)目分別為：宋體、黑體、楷體_GB2312，每個(gè)項(xiàng)目為一行。通過(guò)屬性窗口將文本內(nèi)容(Text屬性)設(shè)為“計(jì)算機(jī)”。通過(guò)屬性窗口將水平滾動(dòng)條最小值(Min屬性)設(shè)為10，最大值(Max屬性)設(shè)為50。

　　由于所提供的窗體程序不完整，在水平滾動(dòng)條的Private Sub HScroll1_Change()事件過(guò)程中，有二處地方

　　需要修改。

　　1) 將語(yǔ)句

　　'Text1.FontSize = ?

　　改為

　　Text1.FontSize = HScroll1.Value

　　2) 將語(yǔ)句

　　'Text1.FontName = ?

　　改為

　　Text1.FontName = List1.Text

　　參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt4.vbp、sjt4.frm、sjt4.frx、sjt4.vbw

　　請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開(kāi)sjt4.vbp文件并運(yùn)行。

　　相關(guān)推薦：

　　2012年計(jì)算機(jī)等考四級(jí)數(shù)據(jù)庫(kù)工程師備考筆記匯總

　　2012年計(jì)算機(jī)等級(jí)考試二級(jí)VB重點(diǎn)知識(shí)匯總

　　2012年下半年計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間及入口匯總