第 1 頁:基本操作 |
第 2 頁:簡單應(yīng)用 |
第 3 頁:綜合應(yīng)用 |
1. 基本操作(2小題,每小題15分,共計(jì)30分)
注意:下面出現(xiàn)的“考生文件夾”均為%USER%
請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visual Basic應(yīng)用程序(包括界面和代碼)。
(1)在名稱為Form1的窗體上畫一個(gè)名稱為command1、標(biāo)題為“打開”的命令按鈕,然后畫一個(gè)名稱為CD1的通用對(duì)話框(如圖所示),編寫適當(dāng)?shù)氖录^程,使得運(yùn)行程序時(shí),單擊“打開”命令按鈕, 則彈出打開文件對(duì)話框。在屬性窗口中設(shè)置通用對(duì)話框的適當(dāng)屬性, 使得對(duì)話框中顯示的文件類型第一項(xiàng)為“所有文件”,第二項(xiàng)為“*.DOC”,默認(rèn)的過濾器為.DOC文件。
注意:
要求程序中不得使用變量,事件過程中只能寫一條語句。存盤時(shí)必須存放在考生文件夾下,工程文件名為sjt1.vbp,窗體文件名為sjt1.frm。
解題思路:
啟動(dòng)Visual Basic系統(tǒng),創(chuàng)建一個(gè)Form1窗體。
在該窗體上畫一個(gè)命令按鈕控件,通過其屬性窗口將名稱設(shè)為Command1,標(biāo)題(Caption屬性)設(shè)為"打開"。
畫一個(gè)通用對(duì)話框控件,通過其屬性窗口將名稱設(shè)為CD1,F(xiàn)ilter屬性設(shè)為"所有文件|*.*|*.Doc|*.doc",F(xiàn)ilterIndex屬性設(shè)為2。
單擊"打開"按鈕(即運(yùn)行Click事件過程),在該Click事件過程中加入語句:
Private Sub Command1_Click()
CD1.ShowOpen
End Sub
參考文件:c:\wexam\26990001\hlpsys\參考答案\sjt1.vbp、sjt1.frm、sjt1.vbw
請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中,然后打開sjt1.vbp文件并運(yùn)行。
(2)在名稱為 Form1的窗體上畫一個(gè)文本框,名稱為Text1,其初始內(nèi)容為0;畫一個(gè)命令按鈕,名稱為C1,標(biāo)題為“開始計(jì)數(shù)”;再畫一個(gè)名稱為T1的計(jì)時(shí)器。要求在開始運(yùn)行時(shí)不計(jì)數(shù),單擊“開始計(jì)數(shù)”按鈕后, 使文本框中的數(shù)每秒加1。在命令按鈕的適當(dāng)事件過程中加入語句:
T1.Enabled = True,并編寫適當(dāng)?shù)氖录^程實(shí)現(xiàn)這個(gè)功能,要求只能寫一條語句。運(yùn)行時(shí)的窗體如圖所示。
*注意:
存盤時(shí)必須存放在考生文件夾下,工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。
解題思路:
啟動(dòng)Visual Basic系統(tǒng),創(chuàng)建一個(gè)Form1窗體。
在該窗體上畫一個(gè)文本框,通過其屬性窗口將名稱設(shè)為Text1,文本框中的初始內(nèi)容(Text屬性)設(shè)為0。
畫一個(gè)命令按鈕,通過其屬性窗口將名稱設(shè)為C1,標(biāo)題(Caption屬性)設(shè)為“開始計(jì)數(shù)”。再畫一個(gè)計(jì)時(shí)器,通過其屬性窗口將名稱設(shè)為T1,Interval屬性設(shè)為1000(每秒加1),Enabled屬性設(shè)為False(即程序開始運(yùn)行時(shí)不計(jì)數(shù))。
單擊命令按鈕(即運(yùn)行Click事件過程),在Click事件過程中加入語句:T1.Enabled = True,即啟動(dòng)了計(jì)時(shí)器。在計(jì)時(shí)器的Timer事件過程中加入語句:Text1.Text = Text1.Text + 1,即完成每秒加1功能。
參考文件:c:\wexam\26990001\hlpsys\參考答案\sjt2.vbp、sjt2.frm、sjt2.vbw請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中,然后打開sjt2.vbp文件并運(yùn)行。
相關(guān)推薦:
2012年計(jì)算機(jī)等考四級(jí)數(shù)據(jù)庫工程師備考筆記匯總
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |