1. 基本操作(2小題,每小題15分,共計(jì)30分)
注意:下面出現(xiàn)的“考生文件夾”均為%USER%
請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visual Basic應(yīng)用程序(包括界面和代碼)。
(1)在名稱為Form1的窗體上畫(huà)一個(gè)名稱為Text1的文本框,其高、寬分別為400、2000。請(qǐng)?jiān)趯傩钥蛑性O(shè)置適當(dāng)?shù)膶傩詽M足以下要求:
1)Text1的字體為“黑體”,字號(hào)為“四號(hào)”;
2)窗體的標(biāo)題為“輸入”,不顯示最大化按鈕和最小化按鈕。運(yùn)行后的窗體如圖所示。
注意:
存盤時(shí)必須存放在考生文件夾下,工程文件名為sjt1.vbp,窗體文件名為sjt1.frm。
解題思路:
啟動(dòng)Visual Basic系統(tǒng),創(chuàng)建一個(gè)Form1窗體。
在該窗體上畫(huà)一個(gè)文本框控件,通過(guò)其屬性窗口將名稱設(shè)為Text1,高(Height屬性)設(shè)為400,寬(Width屬性)設(shè)為2000,點(diǎn)擊Font屬性在彈出的字體對(duì)話框中將字體設(shè)為“黑體”,大小設(shè)為“四號(hào)”。激活Form1窗體,通過(guò)其屬性窗口將標(biāo)題(Caption屬性)設(shè)為“輸入”,最大化按鈕(MaxButton屬性)設(shè)為False,最小化按鈕(MinButton屬性)設(shè)為False。
參考文件:c:\wexam\26990001\hlpsys\參考答案\sjt1.vbp、sjt1.frm、sjt1.vbw
請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中,然后打開(kāi)sjt1.vbp文件并運(yùn)行。
(2)在名稱為Form1的窗體上畫(huà)一個(gè)名稱為Image1的圖象框,利用屬性窗口裝入考生目錄下的圖象文件 pic1.bmp,并設(shè)置適當(dāng)屬性使其中的圖象可以適應(yīng)圖象框大小;再畫(huà)兩個(gè)命令按鈕,名稱分別為Command1、Command2,
標(biāo)題分別為“向右移動(dòng)”、“向下移動(dòng)”。請(qǐng)編寫(xiě)適當(dāng)?shù)氖录^(guò)程, 使得在運(yùn)行時(shí),每單擊“向右移動(dòng)”按鈕一次,圖象框向右移動(dòng)100;每單擊“向下移動(dòng)”按鈕一次,圖象框向下移動(dòng)100。運(yùn)行時(shí)的窗體如圖所示。要求程序中不得使用變量,事件過(guò)程中只能寫(xiě)一條語(yǔ)句。
注意:
存盤時(shí)必須存放在考生文件夾下,工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。
解題思路:
啟動(dòng)Visual Basic系統(tǒng),創(chuàng)建一個(gè)Form1窗體。
在該窗體上畫(huà)一個(gè)圖象框控件,通過(guò)其屬性窗口將名稱設(shè)為Image1,通過(guò)其Picture屬性將pic1.jpg裝入圖片框,Stretch屬性設(shè)為True。畫(huà)二個(gè)命令按鈕控件,通過(guò)其屬性窗口將名稱分別設(shè)為Command1、Command2,標(biāo)題(Caption屬性)設(shè)為“向右移動(dòng)”、“向下移動(dòng)”。
單擊“向右移動(dòng)”按鈕(即運(yùn)行Click事件過(guò)程),在該Click事件過(guò)程中加入語(yǔ)句:
Private Sub Command1_Click()
Image1.Left = Image1.Left + 100
End Sub
單擊“向下移動(dòng)”按鈕(即運(yùn)行Click事件過(guò)程),在該Click事件過(guò)程中加入語(yǔ)句:
Private Sub Command2_Click()
Image1.Top = Image1.Top + 100
End Sub
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |