主頁 > 教育培訓(xùn) > 職業(yè)培訓(xùn) > 2013年計算機二級考試VB上機模擬題二及答案

2013年計算機二級考試VB上機模擬題二及答案

       2013年計算機二級考試VB上機模擬題二及答案:

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

  請根據(jù)以下各小題的要求設(shè)計Visual Basic應(yīng)用程序(包括界面和代碼)。

  (1)在名稱為Form1的窗體上畫一個名稱為Text1的文本框,其高、寬分別為400、2000。請在屬性框中設(shè)置適當(dāng)?shù)膶傩詽M足以下要求:

  1)Text1的字體為“黑體”,字號為“四號”;

  2)窗體的標題為“輸入”,不顯示最大化按鈕和最小化按鈕。運行后的窗體如圖所示。

  注意:

  存盤時必須存放在考生文件夾下,工程文件名為sjt1.vbp,窗體文件名為sjt1.frm。

  解題思路:

  啟動Visual Basic系統(tǒng),創(chuàng)建一個Form1窗體。

  在該窗體上畫一個文本框控件,通過其屬性窗口將名稱設(shè)為Text1,高(Height屬性)設(shè)為400,寬(Width屬性)設(shè)為2000,點擊Font屬性在彈出的字體對話框中將字體設(shè)為“黑體”,大小設(shè)為“四號”。激活Form1窗體,通過其屬性窗口將標題(Caption屬性)設(shè)為“輸入”,最大化按鈕(MaxButton屬性)設(shè)為False,最小化按鈕(MinButton屬性)設(shè)為False。

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

  請把這些文件復(fù)制到c:\wexam\26990001中,然后打開sjt1.vbp文件并運行。

  (2)在名稱為Form1的窗體上畫一個名稱為Image1的圖象框,利用屬性窗口裝入考生目錄下的圖象文件 pic1.bmp,并設(shè)置適當(dāng)屬性使其中的圖象可以適應(yīng)圖象框大小;再畫兩個命令按鈕,名稱分別為Command1、Command2,

  標題分別為“向右移動”、“向下移動”。請編寫適當(dāng)?shù)氖录^程, 使得在運行時,每單擊“向右移動”按鈕一次,圖象框向右移動100;每單擊“向下移動”按鈕一次,圖象框向下移動100。運行時的窗體如圖所示。要求程序中不得使用變量,事件過程中只能寫一條語句。

  注意:

  存盤時必須存放在考生文件夾下,工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。

  解題思路:

  啟動Visual Basic系統(tǒng),創(chuàng)建一個Form1窗體。

  在該窗體上畫一個圖象框控件,通過其屬性窗口將名稱設(shè)為Image1,通過其Picture屬性將pic1.jpg裝入圖片框,Stretch屬性設(shè)為True。畫二個命令按鈕控件,通過其屬性窗口將名稱分別設(shè)為Command1、Command2,標題(Caption屬性)設(shè)為“向右移動”、“向下移動”。

  單擊“向右移動”按鈕(即運行Click事件過程),在該Click事件過程中加入語句:

  Private Sub Command1_Click()

  Image1.Left = Image1.Left + 100

  End Sub

  單擊“向下移動”按鈕(即運行Click事件過程),在該Click事件過程中加入語句:

  Private Sub Command2_Click()

  Image1.Top = Image1.Top + 100

  End Sub

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

  請把這些文件復(fù)制到c:\wexam\26990001中,然后打開sjt2.vbp文件并運行。

免責(zé)聲明:該文觀點僅代表作者本人,查查吧平臺系信息發(fā)布平臺,僅提供信息存儲空間服務(wù),不承擔(dān)相關(guān)法律責(zé)任。圖片涉及侵權(quán)行為,請發(fā)送郵件至85868317@qq.com舉報,一經(jīng)查實,本站將立刻刪除。返回查查吧首頁,查看更多>>
提示

該文觀點僅代表作者本人,查查吧平臺系信息發(fā)布平臺,僅提供信息存儲空間服務(wù),不承擔(dān)相關(guān)法律責(zé)任。圖片涉及侵權(quán)行為,請發(fā)送郵件至85868317@qq.com舉報,一經(jīng)查實,本站將立刻刪除。

優(yōu)惠商城

更多