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

　　***********************************************************************

　　(1)在考生文件夾下有一個(gè)工程文件sjt3.vbp，窗體上有一個(gè)單選按鈕數(shù)組，含三個(gè)單選按鈕;還有一個(gè)標(biāo)題為“顯示”的命令按鈕(如圖所示)。程序的功能是，在運(yùn)行時(shí)，如果選中一個(gè)單選按鈕并單擊“顯示”按鈕，則在窗體上顯示相應(yīng)的信息，例如若選中“小學(xué)生”，則在窗體上顯示“我是小學(xué)生”。

　　要求：

　　去掉程序中的注釋符，把程序中的 ?改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不能修改程序中的其他部分，也不能修改控件的屬性。最后把修改后的文件以原來(lái)的文件名存盤(pán)。

　　解題思路：

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

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

　　1) 將語(yǔ)句

　　'For i = ? To

　　改為

　　For i = 0 To

　　2) 將語(yǔ)句

　　'To ?

　　改為

　　To 2

　　3) 將語(yǔ)句

　　'If Op1(i).? = True Then

　　改為

　　If Op1(i).Value = True Then

　　4) 將語(yǔ)句

　　'Print "我是" + Op1(i).?

　　改為

　　Print "我是" + Op1(i).Caption

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

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

　　**********************************************************************

　　(2)在考生文件夾下有一個(gè)工程文件sjt4.vbp，相應(yīng)的窗體文件為sjt4.frm。

　　窗體上有一個(gè)名稱為Command1的命令按鈕和一個(gè)名稱為T(mén)imer1的計(jì)時(shí)器。

　　請(qǐng)?jiān)诖绑w上畫(huà)一個(gè)標(biāo)簽(名稱為L(zhǎng)abel1，標(biāo)題為“請(qǐng)輸入一個(gè)正整數(shù)”)0、再畫(huà)一個(gè)文本框(名稱為 Text1，初始內(nèi)容為空白)。已經(jīng)給出了相應(yīng)的事件過(guò)程。程序運(yùn)行后，在文本框中輸入一個(gè)正整數(shù)，此時(shí)如果按回車鍵，則可使文本框中的數(shù)字每隔0.3秒減 1(倒計(jì)數(shù));當(dāng)減到0時(shí)，倒計(jì)數(shù)停止，清空文本框，并把焦點(diǎn)移到文本框中。

　　要求：

　　去掉程序中的注釋符，把程序中的 ?改為正確的內(nèi)容， 使其能正確運(yùn)行，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤(pán)。

　　解題思路：

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

　　由于所提供的窗體控件不完整，在該窗體上畫(huà)一個(gè)標(biāo)簽控件，通過(guò)其屬性窗口將名稱設(shè)為L(zhǎng)abel1，標(biāo)題(Caption屬性)設(shè)為“請(qǐng)輸入一個(gè)正整數(shù)”。畫(huà)一個(gè)文本框控件，通過(guò)屬性窗口將文本內(nèi)容(Text屬性)設(shè)為空。

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

　　1) 將語(yǔ)句

　　'If Val(?) = 0 Then

　　改為

　　If Val(Text1.Text) = 0 Then

　　2) 將語(yǔ)句

　　'Timer1.? = False

　　改為

　　Timer1.Enabled = False

　　3) 將語(yǔ)句

　　'Text1.?

　　改為

　　Text1.SetFocus

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

　　請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開(kāi)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í)間及入口匯總