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

　　


　　1. 基本操作(2小題，每小題15分，共計(jì)30分)

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

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

　　請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visual Basic應(yīng)用程序(包括界面和代碼)。

　　(1)在名稱(chēng)為 Form1的窗體上畫(huà)一個(gè)文本框，其名稱(chēng)為T(mén)1，寬度和高度分別為1400為400; 再畫(huà)兩個(gè)命令按鈕，其名稱(chēng)分別為C1和C2，標(biāo)題分別為“顯示”和“擴(kuò)大”，編寫(xiě)適當(dāng)?shù)氖录�過(guò)程。程序運(yùn)行后，如果單擊C1命令按鈕，則在文本框中顯示“等級(jí)考試”，如圖1所示;如果單擊C2命令按鈕，則使文本框在高、寬方向上各增加一倍，文本框中的字體大小擴(kuò)大到原來(lái)的3倍，如圖2所示。

　　注意：

　　要求程序中不得使用變量。

　　存盤(pán)時(shí)必須存放在考生文件夾下，工程文件名為sjt1.vbp，窗體文件名為sjt1.frm。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，創(chuàng)建一個(gè)Form1窗體。

　　在該窗體上畫(huà)一個(gè)文本框控件，通過(guò)其屬性窗口將名稱(chēng)設(shè)為T(mén)1，高(Height屬性)設(shè)為400，寬(Width屬性)設(shè)為1400。畫(huà)二個(gè)命令按鈕控件，通過(guò)其屬性窗口將名稱(chēng)分別設(shè)為C1、C2，標(biāo)題(Caption屬性)分別設(shè)為“顯示”、“擴(kuò)大”。

　　單擊“顯示”按鈕(即運(yùn)行Click事件過(guò)程)，在該Click事件過(guò)程中加入語(yǔ)句：

　　Private Sub C1_Click()

　　T1 = "等級(jí)考試"

　　End Sub

　　單擊“擴(kuò)大”按鈕(即運(yùn)行Click事件過(guò)程)，在該Click事件過(guò)程中加入語(yǔ)句：

　　Private Sub C2_Click()

　　T1.Height = 2 * Me.T1.Height

　　T1.Width = 2 * T1.Width

　　T1.FontSize = 3 * Form1.T1.FontSize

　　End Sub

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

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

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

　　(2)在名稱(chēng)為Form1的窗體上畫(huà)一個(gè)命令按鈕，其名稱(chēng)為C1，標(biāo)題為“轉(zhuǎn)換”;然后再畫(huà)兩個(gè)文本框，其名稱(chēng)分別為T(mén)ext1和Text2，初始內(nèi)容均為空白，編寫(xiě)適當(dāng)?shù)氖录�過(guò)程。 程序運(yùn)行后，在Text1中輸入一行英文字符串，如果單擊命令按鈕，則Text1文本框中的字母都變?yōu)樾��?xiě)，而Text2中的字母都變?yōu)榇髮?xiě)。 例如，在Text1中輸入Visual Basic Programming，則單擊命令按鈕后，結(jié)果如圖所示。

　　要求：

　　不得使用任何變量。

　　*注意：

　　存盤(pán)時(shí)必須存放在考生文件夾下，工程文件名為sjt2.vbp，窗體文件名為sjt2.frm。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，創(chuàng)建一個(gè)Form1窗體。

　　在該窗體上畫(huà)一個(gè)命令按鈕控件，通過(guò)其屬性窗口將名稱(chēng)設(shè)為C1，標(biāo)題(Caption屬性)設(shè)為“轉(zhuǎn)換”。畫(huà)二個(gè)文本框控件，通過(guò)其屬性窗口將名稱(chēng)分別設(shè)為T(mén)ext1、Text2，Text屬性均設(shè)為空。

　　單擊“轉(zhuǎn)換”按鈕(即運(yùn)行Click事件過(guò)程)，在該Click事件過(guò)程中加入語(yǔ)句：

　　Private Sub C1_Click()

　　Text1.Text = LCase(Text1.Text)

　　Text2.Text = UCase(Text1.Text)

　　End Sub

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

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