計算機等級考試
您現(xiàn)在的位置: 考試吧(Exam8.com) > 計算機等級考試 > 計算機二級 > VB > 上機題庫 > 正文

2012年計算機二級VB上機試題及解題思路第31套

第 1 頁:基本操作
第 2 頁:簡單應(yīng)用
第 3 頁:綜合應(yīng)用


  2. 簡單應(yīng)用(2小題,每題20分,計40分)

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

  (1)在名稱為Form1的窗體上畫一個名稱為Text1的文本框,再建立一個名稱為Format的彈出式菜單,含三個菜單項,標(biāo)題分別為“加粗”、“斜體”、“下劃線”,名稱分別為M1、M2、M3。請編寫適當(dāng)?shù)氖录^程,在運行時當(dāng)用鼠標(biāo)右鍵單擊文本框時,彈出此菜單,選中一個菜單項后,則按所選菜單標(biāo)題設(shè)置文本框中文本的格式,如圖所示。

  *注意:

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

  解題思路:

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

  在該窗體上畫一個文本框控件,通過其屬性窗口將名稱設(shè)為Text1。通過菜單編輯器建立一個主菜單,在菜單編輯器的標(biāo)題處輸入“格式”(題目沒有要求),名稱處輸入Format,將“可見”單選按鈕設(shè)為不選狀態(tài)。

  在該菜單下有三個子菜單,在菜單編輯器的標(biāo)題處分別輸入“加粗”、“斜體”、“下劃線”,名稱處分別輸入M1、M2、M3。

  右鍵單擊文本框,在彈出的菜單中選擇“加粗”命令(即運行Click事件過程),在該Click事件過程中加入語句:

  Private Sub m1_Click()

  Text1.Font.Bold = True

  End Sub

  右鍵單擊文本框,在彈出的菜單中選擇“斜體”命令(即運行Click事件過程),在該Click事件過程中加入語句:

  Private Sub m2_Click()

  Text1.Font.Italic = True

  End Sub

  右鍵單擊文本框,在彈出的菜單中選擇“下劃線”命令(即運行Click事件過程),在該Click事件過程中加入語句:

  Private Sub m3_Click()

  Text1.Font.Underline = True

  End Sub

  在文本框中右鍵按下鼠標(biāo)(即運行MouseDown事件過程),在該MouseDown事件過程中加入語句:

  Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

  If Button = 2 Then '2表示右鍵的值

  PopupMenu format

  End If

  End Sub

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

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

  (2)在考生文件夾下有一個工程文件sjt4.vbp,含有Form1和Form2兩個窗體,F(xiàn)orm1為啟動窗體,窗體上的控件如圖1所示。程序運行后,在Form1窗體的文本框中輸入有關(guān)信息(“密碼”框中顯示“*”字符),然后單擊“提交”按鈕則彈出“確認(rèn)”對話框(即Form2窗體),并在Form2中顯示輸入的信息,如圖2所示。單擊“確認(rèn)”按鈕則程序結(jié)束,單擊“重輸”按鈕,則Form2消失,回到Form1窗體。在給出的窗體文件中已經(jīng)給出了程序,但不完整。

  要求:

  1)把Form1的標(biāo)題改為“注冊”,把Form2的標(biāo)題改為“確認(rèn)”;

  2)設(shè)置適當(dāng)?shù)膶傩,使Form2標(biāo)題欄上的所有按鈕消失(如圖2所示);

  3)去掉程序中的注釋符,把程序中的 ?改為正確的內(nèi)容。

  注意:不能修改程序中的其他部分,標(biāo)題等屬性的修改只能在屬性窗口中進(jìn)行。最后把修改后的文件按原文件名存盤。

  解題思路:

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

  由于所提供的窗體控件不完整,通過其屬性窗口將Form1的標(biāo)題(Caption屬性)設(shè)為“注冊”,F(xiàn)orm2的標(biāo)題(Caption屬性)設(shè)為“確認(rèn)”,將Form2的所有按鈕(ControlBox屬性)設(shè)為False。

  由于所提供的窗體程序不完整,在“確認(rèn)”按鈕的Private Sub C1_Click()中,有三處地方需要修改。

  1) 將語句

  'Form2. ?

  改為

  Form2.Show

  2) 將語句

  'Form2.Print Form1.Frame1. ?

  改為

  Form2.Print Form1.Frame1.Caption

  3) 將語句

  'If Form1.Op1( ? ).Value Then

  改為

  If Form1.Op1(k).Value Then

  在窗體的Private Sub Form_Load()中,有一處地方需要修改。

  1) 將語句

  'Text2. ? = "*"

  改為

  Text2.PasswordChar = "*"

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

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

上一頁  1 2 3 4 下一頁

  相關(guān)推薦:

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

  2012年計算機等級考試二級VB重點知識匯總

  2012年下半年計算機等級考試報名時間及入口匯總

文章搜索
計算機等級考試欄目導(dǎo)航
版權(quán)聲明:如果計算機等級考試網(wǎng)所轉(zhuǎn)載內(nèi)容不慎侵犯了您的權(quán)益,請與我們聯(lián)系800@exam8.com,我們將會及時處理。如轉(zhuǎn)載本計算機等級考試網(wǎng)內(nèi)容,請注明出處。