1.基本操作(2小題,每小題15分,共計30分)
注意:下面出現(xiàn)的"考生文件夾"均為c:\wexam\25160001。
請根據(jù)以下各小題的要求設(shè)計Visual Basic應(yīng)用程序(包括界面和代碼)。
(1)在窗體上建立一個二級菜單,該菜單含有"文件"和"幫助"(名稱分別為vbFile和vbHelp)兩個主菜單項,其中"文件"菜單包括"打開"、"關(guān)閉"和"退出"三個子菜單項(名稱分別為vbOpen、vbClose和vbExit),如圖1-1所示。只建立菜單,不必定義其事件過程。
注意:保存時必須存放在考生文件夾下,窗體文件名為sjt1.frm,工程文件名為sjt1.vbp。
圖 1-1
(2)在名為Form1的窗體上畫一個框架,名稱為Frm1,標(biāo)題為"框架",高度為2500,寬度為4000,框架內(nèi)建立一文本框,距左邊框600,距框架的上邊框1200,文本框中的初始內(nèi)容設(shè)置為"文本框"。
注意:保存時必須存放在考生文件夾下,窗體文件名為sjt2.frm,工程文件名為sjt2.vbp。
圖 1-2
2.簡單應(yīng)用(2小題,每題20分,計40分)
注意:下面出現(xiàn)的"考生文件夾"均為c:\wexam\25160001。
(1)在考生文件夾中有工程文件sjt3.vbp及其窗體文件sjt3.frm,該程序是不完整的,請在有?號的地方填入正確內(nèi)容,然后刪除?及所有注釋符(即'號),但不能修改其他部分。存盤時不得改變文件名和文件夾。
本題描述如下:
在窗體上有一個列表框,名稱為List1,一個文本框,名稱為Text1,和一個命令按鈕,名稱為 C1,標(biāo)題為"復(fù)制"。要求程序運行后,在列表框中自動建立4個列表項,分別為"Item1"、"Item2"、"Item3"、"Item4"如果選擇列表框中的一項,則單擊"復(fù)制"按鈕時,可以把該項復(fù)制到文本框中,如圖1-3所示。
圖 1-3
(2)在考生文件夾中有工程文件sjt4.vbp及其窗體文件sjt4.frm ,該程序是不完整的,請在有?號的地方填入正確內(nèi)容,然后刪除?及所有注釋符(即'號)但不能修改其他部分。存盤時不得改變文件名和文件夾。
本題描述如下:
在窗體有3個復(fù)選框,名稱分別為Ch1、Ch2和Ch3,標(biāo)題分別為"體育"、"音樂"、"美術(shù)",還有一個命令按鈕,名稱為C1,標(biāo)題為"顯示"。要求程序運行后,如果選中某個復(fù)選框,當(dāng)單擊"顯示"命令按鈕時,則顯示相應(yīng)的信息。例如,如果選中"體育"和"美術(shù)"復(fù)選框,單擊"顯示"命令按鈕后,在窗體上顯示"我的愛好是體育美術(shù)",如圖1-4所示。
圖 1-4
3.綜合應(yīng)用(1小題,計30分)
在考生文件夾中有工程文件sjt5.vbp及其窗體文件sjt5.frm ,該程序是不完整的,請在有?號的地方填入正確內(nèi)容,然后刪除?及所有注釋符(即'號)但不能修改其他部分。存盤時不得改變文件名和文件夾。
本題描述如下:
在名稱為Form1的窗體上有兩個單選按鈕,名稱分別為Opt1和Opt2,標(biāo)題分別為"100-200之間素數(shù)"和"200-400之間素數(shù)",一個文本框,名稱為Text1,和兩個命令按鈕,其名稱分別為Cmd1和Cmd2,標(biāo)題分別為"計算"和"存盤",如圖1-5所示。程序運行后,如果選中一個單選按鈕并單擊"計算"按鈕,則計算出該單選按鈕標(biāo)題所指明的所有素數(shù)之和。并在文本框中顯示出來。如果單擊"存盤"按鈕,則把計算結(jié)果存入"out.txt"文件中,該文件必須放在考生文件夾中。(在考生文件夾中有標(biāo)準(zhǔn)模塊mode.bas,其中的putdata過程可以把結(jié)果存入指定的文件,而isprime函數(shù)可以判斷整數(shù)x是否為素數(shù),如果是素數(shù),則函數(shù)返回True,否則返回False,考生可以將該模塊文件添加到自己的工程中。)
注意:必須把200-400之間的素數(shù)之和存入考生文件夾下的out.txt文件中,否則沒有成績。保存程序時必須存放在考生文件夾下,窗體文件名為sjt5.frm,工程文件名為sjt5.vbp。
圖 1-5
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |