2012年計(jì)算機(jī)二級(jí)VB上機(jī)試題及解題思路第十八套

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

　　(1)在考生文件夾下有一個(gè)工程文件sjt3.vbp，請(qǐng)?jiān)诖绑w上畫兩個(gè)框架，其名稱分別為F1和F2，標(biāo)題分別為“交通工具”和“到達(dá)目標(biāo)”。在F1中畫兩個(gè)單選按鈕，名稱分別為Op1和Op2，標(biāo)題分別為“飛機(jī)”和“火車”。在F2中畫兩個(gè)單選按鈕，名稱分別為Op3和Op4，標(biāo)題分別為“廣州”和“昆明”。畫一個(gè)標(biāo)簽，其名稱為L(zhǎng)ab1，寬度為3000，高度為 375。編寫適當(dāng)事件過(guò)程。程序運(yùn)行后，選擇不同單選按鈕并單擊窗體后在標(biāo)簽上顯示的結(jié)果見下表程序的運(yùn)行情況如圖所示。存盤時(shí)，工程文件名為sjt3.vbp，窗體文件名為sjt3.frm。

　　注意：

　　考生不得修改窗體文件中已經(jīng)存在的程序，在結(jié)束程序運(yùn)行之前，必須至少進(jìn)行上面的一種操作。退出程序時(shí)必須通過(guò)單擊窗體右上角的關(guān)閉按鈕。

　　解題思路：

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

　　由于所提供的窗體控件不完整，需在該窗體上畫二個(gè)框架控件，通過(guò)其屬性窗口將名稱分別設(shè)為F1、F2，

　　標(biāo)題(Caption屬性)分別設(shè)為“交通工具”和“到達(dá)目標(biāo)”。在F1框架中畫二個(gè)單選按鈕控件，通過(guò)其屬性窗口將名稱分別設(shè)為Op1、Op2，標(biāo)題(Caption屬性)分別設(shè)為“飛機(jī)”和“火車”。在F2框架中畫二個(gè)單選按鈕控件，通過(guò)其屬性窗口將名稱分別設(shè)為Op3、Op4，標(biāo)題(Caption屬性)分別設(shè)為“廣州”和“昆明”。畫一個(gè)標(biāo)簽控件，通過(guò)其屬性窗口將名稱設(shè)為L(zhǎng)ab1。

　　由于所提供的窗體程序不完整，需添加事件過(guò)程。

　　單擊單選按鈕(即運(yùn)行Click事件過(guò)程)，在每個(gè)單選按鈕Click事件過(guò)程中加入語(yǔ)句：Fun標(biāo)簽顯示的通用過(guò)程Fun()，在該過(guò)程中加入語(yǔ)句：

　　Private Sub Fun()

　　If Op1 And Op3 Then

　　Lab1.Caption = "坐飛機(jī)去廣州"

　　ElseIf Op1 And Op4 Then

　　Lab1.Caption = "坐飛機(jī)去昆明"

　　ElseIf Op2 And Op3 Then

　　Lab1.Caption = "坐火車去廣州"

　　ElseIf Op2 And Op4 Then

　　Lab1.Caption = "坐火車去昆明"

　　End If

　　End Sub

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

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

　　(2)在考生文件夾下有一個(gè)工程文件sjt4.vbp，請(qǐng)?jiān)诖绑w上畫二個(gè)文本框，其名稱分別為Text1、Text2，文本框內(nèi)容分別設(shè)置為“等級(jí)考試”、“計(jì)算機(jī)”。然后畫一個(gè)標(biāo)簽，其名稱為 Lab1，高度為375，寬度為2000。再畫兩個(gè)單選按鈕，名稱分別為Op1和Op2，標(biāo)題分別為“交換”和“連接”，最后再畫一個(gè)命令按鈕，其名稱為C1，標(biāo)題為“確定”，編寫適當(dāng)?shù)氖录�程序。程序運(yùn)行后，如果選中“交換”單選按鈕并單擊“確定”按鈕，則Text1文本框中內(nèi)容與Text2文本框中內(nèi)容進(jìn)行交換，并在標(biāo)簽處顯示“交換成功”(如圖所示);如果選中“連接”單選按鈕并單擊“確定”按鈕后，則把交換后的Text1和Text2的內(nèi)容連接起來(lái)，并在標(biāo)簽處顯示連接后的內(nèi)容。存盤時(shí)，工程文件名為sjt4.vbp，窗體文件名為sjt4.frm。

　　注意：不得修改已經(jīng)給出的程序。在結(jié)束程序運(yùn)行之前，必須選中一個(gè)單選按鈕，并單擊“確定”按鈕。退出程序時(shí)必須通過(guò)單擊窗體右上角的關(guān)閉按鈕，否則可能無(wú)成績(jī)。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，打開考生文件夾下需編輯的工程文件sjt4.vbp，相應(yīng)的窗體文件名為sjt4.frm。在該窗體上畫二個(gè)文本框，通過(guò)其屬性窗口將名稱分別設(shè)為Text1和Text2，文本框中的初始內(nèi)容(Text屬性)分別設(shè)為“等級(jí)考試”和“計(jì)算機(jī)”。畫一個(gè)標(biāo)簽，通過(guò)其屬性窗口將名稱設(shè)為L(zhǎng)ab1，標(biāo)簽的高度(Height屬性)設(shè)為375，寬度(Width屬性)設(shè)為2000。畫兩個(gè)單選按鈕，通過(guò)其屬性窗口將名稱分別設(shè)為Op1和Op2，標(biāo)題(Caption屬性)分別設(shè)為“交換”和“連接”，再畫一個(gè)命令按鈕，通過(guò)其屬性窗口將名稱設(shè)為C1，標(biāo)題(Caption屬性)設(shè)為“確定”。

　　選擇相關(guān)單選按鈕，然后單擊“確定”按鈕(即運(yùn)行其Click事件過(guò)程)，在該Click事件過(guò)程中加入語(yǔ)句：

　　Private Sub C1_Click()

　　If Op1 Then

　　Lab1.Caption = Text1.Text

　　Text1.Text = Text2.Text

　　Text2.Text = Lab1.Caption

　　Lab1.Caption = "交換成功"

　　ElseIf Op2 Then

　　Lab1.Caption = Text1.Text & Text2.Text

　　End If

　　End Sub

　　另外特別需要注意的是在結(jié)束程序時(shí)必須用窗體右上角的關(guān)閉按鈕來(lái)結(jié)束程序，否則該部分將沒(méi)有成績(jī)。

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

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

　　相關(guān)推薦：

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

　　2012年計(jì)算機(jī)等級(jí)考試二級(jí)VB重點(diǎn)知識(shí)匯總

　　2012年下半年計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間及入口匯總