簡單應用題

　　3在考生文件夾下有一個工程文件sit3.vbp，窗體上已經有一個標簽Labell，請添加一個單選按鈕數組，名稱為Op1，含三個單選按鈕，它們的Index屬性分別為0、1、2，標題依次為“飛機”、“火車”、“汽車”，再添加一個名稱為Textl的文本框。窗體文件中已經給出了Opl的Click事件過程，但不完整，要求去掉程序中的注釋符，把程序中的?改為正確的內容，使得在程序運行時單擊“飛機”或“火車”單選按鈕時，在Textl中顯示“我坐飛機去”或“我坐火車去”，單擊“汽車”單選按鈕時，在Textl中顯示“我開汽車去”，如圖所示。

　　注意：不能修改程序中的其他部分。最后將修改后的文件按原文件名存盤。

　　參考解析：

　　【考點分析】本題考點有：單選按鈕數組的Name、Caption和Index屬性，文本框的Name屬性，SelectCase選擇語句，“+”字符連接。

　　【解題思路】通過Name屬性設置對象名稱;通過Caption屬性設置對象的標題;設置兩個字符型變量a、b，a："我坐"，b="我開"，用于SelectCase選擇語句的字符串連接;通過對單選按鈕數組Index屬性的查詢，實現單擊單選按鈕完成字符串連接和文本框顯示操作的功能。

　　【操作步驟】

　　步驟1：打開本題工程文件，按照題目要求建立單選按鈕數組，如圖3.9所示。

　　步驟2：按照題目要求建立其他控件并設置其屬性，見表3.4。

　　步驟3：打開代碼編輯窗口，去掉程序中的注釋符“´”，將問號改為正確的內容。

　　參考答案(橫線部分是需考生填入的內容)

　　Private Sub Op1_click (Index As Integer)

　　Dima As String，b As String，C As String

　　a="我坐"

　　b="我開"

　　Select Case____Index______

　　´通過Index值決定響應哪一個控件數組

　　CaSe　O

　　Text1.Text=a+Me.Op1(O).Caption+"去"

　　CaSe　1

　　Text1.Text=____a______+Me.Opl(1).Caption+"去"

　　´當Index值為1時，選擇"我坐"

　　CaSe　2

　　Text1.Text=b+Me.Op1(2).Caption+"去"

　　End Select

　　EndSub

　　步驟4：調試并運行程序，關閉程序后按題目要求存盤。

　　【易錯提示】在窗體上復制一個控件時，如果需要創建控件數組，則在提示框中單擊“是”即可，如果不需要，則直接單擊“否”。

　　4在考生文件夾下有一個工程文件sjt4.vbp。窗體中有一個圖片框，圖片框中有—個藍色圓，名稱為Shapel，如圖所示。

　　當程序運行時，單擊“開始”按鈕，圓半徑逐漸變大(圓心位置不變)，當圓充滿圖片框時則變為紅色，并開始逐漸縮小，當縮小到初始大小時又變為藍色，并再次逐漸變大，如此往復。單擊“停止”按鈕，則停止變化。文件中已經給出了所有控件和程序，但程序不完整，請去掉程序中的注釋符，把程序中的?改為正確的內容。

　　提示：程序中的符號常量blue_color表示藍色的值，red_color表示紅色的值。

　　注意：不能修改程序的其他部分和各控件的屬性。最后將修改后的文件按原文件名存盤。

　　參考解析：

　　【考點分析】本題考點有：形狀控件的Height、Width、Left、Top和FillColor屬性，時鐘控件的Enabled屬性以及If判斷語句。

　　【解題思路】通過Shapel的Left屬性判斷圖片是否充滿圖片框或恢復到了初始大小，從而進行圖片顏色紅藍的轉換以及圓形的放大或縮小。通過形狀控件的Height、Width、Left和Top屬性來實現圓形的大小變化。

　　【操作步驟】

　　步驟1：打開本題工程文件。

　　步驟2：打開代碼編輯窗口，去掉程序中的注釋符“´”，

　　將問號改為正確的內容。

　　參考答案(陰影部分是需考生填入的內容)

　　步驟3：調試并運行程序，關閉程序后按題目要求存盤。

　　相關推薦：

　　2015年計算機二級《MSOffice》全真模擬試題匯總

　　2015計算機二級《C語言程序設計》無紙化操作題匯總