VB第一部分試驗參考指導書

試驗一VisualBasic集成開發(fā)環(huán)境和程序設(shè)計初步試驗?zāi)繕耍毫私釼isualBasic系統(tǒng)對計算機軟、硬件要求。掌握開啟和退出VisualBasic方法。了解VisualBasic集成環(huán)境組成，各部分作用。掌握建立、編輯和運行一個簡單VisualBasic應(yīng)用程序全過程。掌握常見控件（文本框、標簽、命令按鈕）應(yīng)用。感性認識控件（對象）、過程、事件、屬性等概念，初步認識窗體、控件、屬性、過程在程序設(shè)計中作用和關(guān)系。試驗內(nèi)容：建立一個“標準exe”類型應(yīng)用程序，要求單擊“確定”按鈕，在屏幕上顯示“您好，世界！”，單擊“退出”按鈕，退出應(yīng)用程序。界面圖1-1所表示，以sy1.frm、sy1.vbp和sy1.exe文件保留到自己軟盤上。圖1-1試驗準備：復習相關(guān)知識：1)VB集成化開發(fā)環(huán)境2)建立VB應(yīng)用程序2.正確寫出兩事件代碼，列出各控件所需屬性（屬性項目和屬性值）。試驗步驟：1.VisualBasic6.0漢字版開啟和退出。開啟：1）單擊“開始”按鈕，然后選擇“程序”中“MicrosoftVisualBasic6.0漢字版”，單擊即可。或：單擊桌面上“MicrosoftVisualBasic6.0漢字版”圖標，2）新建工程對話框，單擊打開“標準exe”按鈕，進入環(huán)境。退出：1)單擊集成環(huán)境窗口右上角關(guān)閉按鈕。2)單擊“文件”下拉菜單中“退出”選項。2.界面設(shè)計：（1）添加標簽Label1。（2）添加命令按鈕Command1。（3）添加命令按鈕Command2。（4）使用格式菜單，使用兩命令按鈕尺寸完全一樣，并恰好處于窗體中間位置。3.設(shè)置界面對象屬性：能夠經(jīng)過用鼠標右鍵單擊某一窗體或控件，在彈出菜單中為其設(shè)置屬性，也能夠隸屬性窗口對象列表框中選擇要設(shè)置屬性對象。1)設(shè)置Form窗體Caption屬性為“Hello,World!”2)設(shè)置Command1按鈕Caption屬性為“確定”，名稱屬性為“OK”.3)設(shè)置Command2按鈕Caption屬性為“退出”，名稱屬性為“Cancel”。4)設(shè)置Label1標簽Caption屬性為空，F(xiàn)ont屬性對話框中字體為隸書，字體式樣為粗體，大小為二號。4.編寫代碼：在Form（窗體）窗口中雙擊鼠標左鍵或單擊視圖菜單中代碼窗口菜單項，進入代碼窗口。用鼠標單擊第一個列表框右邊下拉箭頭，從彈出下拉列表框中選擇OK，然后在第二個列表框中選擇Click事件，這時代碼窗口出現(xiàn)了程序代碼過程頭和過程尾。1)在OK_Click事件中輸入下面代碼：Label1.Caption＝“您好，世界”2)在Cancel_Click事件中輸入下面代碼：UnloadMe5.保留文件：1)選擇文件菜單中工程另存為保留工程文件SY1.vbp2)選擇文件菜單中Form另存為保留窗體文件SY1.frm6.程序運行：1)在運行菜單中選擇開啟菜單項?；颍簡螕艄ぞ邫谥虚_啟按鈕。2)單擊確定按鈕。3)單擊退出按鈕。若程序不能正常運行，應(yīng)用運行菜單中結(jié)束菜單項，終止程序運行，然后檢驗屬性設(shè)置和程序代碼是否有誤，直到正常運行為止。程序正常運行后，應(yīng)再一次存盤保留工程文件。編譯應(yīng)用程序：選擇文件菜單中生成firstapp.exe菜單項，出現(xiàn)生成工程對話框輸入文件名SY.exe，單擊確定按鈕，生成應(yīng)用程序。試驗二次序程序設(shè)計試驗?zāi)繕耍赫莆毡硎臼剑x值語句正確書寫規(guī)則。掌握常見函數(shù)使用。掌握InputBox和MsgBox使用。試驗內(nèi)容：1.編一個華氏溫度和攝氏溫度之間轉(zhuǎn)換程序，運行界面圖2-1所表示。要使用轉(zhuǎn)換公式是：F=9C/5+32‘攝氏溫度轉(zhuǎn)化為華氏溫度，F(xiàn)為華氏C=（F-32）5/9‘華氏溫度轉(zhuǎn)化為攝氏溫度，C為攝氏要求用按鈕實現(xiàn)轉(zhuǎn)換。即單擊“華氏轉(zhuǎn)”按鈕，則將攝氏溫度轉(zhuǎn)化為華氏溫度。一樣，單擊“攝氏轉(zhuǎn)”按鈕，則將華氏溫度轉(zhuǎn)化為攝氏溫度。圖2-1[試驗?zāi)繕薦掌握簡單程序編寫、輸入數(shù)據(jù)方法、不一樣數(shù)據(jù)類型轉(zhuǎn)換。[提醒和分析]1）上述公式中右邊變量F、C應(yīng)該是有值，該值可經(jīng)過Text1、Text2分別賦值取得，然后經(jīng)過公式計算得到轉(zhuǎn)換結(jié)果。也能夠不使用變量F、C，直接使用Text1、Text2進行計算。2）Text文本框存放String類型，為了程序正常運行，應(yīng)經(jīng)過Val（）函數(shù)將字符串轉(zhuǎn)換為數(shù)值類型。3）本題關(guān)鍵是將文本框內(nèi)容怎樣代到轉(zhuǎn)換公式中。2．使用Move方法移動標簽，參見圖2-2所表示。3．使用Print方法，輸出圖2-3所表示圖形。圖2-24.輸入半徑，計算圓周長和圓面積。深入要求，為了確保程序運行正確，對輸入半徑要進行正當性檢驗，若發(fā)覺輸入數(shù)中有非法數(shù)字，利用MsgBox顯示犯錯信息，利用SetFocus方法定在犯錯文本框處，重新輸入。圖2-35.利用計算機處理古代數(shù)學問題“雞兔同籠問題”。即已知在同一籠子里有總數(shù)為m只雞和兔，雞和兔總腳數(shù)為n只，求雞和兔各有多少只？[試驗?zāi)繕薦掌握InputBox函數(shù)、MsgBox過程使用；利用計算機解初等數(shù)學題；為了確保有正確解，提前使用If語句。[提醒和分析]1）m，n經(jīng)過InputBox（）函數(shù)取得；雞、兔只數(shù)經(jīng)過已知m，n列出方程可解，但不要求出荒唐解（比如3.5只雞、4.5只兔，或求得只數(shù)為負數(shù)），若出現(xiàn)荒唐解，要求顯示相關(guān)信息，并重新輸入。2）設(shè)x為雞只數(shù)，y為兔子只數(shù)；已知總頭數(shù)m和腳數(shù)n，則x+y=m2x+4y=n得y=n/2–mx=m–y從公式推得：當總腳數(shù)是偶數(shù)而且腳數(shù)在二至四倍頭數(shù)之間（2m<n<4m）時，才可有正確解。判定一個數(shù)是否是偶數(shù)，只要經(jīng)過判定Mod2是否為0即可。二條件在程序中表示為：nmod2=0和n>2*mandn<4*m.3)算例：頭數(shù)取1、1、2、20時腳數(shù)對應(yīng)取4、2、6、100試驗三選擇結(jié)構(gòu)程序設(shè)計試驗?zāi)繕耍赫莆者壿嫳硎臼秸_書寫形式。掌握單分支和雙分支條件語句使用。掌握多分支條件語句使用。掌握情況語句使用及和多分支語句區(qū)分。試驗內(nèi)容：1.在購置某物品時，若所花錢x在下述范圍內(nèi)，所付錢y按對應(yīng)折扣支付：xx<10000.9x1000≤x<y=0.8x≤x<30000.7xx≥3000[提醒和分析]1）此例用多分支if語句實現(xiàn)，注意計算公式和條件表示式正確書寫。2）多個條件，可有兩種表示，方法一：從小到大或從大到小依次一一表示；方法二：不管次序，將條件區(qū)間列出。2.某市公用電話收費標準以下：通話時間在3分鐘以下，收費0.50元；3分鐘以上，則每超出1分鐘加收0.15元；在7：00—19：00之間通話者，按上述收費標準全價收費；在其它時間通話者，一律按收費標準半價收費。試計算某人在T時間通話S分鐘，應(yīng)繳多少電話費。運行界面圖3-1所表示。圖3-1[試驗?zāi)繕薦1）利用前面學過選擇結(jié)構(gòu)，學會用計算機處理時間問題能力。2）時間函數(shù)、子字符串函數(shù)、格式函數(shù)綜合使用。[提醒]1）時間能夠經(jīng)過文本框輸入；也能夠經(jīng)過Time時間函數(shù)求適當初通話時間。但要經(jīng)過Cdate函數(shù)將字符串類型轉(zhuǎn)換成日期類型，為（2）中計算通話時間做準備。比如：date1=CDate(Text1.Text):date2=CDate(Text2.Text)2）通話時間能夠經(jīng)過DateDiff（）函數(shù)將兩個時間以秒為間隔形式相減。也能夠利用Hour、Minute和Second分別取小時、分和秒，然后化成以秒為單位再相減。比如：st=DateDiff("s",date1,date2)/603）為了簡化程序，以開始通話時間為是否享受半價收費記費方法。試驗四循環(huán)結(jié)構(gòu)程序設(shè)計試驗?zāi)繕耍赫莆誇or語句使用。掌握Do語句多種形式使用。掌握怎樣控制循環(huán)條件，預(yù)防死循環(huán)或不循環(huán)。試驗內(nèi)容：編一個程序，顯示出全部水仙花數(shù)。所謂水仙花數(shù)，是指一個3位數(shù)，其各位數(shù)字立方和等于該數(shù)字本身。比如，153是水仙花數(shù)，因為153=13+53+33。[提醒和分析]解該題方法有兩種：1）利用三重循環(huán)，將三個數(shù)連接成一個3位數(shù)進行判定。比如，將1—9連接成一個位數(shù)，程序段以下：s=0Fori=1To9s=s*10+iNextI2）利用單循環(huán)將一個3位數(shù)逐位分離后進行判定。比如，將一個9位數(shù)，從右邊開始逐位分離，程序段以下：s=DoWhiles>0s1=sMod10s=s\10Prints1;‘從右邊開始顯示分離出每一位Loop遞推法：猴子吃桃子。猴子在一天摘了若干個桃子，當日吃掉二分之一多一個；第二天接著吃剩下桃子二分之一多一個；以后天天全部吃尚存桃子二分之一另一個，到第七天早上要吃時只剩下一個了，問猴子那天共摘了多少個桃子？[分析]這是一個“遞推”問題，先從最終一天推出倒數(shù)第二天桃子，再從倒數(shù)第二天桃子推出倒數(shù)第三天桃子……設(shè)第n天桃子為Xn,那么它是前一天桃子數(shù)Xn-1二分之一減一。即：Xn=0.5Xn-1–1也就是：Xn-1=（Xn+1）×2已知：當n=7第7天桃子數(shù)為1，則第6天桃子數(shù)由公式得4個，依次類推，可求得第一天桃子數(shù)。有一根長度為321m鋼材料，要將它截取成兩種規(guī)格短料，規(guī)格a、b長度分別為17m和27m，每種最少1段，分割成a、b各多少段后，剩下殘料r最少？[分析]該題利用二重循環(huán)求殘料r最小值正數(shù)，因為殘料不可能是負數(shù)，不然和實際情況不符。試驗五數(shù)據(jù)結(jié)構(gòu)---數(shù)組試驗?zāi)繕苏莆諗?shù)組申明、數(shù)組元素引用。掌握靜態(tài)數(shù)組和動態(tài)數(shù)組使用差異。應(yīng)用數(shù)組處理和數(shù)組相關(guān)常見算法。試驗內(nèi)容1.輸入一串字符，統(tǒng)計各字母出現(xiàn)次數(shù)（大小寫字母不區(qū)分），并對出現(xiàn)字母顯示其出現(xiàn)個數(shù)，效果圖5-1所表示。圖5-1[分析]1)統(tǒng)計26個字母出現(xiàn)個數(shù)，必需申明一個含有26個元素數(shù)組，每個元素下標表示對應(yīng)字母，元素值表示對應(yīng)字母出現(xiàn)次數(shù)。2)從輸入字符串中逐一取出字符，轉(zhuǎn)換成大寫字符（使得大小寫不區(qū)分），進行判定。比如：c=UCase(Mid(Text1,I,1))2.要求輸入若干同學成績，計算平均分和高于平均分人數(shù)，并將這兩項放在該數(shù)組最終。參見圖5-2所表示。圖5-2試驗六常見控件試驗?zāi)繕耍赫莆粘Ｒ娍丶P(guān)鍵屬性、事件和方法。掌握常見ActiveX控件特征，熟練應(yīng)用這些高級控件進行編程。初步掌握創(chuàng)建基于圖形用戶界面應(yīng)用程序過程。熟練掌握鍵盤事件、鼠標事件及其事件過程編寫技藝。掌握一般拖放和OLE拖放原理，掌握實現(xiàn)拖放方法。試驗內(nèi)容：1.編寫一個運行界面圖6-1所表示程序。用戶能從“飯店菜單”把選定“菜”添加到下面列表框中。要求：“飯店菜單”列表框支持多項選擇[提醒]圖6-1假定“飯店菜單”和“我點菜”列表框名稱分別為List1和List2。因為需要在List1中能夠進行多項選擇，所以MultiSelect屬性應(yīng)設(shè)為1或2，而且在“添加”事件過程中不能簡單地用List2.AddItemList1.Text語句添加項目。應(yīng)編寫以下程序：SubCommand1_Click()Fori=0ToList1.ListCount-1IfList1.Selected(i)ThenList2.AddltemList1.List(i)EndIfNextEndSub2.設(shè)計一個運行界面圖6-2所表示字幕滾動程序。要求用時鐘控件和滾動條調(diào)整和控制字幕滾動速度，文字大小及距離窗體頂端距離是隨機，從右向左連續(xù)滾動。[試驗?zāi)繕薦圖6-2掌握滾動條、時鐘使用原理。[提醒和分析]1）FontSize屬性不能為0，所以用Int(1+Rnd*30)產(chǎn)生一個1—30數(shù)作為字體2）字幕“WindowsXP漢字世界……”是標簽（Label1）標題，用Move方法實現(xiàn)滾動，經(jīng)過改變移動步長控制移動速度。每次移動高度是隨機，用Int(Rnd*ScaleHeight)表示式?jīng)Q定；字體大小也是隨機，由Int(1+Rnd*30)決定。3.編寫一個運行界面圖6-3所表示點菜程序。用戶能從“飲料”和“主食”列表框中選擇食品，然后拖動到“我中飯”列表框中。要求；用拖動方法實現(xiàn)。圖6-3[提醒和分析]1）當源對象被拖動時，源對象作為Source參數(shù)傳入事件過程中，Source代表源對象，經(jīng)過Source.Name屬性能夠確定被拖動是哪個列表框。在目標列表框DragDrop事件過程中，將源列表框中選定項目添加到目標列表框中，然后刪除。2）“飲料”和“主食”列表框只能用Drag方法手工開啟拖操作，不能使用自動拖放模式。因為假如設(shè)置自動拖放模式，拖動對象是整個列表框，無法選定其中項目。在“我中飯”列表框DragDrop過程中經(jīng)過Source參數(shù)可能知道源控件是哪一個列表框，Source.Name屬性指示源控件名稱。試驗七界面設(shè)計試驗?zāi)繕耍簩W會使用對話框進行編程。掌握窗口菜單、彈出式菜單和實時菜單設(shè)計方法。掌握工具欄、圖象列表框控件使用。掌握狀態(tài)欄控件使用。掌握RichTextBox控件使用。綜合應(yīng)用所學知識，編制含有可視化界面應(yīng)用程序。試驗內(nèi)容：1.設(shè)計一個運行界面圖7-1所表示應(yīng)用程序。當選擇“改變標簽標題顏色”按紐后，彈出顏色對話框，為標簽標題選擇一個顏色；當選擇“編輯文本文件”按鈕后，彈出打開文件對話框，選擇一個文本文件后調(diào)用記事本程序編輯該文件。圖7-1[試驗?zāi)繕薦掌握通用對話框使用方法和使用Shell函數(shù)運行程序方法[提醒和分析]1）盡管程序中用到了顏色和打開文件兩個對話框，不過實際上只需一個通用對話框控件CommonDialog。2）能夠使用Shell函數(shù)運行記事本程序。注意在記事本程序名和所選一個文件名之間要有一個空格符。3）需要經(jīng)過“工程1部件”命令選擇MicrosoftCommonDialogControl6.0選項，將CommonDialog控件添加到工具箱。4）要使通用對話框能彈出顏色對話框，使用ShowColor方法，比如：CommonDialog1.ShowColor.顏色對話框經(jīng)過Color屬性返回所選擇顏色，將其值給予標簽ForeColor屬性即可改變標簽前景顏色。比如：Label1.ForeColor=CommonDialog1.ShowColor5）對于同一通用對話框，要使其能顯示成文件打開對話框形式，可在另一事件中使用ShowOpen方法。通用對話框FileName屬性提供所選擇文件名，將記事本程序名（包含目錄路徑名）和所選擇文件名組成一個字符串，作為Shell函數(shù)參數(shù)即可經(jīng)過記事本程序打開所選擇文件。在結(jié)構(gòu)字符串時記事本程序名notepad.exe和所選擇一個文本文件名之間必需要有一個空格符。比如：i=Shell(“C:\Winnt\notepad.exe”&CommonDialog1.FileName,1)2.在窗體上放置一個文本框，設(shè)置它Multiline屬性為True.設(shè)計一個含有2個主菜單項菜單系統(tǒng)，分別為“菜單1”和“菜單2”。其中，“菜單1”包含“清除”、“結(jié)束”兩個菜單命令?！安藛?”包含“12號字體”、“16號字體”、“粗體”、“斜體”4個菜單命令，圖7-2和圖7-3所表示。為菜單項編寫相關(guān)程序代碼：圖7-2圖7-3“清除”命令：清除文本框中所顯示內(nèi)容?！?2號字體”或“16號字體”命令：把文本框漢字本字體大小設(shè)置為12或6磅?！按煮w”或“斜體”命令：在菜單項左邊加上或取消標識“√”，控制文本框中文本字型改變。窗體上“菜單2”顯示是否和文本框中有元內(nèi)容相關(guān)，當清除文本框中內(nèi)容時，隱藏“菜單2”，當文本框中輸入信息后，顯示“菜單2”。另外可經(jīng)過鼠標右鍵彈出“菜單2”。[試驗?zāi)繕薦掌握窗體菜單制作；掌握在程序中改變窗體菜單屬性方法；掌握動態(tài)改變菜單項方法和掌握彈出菜單制作和顯示方法。[提醒和分析]1）在菜單項左邊加上或取消標識“√”可使用代碼：菜單項名.Checked=Not菜單項名.Checked2)文本框內(nèi)文本粗體字控制可使用代碼：Text1.FontBold=菜單項名.Checked或Text1.FontBold=NotText1.FontBold斜體字控制可類似地使用FontItalic屬性。3)利用菜單2Visible屬性控制菜單顯示和隱藏。在文本框Chang事件進行設(shè)置。4）建立一個有菜單功效文本編輯器大致可分成以下三個步驟.步驟一:建立控件本例中只要在窗體上放置一個文本框(設(shè)置滾動、多行屬性)和一個通用對話框.步驟二:設(shè)計菜單打開菜單編輯器,按要求對每一個菜單項輸入標題、名稱和選擇對應(yīng)快捷鍵.步驟三:對菜單建立好以后,對對應(yīng)Click事件編程.5）在程序中改變菜單項Checked、Enabled屬性常見方法；菜單項名.Checked=Not菜單項名.Checked菜單項名.Enabled=Not菜單項名.Enabled6）動態(tài)改變菜單項最簡便方法是改變菜單項Visible屬性.當Text1內(nèi)容發(fā)生改變時觸發(fā)Text1_Change事件。7)彈出菜單制作和一般菜單相同，程序運行時使用Popupmenu方法顯示彈出菜單。3.在試驗2“菜單1”子菜單“清除”前添加一個“查找”菜單命令。并和“清除”菜單命令之間有一條分隔線，單擊“查找”菜單命令，顯示圖7-4所表示查找對話框，當在文本框內(nèi)輸入內(nèi)容時，可在主窗體文本框內(nèi)查找指定內(nèi)容。圖7-4[試驗?zāi)繕薦掌握窗體菜單編輯修改；掌握創(chuàng)建自定義對話框方法；掌握多沖窗體使用，窗體間數(shù)據(jù)傳輸方法。[提醒和分析]1）創(chuàng)建自定義對話框能夠從新窗體著手，通常來說，用戶通常不需要對它進行移動、改變尺寸、最大化或最小化等操作。經(jīng)過設(shè)置BorderStyle、ControlBox、MaxButton和MinButton屬性，可使對話框大小固定，刪除窗體“控件”菜單框、“最大化”按鈕和“最小化”按鈕這些項目。2）窗體之間數(shù)據(jù)傳輸可經(jīng)過在類模塊文件中申明全局變量完成，也能夠直接使用控件。若使用控件前加窗體名前綴。本例經(jīng)過控件傳輸數(shù)據(jù)。3）使用InStr函數(shù)能夠判定字符串1是否包含字符串2內(nèi)容，及所在位置。經(jīng)過文本框SelLength屬性可用負像顯示查到字符。為了能查找出多個相同字符，在InStr函數(shù)中使用參數(shù)指示查找起始位置。因為該參數(shù)受到上次搜索影響，需要將其申明為靜態(tài)類型變量。4.在試驗3基礎(chǔ)上按菜單功效添加工具欄，在窗體下方加入有2個窗格狀態(tài)欄，第1個窗格在按下Shift、Ctrl和Alt鍵時顯示對應(yīng)鍵名，第２個窗格顯示時鐘。[試驗?zāi)繕薦掌握窗體菜單工具攔制作；掌握響應(yīng)ToolBar控件事件方法；掌握狀態(tài)欄制作和程序運行時控件方法。［提醒和分析]1）建立窗體工具欄和狀態(tài)欄，必需要經(jīng)過MicrosoftWindowsCommonControls6.0選項將控件添加到工具箱。在建立窗體工具欄和狀態(tài)欄，必需要經(jīng)過MicrosoftWindowsCommonControl6.0選項將控件添加到工具欄。在ImageList控鍵圖象，建立ToolBar控件和IMageList控件連接，在ToolBar控件中添加按鈕。2）“菜單1”所提供功效各自獨立，按鈕樣式采取一般按鈕?！安藛?”中字號大小設(shè)置只許可選擇其中一項，故按鈕樣式需采取編組按鈕或菜單按鈕。本例采取菜單按鈕設(shè)置字號。字體形式在選擇后能保持按鈕按下狀態(tài)，可采取開關(guān)按鈕樣式。為便于編程，對每個按鈕設(shè)置標識名。3）對菜單按鈕在Toolbar_ButtonMenuClick事件使用“SelectCaseButtonMenu.Key”調(diào)用對應(yīng)菜單事件過程，響應(yīng)所做選擇。其它類型按鈕在Toolbar1_ButtonClick事件中使用“SelectCaseButton.Key”語句響應(yīng)所做選擇。4）使用KeyDown或KeyUp事件判定對鍵盤操作。KeyDown事件提供keycode和shift兩個參數(shù),keycode參數(shù)為所按鍵鍵代碼，shift參數(shù)是響應(yīng)Shift鍵、Ctrl鍵和Alt鍵狀態(tài)一個整數(shù)，分別對應(yīng)于值1、2和4。當這些鍵組合在一起時，shift返回它們組合值。比如，同時按下Ctrl和Alt這兩個鍵，則shift值為6。5）StatusBar控件是由Panels集合組成。能夠把Panels集合看做數(shù)組，每個窗格Panels對象是Panels一個元素。能夠經(jīng)過Text、Picture和Width屬性改變?nèi)魏蜳anels對象文本、圖象或?qū)挾?。要在窗格?nèi)顯示所按鍵名，使用StatusBar1.Panels(1).Text屬性。試驗八文件試驗?zāi)繕耍何募到y(tǒng)控件使用。文件和目錄操作語句和函數(shù)使用。掌握次序文件、隨機文件及二進制文件特點和使用。掌握文件打開、關(guān)閉和讀寫操作。學會文件在應(yīng)用程序使用。試驗內(nèi)容：１.建立一個文本瀏覽器。窗體上放置驅(qū)動器列表框、目錄框、文件列表框和兩個文本框，圖8-1所表示。要求：(1)文件列表框能過濾文本文件。(2)當單擊某文本文件名后，在Text1顯示文件名（包含路徑），在Text2顯示該文件內(nèi)容；(3)當雙擊某文件名后，調(diào)用記事本程序?qū)ξ谋疚募M行編輯。圖8-1[試驗?zāi)繕薦掌握文件系統(tǒng)控件使用、文本文件內(nèi)容讀取和顯示、應(yīng)用程序調(diào)用和對應(yīng)文檔讀取。［提醒和分析］1）第（２）小題利用次序文件讀寫語句，將磁盤上文件讀入，并在文本框顯示。2）第（３）小題調(diào)用Shell函數(shù)，實施記事本可實施程序，并帶有文本文件為參數(shù)。3）文件系統(tǒng)控件關(guān)聯(lián)只要兩個事件；文本文件通常經(jīng)過LineInput語句讀取較安全、方便，但顯示時要加入回車、換行符；應(yīng)用程序調(diào)用利用Shell函數(shù)，同時要將對應(yīng)文檔打開，二者之間必需加空格。２.建立一個含有３個學生三項內(nèi)容文本文件，內(nèi)容中分別為姓名、專業(yè)、年紀，前二項字符串，后一項整形。單擊“建立”按鈕，分別利用：Print#文件號，［輸出列表］Write#文件號，［輸出列表］兩種格式同時建立兩個文件，文件名分別為c:\t1。txt和c:\t2.。txt（打開兩個文件，以不一樣文件號區(qū)分）。單擊“顯示”按鈕，從磁盤以行讀方法分別讀人剛建立兩個文件，并分別在兩個文本框顯示，比較之間區(qū)分。運行結(jié)果圖8-2所表示。[試驗?zāi)繕薦圖8-2掌握次序文件建立，讀取，Print、Write語句使用和區(qū)分。３．Print方法和Print語句比較。在窗體上顯示圖8-3所表示圖形，并將該圖形同時以文本文件A:\Tu.Txt寫到磁盤上，經(jīng)過文本編輯器顯示建立文件。[試驗?zāi)繕薦掌握Print方法和Print語句使用和區(qū)分，掌握有規(guī)律字母生成。[分析]圖8-3該題較簡單，Print方法在循環(huán)控制結(jié)構(gòu)中已介紹，作用結(jié)果顯示在窗體或圖形框上；Print語句處理相同，僅輸出到磁盤上。試驗九圖形技術(shù)試驗?zāi)繕耍海?、了解VisuslBasic圖形功效。２、掌握建立圖形坐標系方法。３、掌握VisuslBasic圖形控件和圖形方法。４、掌握常見幾何圖形繪制。５、掌握簡單動畫設(shè)計方法。６、掌握實現(xiàn)圖形漫游方法。試驗內(nèi)容：１.繪制圖9-1所表示圖形（不包含尺寸）。圖9-1２.在Form1建立一個坐標系。Ｘ軸正向向右，Ｙ軸正向向上，原點在窗體中央。在坐標系上用Line方法繪制-２π—２π之間正弦曲線，圖9-2所表示。圖9-2[試驗?zāi)繕薦掌握坐標系定義方法；掌握使用Line方法繪制圖形；了解CurrentX、CurrentY屬性功效。［提醒和分析]坐標系定義可Scale方法。因為要求坐標系原點在窗體中央，而要繪制正弦曲線在（-２π,2π）之間，考慮到四面空隙，故X軸范圍可定義在（-8，8），Y軸范圍可定義在（-2，2）之間?？刹扇cale（-8，2）-（8，-2）定義坐標系。坐標軸用Line方法畫出。X軸上坐標刻度線兩端點坐標滿足（i,0）-(i,y0)。其中y0為一定值?？捎醚h(huán)語句，改變i值來標識X軸上坐標刻度。類似地可處理Y軸上標識坐標刻度。坐標軸上刻度線數(shù)字標識，可經(jīng)過CurrentX、CurrentY屬性設(shè)定目前位置，然后用Print輸出對應(yīng)數(shù)字。標識數(shù)字可結(jié)合在分析（3）循環(huán)上一起完成。正弦曲線可用Line方法或Pest方法畫出，為使曲線光滑，相鄰兩點間距應(yīng)合適小。本題用Line方法繪制正弦曲線，相鄰兩個x點間距取0.01。3.設(shè)計一個圖9-3所表示指針式時鐘。[試驗?zāi)繕薦掌握簡單動畫設(shè)計方法。圖9-3［提醒］VisuslBasic坐標系中，采取逆時針繪圓，而時鐘指針移動按順時針方向，故指針和坐標軸夾角α必需乘以-１。另外，時鐘指針和參考點夾角需調(diào)整π／２。鐘指針經(jīng)過圓心，故指針另一端點和原點連線和坐標軸夾角還需調(diào)整π。ss=Second(Time)為目前秒數(shù)，秒針要指在對應(yīng)刻度線上，則α=-(ss×2π/60)+π/2，設(shè)mm=Minute(Time)為目前分數(shù)，分針和坐標軸夾角α=-(mm×2π/60)+π/2，hh=Hour(Time)為目前時數(shù)，時針和坐標軸夾角α=-(hh×2π/12+mm×π/360)+π/2.鐘指針兩端點坐標：x1=R1cosα,y1=R1sinα;x2=R2cos(α+π),y2=R2sin(α+π)針移動由時鐘控件Timer事件觸發(fā)。試驗十程序調(diào)試和錯誤處理試驗?zāi)繕耍海?、掌握VB中常見程序調(diào)試方法和工具。２、熟悉VB中程序調(diào)試環(huán)境。3、掌握VB中常見程序錯誤捕捉和處理。試驗步驟：按下面步驟建立這個程序：運行VisualBasic6.0并建立標準工程。單擊工具欄中Label控件，在Form1窗體上繪制一個標簽，并將其Caption屬性設(shè)為“請輸入（0—20）之間整數(shù)”。單擊工具欄中Text控件，并在Form1窗體上繪制一個文本框，然后將其Text屬性設(shè)置為空。單擊工具欄中CommandButton控件，并放置在窗體中，將其Caption屬性設(shè)為“計算階乘”。最終再放置兩個標簽到窗體Form1中，屬性采取缺省值。圖11-1顯示了設(shè)計好界面。在這個程序中需要處理事件過程只有Command1_Click。在該過程中，需要進行參數(shù)檢驗和階乘計算。這里編寫了兩個程序段來完成這兩個功效。1）檢驗參數(shù)程序段用來檢驗用戶輸入?yún)?shù)。返回值是檢驗過正當參數(shù)。2）利用循環(huán)計算一個數(shù)階乘值。它返回計算結(jié)果。圖11-1程序代碼以下：‘將用戶輸入轉(zhuǎn)化為數(shù)值參數(shù)DimnAsInteger,JieChengAsIntegern=Val(Text1.Text)‘檢驗用戶輸入是否有效‘假如輸入錯誤，則提醒用戶重新輸入‘輸入正確，就把檢驗過參數(shù)作為結(jié)果返回Ifn>20Andn<0ThenLabel2.Caption=“輸入錯誤!請重新輸入!”‘清除標簽上以前顯示結(jié)果Label3.Caption=“”ElseLabel2.Caption=“結(jié)果是:”Label3.Caption=""‘清除標簽上以前顯示結(jié)果Ifn=0orn=1ThenJieCheng=1Else‘不然,循環(huán)求解JieCheng=1‘變量付初值Fori=1TonJieheng=JieCheng*iNextiEndIfLabel3.Caption=JieChengEndIf到此,完成了這個程序編寫.下面測試程序運行.(1)按F5鍵運行程序,并在文本框中輸入0,單擊[計算階乘]按鈕,得到圖11-2所表示結(jié)果.這個結(jié)果示正確.圖11-2圖11-3(2)測試計算-1階乘,正常情況下程序應(yīng)顯示輸入錯誤等提醒.在文本框中輸入”-1”,單擊[計算階乘]按鈕,這時看到圖11-3所表示結(jié)果.顯然這個結(jié)果和預(yù)期不符,是錯誤.下面就來查找該錯誤.因為輸入無效參數(shù)-1時程序并沒有顯示犯錯提醒,所以推測在檢驗參數(shù)代碼中出現(xiàn)了問題.(3)打開代碼窗口,在檢驗參數(shù)處設(shè)置斷點,方便程序在檢驗參數(shù)之前中止運行,這么能夠查看程序狀態(tài)和中間結(jié)果.加入斷點操作可按下面步驟進行:1）.在代碼窗口中，把光標移動到要加斷點一行.（Ifn>20Andn<0Then）2）打開調(diào)試菜單，單擊[切換斷點]菜單項或按F9鍵,這時所選語句出現(xiàn)一條紅色亮條,標志所設(shè)斷點處.圖11-4顯示了加入斷點處情況.圖11-4圖11-53）假如要去除斷點,能夠打開[調(diào)試]菜單,單擊[切換斷點]菜單或按F9鍵,也能夠打開[調(diào)試]菜單,單擊[清除全部斷點]菜單項以清除全部斷點(4)按F5鍵運行程序.在文本框中輸入“-1”,單擊[計算階乘]按鈕,這時程序在斷點處中止,圖11-5所表示.(5)在實施到if語句處時,打開[視圖]菜單,單擊[立即窗口]菜單項,這時桌面上出現(xiàn)了[立即]窗口.在[立即]窗口中輸入“?n”,觀察程序接收到參數(shù)植.圖11-6顯示了[立即]窗口使用效果.[立即]窗口中顯示n值為-1,說明程序接收到參數(shù)是正確,錯誤可能在后面.下面單步實施,以跟蹤檢驗參數(shù)這部分代碼運行.圖11-6