一、基本操作
在窗體上建立一個二級菜單,該菜單含有“文件”、“編輯”兩個主菜單項,名稱分別為File和Edit。其中“文件”菜單包括“打開”、“關(guān)閉”、“保存”三個子菜單項(名稱分別為Open、Close、Save)(如圖所示)。只建立菜單,不必定義其事件過程。
注意:
保存時必須存放在考生文件夾下,窗體文件名為djks001.frm,工程文件名為djks001.vbp。
程序運行時的窗體界面如圖所示。
答案及解析
1.建立工程
單擊考試界面上的“考試項目”選項,從彈出的菜單中選擇“啟動Visual Basic”選項。Visual Basic啟動后,在“新建工程”對話框中選擇“標準EXE”選項,單擊“打開”按鈕,新建一個工程文件。
2.添加窗體
隨著Visual Basic的啟動,工程會自動建立一個新的窗體。用戶可以選擇“工程”菜單中的“添加窗體”選項,在“添加窗體”對話框中選擇“窗體”選項后,單擊“打開”按鈕,即可添加窗體。用戶也可以使用Alt+P+F組合鍵直接訪問“添加窗體”對話框。
三、綜合應(yīng)用
在名稱為Form1的窗體上建立一個文本框(名稱為Text1,MultiLine屬性為True,ScrollBars屬性為2)和兩個命令按鈕(名稱分別為Command1和Command2,標題分別為“讀入數(shù)據(jù)”和“計算保存”),如圖所示。要求程序運行后,如果單擊“讀入數(shù)據(jù)”按鈕,則讀入in003.txt文件中的100個整數(shù),放入一個數(shù)組中(數(shù)組下界為1),同時在文本框中顯示出來;如果單擊“計算保存”按鈕,則計算數(shù)組中大于或等于400并且小于800的所有數(shù)之和,把求和結(jié)果在文本框Text1中顯示出來,同時把結(jié)果存入考生文件夾中的文件out003.txt中。補充窗體模塊中?處的程序。(在mode003.bas中的putdata過程可以把結(jié)果存入out003.txt文件)
注意:
文件必須存放在考生文件夾下,窗體文件名為djks003.frm,工程文件名為djks003.vbp,計算結(jié)果存入out003.txt,否則沒有成績。
程序運行的窗體界面如圖所示。
【答案】
打開考生文件夾下的djks003.vbp文件。單擊工具箱,在窗體上畫出文本框Text1與兩個控制按鈕,其中Text1的MultiLine屬性設(shè)置為True,ScrollBars屬性設(shè)置為2;按鈕分別命名為Command1和Command2,Caption屬性分別為“讀入數(shù)據(jù)”和“計算保存”。
雙擊Command1,在第一個?處填:input
雙擊Command2,在第二個?處填:i(j)>=400 And i(j)<800
然后運行程序。調(diào)試成功后,把結(jié)果保存到考生文件夾的in003.txt文件中。之后,以原來的文件名保存工程文件。
【解析】
其中文本框的MultiLine屬性確定文本框是否可以多行顯示,ScrollBars設(shè)置為2,可以生成一個垂直滾動條。程序代碼中的第一個?處需要使用Open語句讀入in003.txt中的數(shù)值,故本處填input,表示讀入數(shù)據(jù)。第二個?處判斷數(shù)組中大于或等于400并且小于800的所有數(shù),如果符合條件,則把該數(shù)以相加的方式賦給temp。故本處填:i(j)>=400 And i(j)<800。
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |