2007年9月計(jì)算機(jī)等級(jí)考試二級(jí)VB上機(jī)練習(xí)(1)

1．基本操作（2小題，每小題15分，共計(jì)30分）
注意：下面出現(xiàn)的"考生文件夾"均為c:\wexam\25160001。
請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visual Basic應(yīng)用程序（包括界面和代碼）。
（1）在窗體上建立一個(gè)二級(jí)菜單，該菜單含有"文件"和"幫助"（名稱分別為vbFile和vbHelp）兩個(gè)主菜單項(xiàng)，其中"文件"菜單包括"打開"、"關(guān)閉"和"退出"三個(gè)子菜單項(xiàng)（名稱分別為vbOpen、vbClose和vbExit），如圖1-1所示。只建立菜單，不必定義其事件過程。
注意：保存時(shí)必須存放在考生文件夾下，窗體文件名為sjt1.frm，工程文件名為sjt1.vbp。

圖 1-1

（2）在名為Form1的窗體上畫一個(gè)框架，名稱為Frm1，標(biāo)題為"框架"，高度為2500，寬度為4000，框架內(nèi)建立一文本框，距左邊框600，距框架的上邊框1200，文本框中的初始內(nèi)容設(shè)置為"文本框"。
注意：保存時(shí)必須存放在考生文件夾下，窗體文件名為sjt2.frm，工程文件名為sjt2.vbp。

 圖 1-2

2．簡(jiǎn)單應(yīng)用（2小題，每題20分，計(jì)40分）
注意：下面出現(xiàn)的"考生文件夾"均為c:\wexam\25160001。
（1）在考生文件夾中有工程文件sjt3.vbp及其窗體文件sjt3.frm，該程序是不完整的，請(qǐng)?jiān)谟�？�?hào)的地方填入正確內(nèi)容，然后刪除？及所有注釋符（即'號(hào)），但不能修改其他部分。存盤時(shí)不得改變文件名和文件夾。
本題描述如下：
在窗體上有一個(gè)列表框，名稱為L(zhǎng)ist1，一個(gè)文本框，名稱為Text1，和一個(gè)命令按鈕，名稱為 C1，標(biāo)題為"復(fù)制"。要求程序運(yùn)行后，在列表框中自動(dòng)建立4個(gè)列表項(xiàng)，分別為"Item1"、"Item2"、"Item3"、"Item4"如果選擇列表框中的一項(xiàng)，則單擊"復(fù)制"按鈕時(shí)，可以把該項(xiàng)復(fù)制到文本框中，如圖1-3所示。

 圖 1-3

（2）在考生文件夾中有工程文件sjt4.vbp及其窗體文件sjt4.frm ，該程序是不完整的，請(qǐng)?jiān)谟�？�?hào)的地方填入正確內(nèi)容，然后刪除？及所有注釋符（即'號(hào)）但不能修改其他部分。存盤時(shí)不得改變文件名和文件夾。
本題描述如下：
在窗體有3個(gè)復(fù)選框，名稱分別為Ch1、Ch2和Ch3，標(biāo)題分別為"體育"、"音樂"、"美術(shù)"，還有一個(gè)命令按鈕，名稱為C1，標(biāo)題為"顯示"。要求程序運(yùn)行后，如果選中某個(gè)復(fù)選框，當(dāng)單擊"顯示"命令按鈕時(shí)，則顯示相應(yīng)的信息。例如，如果選中"體育"和"美術(shù)"復(fù)選框，單擊"顯示"命令按鈕后，在窗體上顯示"我的愛好是體育美術(shù)"，如圖1-4所示。

 圖 1-4

3．綜合應(yīng)用（1小題，計(jì)30分）
在考生文件夾中有工程文件sjt5.vbp及其窗體文件sjt5.frm ，該程序是不完整的，請(qǐng)?jiān)谟�？�?hào)的地方填入正確內(nèi)容，然后刪除？及所有注釋符（即'號(hào)）但不能修改其他部分。存盤時(shí)不得改變文件名和文件夾。
本題描述如下：
在名稱為Form1的窗體上有兩個(gè)單選按鈕，名稱分別為Opt1和Opt2，標(biāo)題分別為"100-200之間素?cái)?shù)"和"200-400之間素?cái)?shù)"，一個(gè)文本框，名稱為Text1，和兩個(gè)命令按鈕，其名稱分別為Cmd1和Cmd2，標(biāo)題分別為"計(jì)算"和"存盤"，如圖1-5所示。程序運(yùn)行后，如果選中一個(gè)單選按鈕并單擊"計(jì)算"按鈕，則計(jì)算出該單選按鈕標(biāo)題所指明的所有素?cái)?shù)之和。并在文本框中顯示出來。如果單擊"存盤"按鈕，則把計(jì)算結(jié)果存入"out.txt"文件中，該文件必須放在考生文件夾中。（在考生文件夾中有標(biāo)準(zhǔn)模塊mode.bas，其中的putdata過程可以把結(jié)果存入指定的文件，而isprime函數(shù)可以判斷整數(shù)x是否為素?cái)?shù)，如果是素?cái)?shù)，則函數(shù)返回True，否則返回False，考生可以將該模塊文件添加到自己的工程中。）
注意：必須把200-400之間的素?cái)?shù)之和存入考生文件夾下的out.txt文件中，否則沒有成績(jī)。保存程序時(shí)必須存放在考生文件夾下，窗體文件名為sjt5.frm，工程文件名為sjt5.vbp。

 
圖 1-5