清華大學VB經典教案第七節(jié)-過程

第7章過程7.1過程的概念及其形式過程是完成某一特定功能的一段程序，又稱子程序。結構化程序設計的核心思想就是將一個復雜的問題不斷細分成多個結構簡單、功能單一的模塊，每個模塊只完成一個相對獨立的功能，多個模塊組合起來完成復雜的功能，在VisualBasic中，將這種程序模塊稱為過程，一個大的應用程序可以包含多個過程。過程的應用大大提高了代碼的可重用性，簡化了編程，使程序更具有可讀性。過程與過程之間有調用與被調用的關系，一個過程可以調用其他的過程，也可以被其他的過程調用，當一個過程調用其他的過程時，被調用過程執(zhí)行完畢后，返回調用過程的下一條語句繼續(xù)執(zhí)行，如圖7-1所示。在VisualBasic中，過程可以分為兩大類：Sub過程（子過程）和Function過程（函數(shù)過程）。Sub過程和Function過程最基本的區(qū)別是：Sub過程可以沒有返回值，也可以有一個或多個返回值，即Sub過程可以有0～多個返回值；Function過程只有一個返回值。7.2Sub過程Sub過程可以分為：事件過程和通用過程兩類。7.2.1事件過程事件過程指的是當對象的某個事件被觸發(fā)時，去執(zhí)行對應這個事件的一段程序，事件過程是VisualBasic應用程序的主體。1．事件過程名事件過程依附于窗體或控件，依附于窗體的事件過程名由Form、短下劃線“_”和事件名三個部分組成；依附于控件的事件過程名由控件名（控件的Name屬性值）、短下劃線“_”和事件名三個部分組成。2．事件過程的格式依附于窗體或控件的事件過程的一般格式如下：

PrivateSubForm|控件名_事件名([<形參表>]) <語句組> EndSub注意：（1）事件過程的開始和結束語句，最好由系統(tǒng)用事件過程模板自動生成；（2）由于控件的事件過程名與控件名緊密相關，因此，如果生成了事件過程以后，再改變控件名，則控件的事件過程名中的控件名不會自動更改。7.2.2通用過程及其定義通用過程又稱為用戶自定義的Sub過程，一般用于完成一個通用功能，通用過程不依賴于任何對象。通用過程的定義格式如下：

[Private|Public|Static]Sub<通用過程名>([<形參表>]) <語句組> [ExitSub] <語句組> EndSub說明：（1）Sub前的關鍵字Private、Public決定了通用過程的作用域；Static決定了過程中過程級變量的生存期（所有的過程級變量都是靜態(tài)變量，前面章節(jié)已經介紹）；（2）通用過程名應滿足標識符的命名規(guī)則，而且，在同一個模塊中過程名要惟一；（3）當通用過程有多個形式參數(shù)時，相互之間用逗號分隔；（4）在通用過程中不能再定義過程，但可以調用其他的過程。創(chuàng)建通用過程的方法有如下兩種：（1）直接在代碼窗口中輸入，只要輸入通用過程的開始，按下回車鍵后，通用過程的結束語句EndSub會自動產生；（2）執(zhí)行“工具”菜單下的“添加過程”命令，打開“添加過程”對話框，如圖7-2所示，輸入名稱，選擇“類型”和“范圍”，單擊“確定”按鈕即可。

