程序設(shè)計參數(shù)傳遞

VisualBasic.Net程序設(shè)計華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系章程華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系參數(shù)傳遞及作用域1參數(shù)傳遞2變量的作用域3變量的生存周期華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系1參數(shù)傳遞

Subsum()…..

EndSubPrivateSubButton1_Click()Dimf1%,f2%

Sum(f1,1,10)EndSubByRefTotal%,ByValvStart%,ByValvEnd%華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系2數(shù)組參數(shù)的傳遞當(dāng)參數(shù)是數(shù)組時，一般通過傳址方式進(jìn)行傳遞。參數(shù)形式：

形參：數(shù)組名()AS類型實參：數(shù)組名()華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系例17-1函數(shù)tim,求某一維數(shù)組中各元素之積Functiontim(a()Asvariant)AsLongDimt#，i%t=1Fori=Lbound(a)ToUbound(a) t=t*a(i)Nextitim=tEndFunction調(diào)用：SubCommand1_Click()Dima()={4,5.3,2,1}Textbox1.text="a的各元素積為“&tim(a)EndSub2數(shù)組參數(shù)的傳遞華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系3變量、過程的作用域作用域:變量、過程可被訪問的范圍。它隨變量、過程所處的位置不同而變化。華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系3.1變量的作用域(1)塊范圍在某塊內(nèi)聲明的變量只能在該塊內(nèi)使用。(2)過程范圍在某過程內(nèi)聲明的變量只能在該過程內(nèi)部使用.全局變量在過程外部定義，可以被該模塊的所有過程調(diào)用。華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系(3)模塊范圍包括VB.NET中的模塊、類和結(jié)構(gòu)。可以通過將聲明語句放在模塊、類或結(jié)構(gòu)中的任一過程或塊的外部來聲明該級別的元素。(4)命名空間范圍

Friend或Public聲明模塊級變量，則該變量可用于整個命名空間內(nèi)的所有過程。3.1變量的作用域華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系在不同級聲明相同的變量名,系統(tǒng)按局部、窗體/模塊、全局次序訪問

PublicTempAsinteger SubForm_Load（）

DimTempAsInteger Temp=10 Form1.Temp=20 Textbox1.text=Form1.Temp&vbcrlf&TempEndSub3.1變量的作用域華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系3.2過程的作用域(1)窗體/模塊級

加Private關(guān)鍵字的過程，只能被本窗體或模塊中的其它過程調(diào)用。PrivateSubMyRndSub(…)

EndSub華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系3.2過程的作用域(2)全局級

加Public關(guān)鍵字的過程，可供該應(yīng)用程序的所有窗體和所有標(biāo)準(zhǔn)模塊中的過程調(diào)用。

PublicSubMyRndSub(…)

EndSub華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系Dim聲明：每次調(diào)用過程時給變量分配存貯單元并初始化變量。

PrivateFunctionsum(nAsInteger)DimjAsInteger

j=j+nsum=jEndFunction4動態(tài)變量華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系例17-4SubForm_Click()Dimi%Fori=1To5 textbox1.text=sum(i) NextiEndSub4動態(tài)變量的內(nèi)存分配Functionsum(nAsInteger)

DimjAsInteger j=j+nsum=jEndFunction華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系5靜態(tài)變量Static聲明：

每次調(diào)用過程，變量保持上一次調(diào)用過程后的值。

Static變量名[AS類型]StaticFunction函數(shù)過程名([參數(shù)列表])StaticSub子過程名[(參數(shù)列表)]華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系例17-4SubForm_Click()Dimi%Fori=1To5 textbox1.text=sum(i) NextiEndSub5靜態(tài)變量的內(nèi)存分配Functionsum(nAsInteger)

StaticjAsInteger j=j+nsum=jEndFunction華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系例17-5

比較Dim和Static兩者的區(qū)別例17-6

記錄并顯示某按鈕的點擊次數(shù)5靜態(tài)變量華中農(nóng)業(yè)大學(xué)理學(xué)院計算機(jī)系應(yīng)用舉例例17-6

編一函數(shù)，統(tǒng)計字符串中漢字的個數(shù)。若利用Asc函數(shù)求其碼值為小于0（以補碼表示），而西文字符的最高位為0，Asc函數(shù)求其碼值為大于0華