試題答案及詳解

　　一、基本操作題

　　第 1 小題

　　【審題分析】要實現本題所要求的功能應在"左端"、"居中"和"右端"3 個命令按鈕的單擊事件過程中，設置水平滾動條的 Value 屬性值分別與其 Min 屬性值、Max 屬性值及 Max/2 值一致。

　　【操作步驟】

　　步驟 1：新建一個"標準 EXE"工程，按表 55-1 在窗體中畫出控件并設置其相關屬性。

　　表 55-1

　　步驟 2：在代碼編輯窗口，編寫 3 個按鈕的單擊事件過程。

　　步驟 3：按要求將文件保存至考生文件夾中。

　　【特別提示】如果水平滾動條的 Min 屬性值不為 0 時，居中時應設置 Value 屬性值為(Max+Min)/2。

　　第 2 小題

　　【審題分析】要實現本題中的功能，應在"體育"按鈕的 Click 事件過程中，用 Print語句在窗體上輸出"我喜歡體育"，在"美術"按鈕的 Click 事件過程中，用 Print 語句在窗體上輸出"我喜歡美術"。

　　【操作步驟】

　　步驟 1：新建一個"標準 EXE"工程，在窗體 Form1 中加入兩個命令按鈕，分別設置它們的相關屬性，其屬性及其值見表 55-2。

　　表 55-2

　　步驟 2：單擊窗體 Form1 中的"體育"按鈕，在打開的代碼編輯窗口中，輸入代碼：Print "我喜歡體育"。

　　步驟 3：單擊代碼編輯窗口中的對象下拉列表框，從中選擇 Cmd2，在其 Click 事件過程中輸入代碼：Print "我喜歡美術"。

　　步驟 4：按要求將文件保存至考生文件夾中。

　　二、簡單應用題

　　第 1 小題

　　【審題分析】本題其實就是編寫"確定"按鈕的單擊事件過程。設計思路：由于單選按鈕數組選擇的惟一性，可用一個 If?Then?Else 語句對可能出現的兩種情況(Opt1 或Opt2 被選中)分別進行處理，為 Txt1 的 FontName 屬性設置不同值;對于兩個復選框可用兩個 If?Then?Else 語句依次對其選中情況進行處理，若選中則將對應的 FontUnderline屬性值或 FontItalic 屬性值設置為 True，否則設置為 False。

　　【操作步驟】

　　步驟 1：打開考生文件下的本題工程文件 vbs3.vbp，在第一個框架中畫兩個單選按鈕和第二個框架中畫兩個復選框，其屬性及其值見表 55-3。

　　表 55-3

　　步驟 2：打開代碼編輯窗口，編寫"確定"按鈕的 Click 事件過程，代碼如下。

　　參考代碼：

　　Private Sub Cmd1_Click()

　　If Opt1.Value = True Then

　　Txt1.FontName = "宋體"

　　Else

　　Txt1.FontName = "隸書"

　　118

　　End If

　　If Chk1.Value = 1 Then

　　Txt1.FontUnderline = True

　　Else

　　Txt1.FontUnderline = False

　　End If

　　If Chk2.Value = 1 Then

　　Txt1.FontItalic = True

　　Else

　　Txt1.FontItalic = False

　　End If

　　End Sub

　　步驟 3：按要求將文件保存至考生文件夾中。

　　第 2 小題

　　【審題分析】本題利用計時器來控制紅、黃、綠燈間的循環切換。在"開始"按鈕的單擊事件過程中，將根據兩個水平滾動條的 Value 屬性值，來分別設定紅燈和綠燈亮的時間數(用變 red 和 green 記錄)。在每次觸發的計時器 Timer 事件時，首先判斷當前紅燈是否亮(即 PicR 是否顯示)，若紅燈亮則將設定的紅燈時間 red 減 1，并再次判斷 red 的值是否為 0，若為 0 則紅燈滅黃燈亮(即 PicR 不顯示，PicY 顯示);如果當前是黃燈亮(即PicY 顯示)，則黃燈滅(即 PicY 不顯示)，此時若 red 為 0，則綠燈亮(即 PicG 顯示)且重新設定 red，否則紅燈亮(即 PicR 顯示)且重新設定 green;如果當前是綠燈亮(即 PicG顯示)，則將設定的綠燈時間 green 減 1，并再次判斷 green 的值是否為 0，若為 0 則綠燈滅黃燈亮(即 PicG 不顯示，PicY 顯示)。

　　【操作步驟】

　　步驟 1：打開考生文件中的本題工程文件 vbsj4.vbp，在代碼編輯窗口，去掉程序中的注釋符"’"，將問號"?"改為正確的內容。

　　參考代碼：

　　red = Hsb1.Value

　　Tmr1.Enabled = True

　　PicR.Visible = False

　　green = green-1

　　步驟 2：按要求將文件保存至考生文件夾中。

　　編輯推薦：

　　2014年上半年計算機等級考試報名時間及入口專題

　　各地2014年計算機等級考試費用匯總

　　2014年計算機等級考試時間