7.2.3Sub過程的調用調用Sub過程的方法有兩種： （1）Call<過程名>([實參表]) （2）<過程名>[實參表]說明：（1）實參表是實際參數(shù)列表，當過程有多個實際參數(shù)時，相互之間用逗號分隔；（2）用第一種方法調用Sub過程時，實參表必須用圓括號括起來；用第二種方法調用Sub過程時，實參表不能用圓括號括起來，但過程名與實參表之間要加一個空格?！纠?-1】編寫一個求n!的通用過程，在由四個命令按鈕組成的控件數(shù)組中分別計算4！、6！、8！以及1～10的階乘和并輸出，如圖7-3所示。【例7-2】編寫一個求三個數(shù)的最大值和最小值的通用過程，在命令按鈕的Click事件過程中，任意輸入三個數(shù)調用該通用過程求它們的最大值和最小值并輸出，如圖7-4所示。7.3滾動條控件滾動條通常用于附加在窗口上幫助觀察數(shù)據(jù)或確定位置，也可以作為數(shù)據(jù)輸入的工具或者數(shù)量、進度的指示器。滾動條控件有兩種：水平滾動條和垂直滾動條。兩種滾動條的結構和操作完全一樣。1．滾動條的常用屬性（1）Value屬性設置或返回滾動條滑塊的當前位置值。（2）Max屬性滾動條能表示的最大值，范圍為-32768～32767。當滑塊位于水平滾動條的最右端或垂直滾動條的最下端時，Value屬性所取的值。（3）Min屬性滾動條能表示的最小值，范圍為-32768～32767。當滑塊位于水平滾動條的最左端或垂直滾動條的最上端時，Value屬性所取的值。（4）LargeValue屬性當用鼠標單擊滾動框的空白處，或滾動條獲得焦點時按下PageUp或PageDown鍵時，Value屬性值的改變量。（5）SmallValue屬性當用鼠標單擊滾動條兩端的箭頭，或滾動條獲得焦點時按下箭頭鍵←、↑或→、↓鍵時，Value屬性值的改變量。2．滾素動條棄的?；庇檬挛旨?）Ch緞an忽ge事件當移災動滑戀塊或逮在代缸碼中啞改變Va幼lu雨e屬性漫值時報觸發(fā)蓄滾動袍條的Ch巖an榜ge事件錦。（2）Sc秤ro誓ll事件當拖谷動滑恩塊時程觸發(fā)調滾動蘆條的Sc愈ro裕ll事件嫁?！纠?-笑3】設計迫一個絹調色嬸板。7.漠4佩Fu莫nc堡ti竭on過程在Vi封su等al絹B協(xié)as觸ic中，絮提供渣了大刪量的塑內部搖函數(shù)征，用腦戶編摔寫程闊序時塞可以杏直接符調用荒內部蔽函數(shù)捎，為掘了完前成特宴定的充功能舒，用最戶也她可以期編寫紗自己受的函貿數(shù)，F(xiàn)u僻nc將ti歐on過程饑就是優(yōu)用戶銅自定具義的逐函數(shù)柴過程衛(wèi)。Fu口nc憐ti合on過程滾的調肢用與課內部貢函數(shù)曲的調明用完有全相承同。7.裹4.喉1輛Fu梅nc碗ti糧on過程歌的定竄義Fu批nc娃ti練on過程懲的定撥義格洪式如洪下：[Pr枯iv騰at厲e|論Pu專bl崗ic凝|S匹ta鎖ti題c]搬Fu晴nc屯ti賤on屢<函數(shù)鼓過程浮名>(屢[<形參剪表>]黎)乒[A漸s壓<數(shù)據(jù)地類型>]<語句誘組>[E您xi產t酬Fu抓nc塞ti奮on件]<語句哲組>[<函數(shù)爆過程宣名>=籌<表達鄭式>]En托d握Fu耽nc餓ti鐮on說明曉：Fu慚nc紗ti壇on前的秋三個稱關鍵沖字的抄含義絹以及笨對函影數(shù)過北程名臭、形牧參和剩函數(shù)們過程峽的要烏求與梳通用含過程其相同同。Fu投nc悉ti籍on過程繞的創(chuàng)襲建方豪法與旬通用怪過程盆的創(chuàng)恒建方散法一蛛樣也提有兩探種方般法。需要轉強調的是秧：Fu帽nc晨ti據(jù)on過程狗的返出回值霞在函催數(shù)過絞程中劣一定旅要賦禾給函究數(shù)過采程名矛。7.腐4.墳2框Fu回nc況ti抽on過程票的調符用Fu閉nc檔ti障on過程鑒的一因般調尤用格僅式為?。?lt;函數(shù)吊名>[魄(<實參千表>)聞]其中狀，實宏參表鴉可以翼是一晌個或角多個鎖參數(shù)置，參沸數(shù)可頂以是挽常量濟、變姿量或桑表達糧式，件如有航多個澆參數(shù)躬，參徐數(shù)之暫間用拾逗號碌分隔億，如將果函重數(shù)沒教有參售數(shù)，交調用諒時可桂以省珠略圓授括號賊。Fu動nc犯ti透on過程陰在程慮序代葉碼中脂的具體要調用波形式主要封有四臨種（贏前面失章節(jié)咳已經京介紹恐）。【例7-貝4】將例7-碌1中的拋求n!的通彎用過陜程改答成Fu弟nc越ti勾on過程見實現(xiàn)霧同樣濕的功咱能?！纠?-顆5】輸入昏一個撕正整籌數(shù)n的值旁，計賽算s=間1*政(1釀+2再)*最(1扣+2禍+3因)*紅…*嬌(1必+2包+3聞+…齊+n盜)的值皇，要摔求先懇編寫朵求1+登2+稈3+害…+保k的Fu百nc律ti租on過程雨，然愉后調映用這漏個Fu檔nc拘ti支on過程倚求前n項的旬乘積輝，如左圖7-浩6所示涂?！纠?-努6】編寫理一個咳判斷雀正整懼數(shù)n是否螺是素你數(shù)的Fu到nc敏ti顯on過程郵，調孫用這討個過長程求10籃0～10播00之間他所有禾的孿惠生素輩數(shù)并乒輸出鐵，如砍圖7-奪7所示硬。孿生融素數(shù)麥是指懸兩個喚素數(shù)拔的差賠值為2的素樓數(shù)，傍如：10估1和10釣3就是姥孿生涼素數(shù)草。【例7-賽7】編寫遺用輾倘轉相稅除法亂求兩鎖個正名整數(shù)渴的最雞大公靠約數(shù)慕的Fu含nc暑ti旁on過程桑，調聯(lián)用這圍個Fu竄nc偶ti靠on過程向求四恨個正爬整數(shù)設的最率大公扛約數(shù)稈并輸嗚出，撫如圖7-醋8所示篩。7.寧5過程鴿參數(shù)7.存5.拴1形式凳參數(shù)咽與實互際參碧數(shù)在Vi根su宮al寬B央as命ic中，車調用間過程茂時，齒使用較參數(shù)無傳遞義的方謎式實請現(xiàn)調似用過貨程與傍被調姻用過搏程之貌間的叮數(shù)據(jù)罩傳遞袋，即艇將調觸用過怎程中吼的實請際參莫數(shù)傳攤給被集調用抱過程待對應綁的形嚴式參斯數(shù)。形式創(chuàng)參數(shù)格簡稱停形參拍，是眼在定我義Su縣b過程末或Fu筆nc足ti銀on過程與時，夾出現(xiàn)襪在圓球括號諒中的瞇變量丘名或油數(shù)組游名，總其作凍用是憲接受阿調用蔬程序嚴傳來拐的數(shù)估據(jù)；刑實際菠參數(shù)攻簡稱恢實參免，是杠在調視用Su悄b過程局或Fu殘nc章ti千on過程且時，錯傳遞爐給Su罵b過程讀或Fu浴nc均ti溜on過程茶的常角量、蜘變量擁、表今達式幫或數(shù)典組。需要犯強調的是準：（1）在朝定義Su煎b過程漆或Fu忘nc返ti綁on過程栗時，戴在圓攜括號惑中定沃義的都形參倘表，券即變之量名挖或數(shù)碼組名()，只品需要熟在過老程的筐圓括綠號中年寫成種：變膊量名|數(shù)組兄名()講A耽s數(shù)據(jù)鞋類型民；（2）形童參表罷與實惜參表脂中對贊應位何置的羨形參足名和曠實參寫名可核以相糖同也帝可以綱不同狂，Vi姜su鵝al礙B批as奶ic都認咽為不計同；（3）在局傳遞峰參數(shù)狹時，泳一般繼情況怖下，歪要求任形參辨表與急實參雕表中拘參數(shù)絲式的個嚼數(shù)、氣數(shù)據(jù)攤類型燭和位有置順載序都谷必須運一一揪對應駁，除豬非在腹形參鴨的前郵面加手上關苦鍵字Op透ti母on腎al或Pa煮ra椒mA京rr竊ay；（4）當燒數(shù)組領作為渠過程初的形援參和罩實參過時，多必須板寫成塵數(shù)組伸名和午空的浙圓括售號“()輩”；（5）實屑參如晃果是樓變量堆也必驚須定賊義，棄而且型數(shù)據(jù)藍類型藍與對達應的閘形參挺要相興同；（6）不潑能用述定長云字符味串變家量或藥定長特字符圈串數(shù)走組作蒙為形粘參，蘋但可桂以用誰定長孝字符幸串變度量作誘為實慰參。過程靜形參跑的格穿式如返下：[By適Va否l|炮By韻Re伯f|還Op莊ti德on慰al似|P濤ar除am認Ar汁ra脫y]妨<變量藝名>|共<數(shù)組腳名()炊>劍[A鋤s書<數(shù)據(jù)距類型>]7.綢5.族2按地團址傳稍遞與宋按值繭傳遞歡參數(shù)在過沒程形辜參的撿前面噸加上謝關鍵航字By茄Re騰f或省略略關友鍵字秒，表犧示按椒地址裝或者濱按引類用傳券遞參游數(shù)，趕簡稱蠶傳地拼址，腔默認弟的過涂程參饞數(shù)傳既遞方御式是膛傳地括址；捷在過秩程形暈參的架前面簡加上你關鍵勵字By袍Va片l，表都示按軟值傳丈遞參天數(shù)，棋簡稱敬傳值孟。1．傳蠻地址傳地悉址指哭的是四用實購參去兄代替數(shù)或者偵替換頌對應晶的形稀參，膜由實周參本晃身參伏與過飛程的酸計算貧，因蜻此，明在過廈程中希如果伍改變矮了形泉參的蛇值，約實際宰上就中改變醫(yī)了對都應的貴實參繡的值巷?！纠?-慰8】傳地肌址調厘用過亭程。施輸入修兩個恩正整飾數(shù)，粉調用矩例7-惕7中用同輾轉店相除任法求脫兩個脅正整考數(shù)的仙最大河公約置數(shù)的Fu個nc街ti最on過程傻，求補它們告的最躬大公或約數(shù)帽并輸景出，尿如圖7-徹9所示范?！纠?-禮9】傳值婚調用匯過程移。將漁例7-相7中用鉛輾轉汗相除熔法求皮兩個斧正整符數(shù)的將最大劫公約魔數(shù)的Fu遷nc吊ti烏on過程子的形逝參m、n前分顏別加英上關悟鍵字By全Va囑l，或芝者調打用這醉個Fu伸nc快ti舍on過程計時給導實參a、b加上跨圓括恭號，姑輸入甲兩個屆正整含數(shù)，坊求它星們的軌最大順公約勺數(shù)并隱輸出去，如付圖7-穿10所示歷。2．傳搖值傳值姜指的宗是將與實參述的值持復制轟給對纖應的洲形參環(huán)，實庫參本絡身不惰參與升過程茅的計溫算，商而由竿形參銀參與洗過程躍的計恐算，歇因此丸，在劫過程鵝中即心使改仁變了榴形參哲的值鄙，實痕參的忽值不違變。如果校定義音過程愛時采貌用的瞎是默懇認方月式傳敢地址藍，調巾用過足程時舌只要杜將實鋸參用夏圓括傾號括足起來窯，也單可以宣變成芝傳值巨。7.同5.傘3可選泳參數(shù)搞及其具默認接值在過訓程形釋參的動前面郊加上丟關鍵洋字Op扣ti足on葉al表示溉可選榆的參捉數(shù)，脆調用鞏該過呀程時票，可疊以提園供或慘不提兵供（拆省略份）與漲此形陽參相毛對應故的實熔參，肆但在虎過程歐中需礦要用肌函數(shù)Is半Mi皇ss您in饅g(<形參浴名>)來處籃理。哄當在延過程遵的某亂個形尾參前清加上避關鍵梳字Op笛ti紀on班al后，構其后濟所有惹的形蹤蝶參都尖成為伏可選圣的參住數(shù)，趨因此鎖，可帳選的棋參數(shù)摸一般絹放在袖形參屆表的丑后面絮，而扶且數(shù)萌據(jù)類程型為Va犁ri丹an樂t（默盡認數(shù)榮據(jù)類吼型）禾?！纠?-膀10樂】編寫嚷一個Fu縱nc在ti宇on過程忠，調魂用該貴過程隊計算司兩個承數(shù)的匆和、撇三個暫數(shù)的歉和、侄四個畫數(shù)的掠和并撥輸出毯，如悔圖7-漫11所示歉。加上鎮(zhèn)關鍵頂字Op支ti嶺on交al的可桿選參乘數(shù)，燙還可猜以設肝置默沉認值愿（缺規(guī)省值挽），玻當一木個可擱選的故形參藥設置絡了默搏認值央后，賽調用毒過程帳時如古果為女該形朝參傳絮遞實逝參則秩接受彎實參謎的值遭，否真則，幸將使喜用默羞認值爹?！纠?-妨11秘】將例7-滿10中Fu傘nc塔ti輩on過程營的形板參c、d的默雞認值殃設為0，調權用該猛過程擾計算肅兩個霧數(shù)的藍和、旁三個葬數(shù)的慎和、各四個甜數(shù)的跳和并怎輸出非。7.擱5.匹4可變漢參數(shù)在過艇程形怒參的鏟前面賣加上窯關鍵蝦字Pa壞ra陳mA扣rr吊ay可以述傳遞悼任意旱個數(shù)碧的參彩數(shù)，拋但其抹后的菠形參忠必須勾是Va器ri達an寬t類型屆（默吧認數(shù)亦據(jù)類榮型）繭的數(shù)崇組，魂而且?guī)ぶ荒芫抻糜诜螀C表的兩最后悲一個唱參數(shù)比，Pa曬ra偉mA毀rr披ay不能遍與By脈Va慚l、By駐Re恭f或Op黎ti卡on瞎al關鍵俯字一嫂起使猜用?！纠?-拿12這】將例7-腔10中Fu枕nc智ti若on過程緣瑞的形鑒參設蠻為可嗚變參乎數(shù)，豈調用提該過鄭程計內算兩校個數(shù)蔬的和甩、三豪個數(shù)厘的和補、四便個數(shù)雁的和鉛并輸棵出。7.末5.洋5數(shù)組晨參數(shù)在通助用過超程或諒函數(shù)叢過程交中，廢可以瓜將數(shù)將組或謀數(shù)組纖元素大作為攤參數(shù)拉進行飄傳遞迫，當受傳遞荒整個悠數(shù)組掃，即盯將數(shù)派組作卸為過鞏程的磁形參儲和實單參時點，必澡須寫因成數(shù)灶組名風和空矩的圓凳括號今“()減”的形獎式；桑數(shù)組兼參數(shù)繡只能怪按地蓋址傳漆遞，剪不能嫌按值卷傳遞兼，即幼不能位在數(shù)杯組形磚參前正加關口鍵字By怪Va逝l?！纠?-央13平】數(shù)組勵作為頓過程牌的參娃數(shù)。分別監(jiān)定義僑有10個、15個、20個元擁素的限三個優(yōu)一維軋數(shù)組噴，并愁給這夾三個剪數(shù)組脫的元劫素賦鑰隨機粒的兩霜位正逃整數(shù)透并輸帥出，秀編寫掩一個虹用比選較排紫序法掛按從頸大到錦小的閃順序枝排列劇數(shù)組冶元素偶的Su奮b過程筒，調掘用該鎖過程卵分別鳳對這幟三個萬數(shù)組例排序喊并輸質出，走如圖7-仗12所示好。7.平5.鳴6對象消參數(shù)在Vi找su昂al饞B痕as孔ic中，惑既可斗以用頭變量糞或數(shù)使組作歲為過灣程的乘參數(shù)迷，也時可以躺用對盞象，萍即窗撲體或悟控件辜作為斬過程剩的參描數(shù)。仙對象厚參數(shù)極只能渣按地控址傳靈遞，擔不能犯按值極傳遞制，即吳不能楚在對袋象形受參前速加關淋鍵字By笛Va鮮l。1．使對用窗登體參喚數(shù)使用云窗體姥作為催過程跳的參已數(shù)時磁，形參折的數(shù)蔽據(jù)類花型為Fo妙rm，實首參為考窗體痰名?！纠?-盞14圖】窗體福作為歉過程呢的參撥數(shù)。新建棍一個詠工程休，再然添加2個窗吐體Fo割rm偏2、Fo督rm燦3；在Fo慣rm拉1中畫1個計輪時器條控件Ti俗me父r1，設汁置其In箱te辟rv近al屬性辛值為10謙00，在Fo秧rm漁1中編物寫一臨個使膊用窗誰體作塌為參蠻數(shù)的些過程懲，該寄過程淘可以縣隨機傾改變睛窗體域在屏貞幕上攔的位追置和筑背景梅顏色趣，編騎寫程塊序，答在Ti勉me證r1的Ti蘿me理r事件億過程精中調功用這喝個過沈程，擺每隔1秒變罷換一檢個窗改體的落位置俯和背析景顏蒙色?！纠?-嗽15莖】控件它作為族過程夏的參磁數(shù)。在窗泄體上綿畫1個圖括片框Pi扮ct經ur笑e1、1個圖棟像控握件Im覆ag溫e1、1個命境令按鬧鈕Co善mm鉗an秤d1，設辟置Co液mm魔an紐奉d1的St扒yl拘e屬性遙值為1-斯Gr冒ap尸hi害ca敢l，分扯別設醫(yī)置這訓三個巖控件沫的Pi開ct攀ur差e屬性書；再介畫1個計顆時器脅控件Ti卻me逃r1，設蒙置其In粒te冶rv蠢al屬性慎值為50班0，編憤寫一渡個使悼用控蹄件作抵為參邊數(shù)的乎過程淡，該食過程靈可以訓隨機禮改變荒控件滅在窗慮體上地的位俯置，渡編寫憂程序端，在Ti媽me別r1的Ti破me希r事件濱過程銷中調適用這長個過團程，憐每隔50抬0毫秒評改變市一個氧控件鍛的位端置，安如圖7-紡13所示曬。2．使附用控汗件參鋸數(shù)使用適控件辮作為陳過程撥的參臣數(shù)時巧，形參獨的數(shù)宅據(jù)類澇型為Co救nt柴ro毅l，實邪參為樸控件商名。7.邊6過程顧的遞況歸調益用一個筆過程叨直接店或間餡接地鄙調用崇過程乖本身決稱為堵過程厘的遞剃歸調功用。結過程種的遞老歸可穗以設泰計出遲結構賀清晰涉的程宿序，伏但遞仍歸次菜數(shù)的歸增加每會占屠用較雷多的薯內存莫空間得，程同序執(zhí)恥行的權效率牙不高需。設計好遞歸殃過程般時，網需要網考慮兩個傻要素：（1）遞即歸終效止條謊件；日（2）遞幸歸函倡數(shù)，誓即具掃有能壓趨向穴遞歸位終止嘉條件悟的遞炮歸表顆示形鑄式。拆一個妨遞歸診過程給只有預具備用了這煉兩個營要素努，才暮能在釘有限守次計把算后玩得出馳結果鑼?！纠?-戀16艦】將求n!的Fu桂nc偵ti襲on過程棵寫成多遞歸場形式置，在悠文本辛框中閥輸入楚一個盟正整游數(shù)，逐按回蓄車鍵殺調用善這個Fu瘡nc梁ti屆on過程糠計算貿其階活乘，飽如圖7-寫14所示仗。n!的遞摘歸形寫式及序其遞述歸函尊數(shù)表隸示如很下：n=疏0n>秒0n=剛0n>肺0遞歸腦過程店與非車遞歸遞過程滾的區(qū)別：遞耕歸過密程采陸用選黨擇結處構反湯復不華斷地券調用厲過程勞本身鉗而得丙出計呼算結葡果；渣非遞稠歸過孕程采如用循萍環(huán)結撇構不介斷地禍循環(huán)類而得奪出計豪算結涉果。7.扮7過程薄的作踏用域過程寄的作扔用域斧指的值是過躲程在深哪些自范圍采內有露效，烤具體蠅地說替就是