2. 簡單應用(2小題，每題20分，計40分)

　　注意：下面出現的“考生文件夾”均為%USER%

　　(1)在考生文件夾下有一個工程文件sjt3.vbp，在Form1的窗體中有一個文本框，二個命令按鈕和一個計時器。程序的功能是在運行時，單擊“開始計數”按鈕，就開始計數，每隔1秒，文本框中的數加1;單擊“停止計數”按鈕，則停止計數(如圖所示)。要求：修改適當的控件的屬性，并去掉程序中的注釋符，把程序中的?改為正確的內容，使其實現上述功能，但不能修改程序中的其他部分。最后把修改后的文件以原來的文件名存盤。

　　解題思路：

　　啟動Visual Basic系統，打開考生文件夾下需編輯的工程文件sjt3.vbp，相應的窗體文件名為sjt3.frm。

　　由于所提供的窗體控件屬性不完整，通過屬性窗口將計時器的Enabled屬性設為False，Interval屬性設為1000。

　　由于所提供的窗體程序不完整，在命令按鈕的Private Sub C1_Click(Index As Integer)事件過程中，有二處地方需要修改。

　　1) 將語句

　　'Select Case ?

　　改為

　　Select Case Index

　　2) 將語句

　　'Case ?

　　改為

　　Case 0

　　由于所提供的窗體程序不完整，在計時器的Private Sub Timer1_Timer()事件過程中，有一處地方需要修改。

　　1) 將語句

　　'Text1.Text = Text1.Text ?

　　改為

　　Text1.Text = Text1.Text + 1

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

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

　　(2)已知出租車行駛不超過4公里時一律收費10元。超過4公里時分段處理，具體處理方式為：15公里以內每公里加收 1.2元，15公里以上每公里收 1.8元。

　　在考生文件夾下有一個工程文件sjt4.vbp。程序的功能是：單擊“輸入”按鈕，將彈出一個輸入對話框，接收出租車行駛的里程數;單擊“計算”按鈕，則可根據輸入的里程數計算應付的出租車費，并將計算結果顯示在名稱為Text1的文本框內。

　　在窗體文件中已經給出了全部控件(如圖所示)，但程序不完整，要求去掉程序中的注釋符，把程序中的 ?改為正確的內容。

　　注意：

　　不得修改已經存在的內容和控件屬性，最后將修改后的文件按原文件名存盤。

　　解題思路：

　　啟動Visual Basic系統，打開考生文件夾下需編輯的工程文件sjt4.vbp，相應的窗體文件名為sjt4.frm。

　　由于所提供的窗體程序不完整，在Private Sub Command2_Click()事件過程中，有五處地方需要修改。

　　1) 將語句

　　'Select Case ?

　　改為

　　Select Case s

　　2) 將語句

　　'?

　　改為

　　f = 10

　　3) 將語句

　　'f = 10 + ?

　　改為

　　f = 10 + (s - 4) * 1.2

　　4) 將語句

　　'?

　　改為

　　Case Else

　　5) 將語句

　　'f = 10 + ? + (s - 15) * 1.8

　　改為

　　f = 10 + (15 - 4) * 1.2 + (s - 15) * 1.8

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

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

　　相關推薦：

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

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

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