vb.net過(guò)程 VBNET教程

簡(jiǎn)述vb.net過(guò)程的嵌套調(diào)用和遞歸調(diào)用

嵌套是指一個(gè)過(guò)程調(diào)用另一個(gè)過(guò)程的使用,遞歸過(guò)程是這個(gè)過(guò)程中調(diào)用本過(guò)程的使用。遞歸是嵌套的一種特殊形式，遞歸過(guò)程必須有“歸點(diǎn)”，也就是終止調(diào)用本身的一個(gè)分支

成都創(chuàng)新互聯(lián)是工信部頒發(fā)資質(zhì)IDC服務(wù)器商，為用戶提供優(yōu)質(zhì)的川西大數(shù)據(jù)中心服務(wù)

《VB.NET》過(guò)程。返回值問(wèn)題。

你的?sub過(guò)程這個(gè)是子過(guò)程，無(wú)返回值的，這里Form1_Load中b仍然 ?b=""

如果你想b="注釋",將你的sub過(guò)程改成自定義函數(shù)，用b來(lái)接收返回值就行了，代碼如下

Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load

Dim?a?As?String?=?"rem"

Dim?b?As?String?=?""

b?=?sub過(guò)程(b,?a)

Me.Text?=?b????????'為什么“b”不是等于?"注釋"

End?Sub

Private?Function?sub過(guò)程(ByVal?輸出?As?String,?ByRef?輸入?As?String)?As?String

If?輸入?=?"rem"?Then

輸出?=?"注釋"

End?If

Return?輸出

End?Function

VB.net過(guò)程的調(diào)用

Sub過(guò)程實(shí)現(xiàn)：

Sub FactsSub(ByVal intN As Integer, ByRef result As Long)

Dim i As Integer

Dim lngResult As Long

lngResult = 1

For i = 1 To intN

lngResult *= i

Next

result = lngResult

End Sub

Private Sub btnSub_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSub.Click

Dim i As Integer

Dim sum As Long = 0

Dim result As Long

For i = 1 To 10

FactsSub(i, result)

sum += result

Next

MsgBox("過(guò)程實(shí)現(xiàn) 1! + 2! + 3! + … + 10! = " sum)

End Sub

Function函數(shù)實(shí)現(xiàn):

Function FactsFunction(ByVal intN As Integer) As Long

Dim i As Integer

Dim lngResult As Long

lngResult = 1

For i = 1 To intN

lngResult *= i

Next

Return lngResult

End Function

Private Sub btnFunction_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFunction.Click

Dim i As Integer

Dim sum As Long = 0

For i = 1 To 10

sum += FactsFunction(i)

Next

MsgBox("函數(shù)實(shí)現(xiàn) 1! + 2! + 3! + … + 10! = " sum)

End Sub

VB.NET怎么調(diào)用其它模塊的過(guò)程？

調(diào)用過(guò)程，調(diào)用過(guò)程有諸多技巧，它們與過(guò)程的類型、位置以及在應(yīng)用程序中的使用方式有關(guān)。下面說(shuō)明如何調(diào)用 Sub 過(guò)程和 Function 過(guò)程。

調(diào)用 Sub 過(guò)程

與 Sub 過(guò)程不同，在表達(dá)式中，Sub 過(guò)程不能用其名字調(diào)用。調(diào)用 Sub 過(guò)程的是一個(gè)獨(dú)立的語(yǔ)句。Sub 過(guò)程還有一點(diǎn)與函數(shù)不一樣，它不會(huì)用名字返回一個(gè)值。但是，與 Function過(guò)程一樣，Sub 過(guò)程也可以修改傳遞給它們的任何變量的值。

調(diào)用 Sub 過(guò)程有兩種方法：

'以下兩個(gè)語(yǔ)句都調(diào)用了名為 MyProc 的 Sub 過(guò)程。

Call MyProc (FirstArgument, SecondArgument)

MyProc FirstArgument, SecondArgument

注意，當(dāng)使用 Call 語(yǔ)法時(shí)，參數(shù)必須在括號(hào)內(nèi)。若省略 Call 關(guān)鍵字，則也必須省略參數(shù)兩邊的括號(hào)

調(diào)用函數(shù)過(guò)程

通常，調(diào)用自行編寫的函數(shù)過(guò)程的方法和調(diào)用 Visual Basic 內(nèi)部函數(shù)過(guò)程（例如 Abs）的方法一樣；即在表達(dá)式中寫上它的名字。

'下面的語(yǔ)句都調(diào)用函數(shù) ToDec。

Print 10 * ToDec

X = ToDec

If ToDec = 10 Then Debug.Print "Out of Range"

X = AnotherFunction ( 10 * ToDec)

就像調(diào)用 Sub 過(guò)程那樣，也能調(diào)用函數(shù)。下面的語(yǔ)句都調(diào)用同一個(gè)函數(shù)：

Call Year (Now)

Year Now

當(dāng)用這種方法調(diào)用函數(shù)時(shí)，Visual Basic 放棄返回值。

調(diào)用其它模塊中的過(guò)程

在工程中的任何地方都能調(diào)用其它模塊中的公用過(guò)程。可能需要指定這樣的模塊，它包含正在調(diào)用的過(guò)程。調(diào)用其它模塊中的過(guò)程的各種技巧，取決于該過(guò)程是在窗體模塊中、類模塊中還是標(biāo)準(zhǔn)模塊中。

窗體中的過(guò)程

所有窗體模塊的外部調(diào)用必須指向包含此過(guò)程的窗體模塊。如果在窗體模塊 Form1 包含 SomeSub 過(guò)程，則可使用下面的語(yǔ)句調(diào)用 Form1 中的過(guò)程：

Call Form1.SomeSub(arguments)

類模塊中的過(guò)程

與窗體中調(diào)用過(guò)程類似，在類模塊中調(diào)用過(guò)程要調(diào)用與過(guò)程一致并且指向類實(shí)例的變量。例如，DemoClass 是類 Class1 的實(shí)例：

Dim DemoClass as New Class1

DemoClass.SomeSub

但是不同于窗體的是，在引用一個(gè)類的實(shí)例時(shí)，不能用類名作限定符。必須首先聲明類的實(shí)例為對(duì)象變量（在這個(gè)例子中是 DemoClass ）并用變量名引用它。

標(biāo)準(zhǔn)模塊中的過(guò)程

如果過(guò)程名是唯一的，則不必在調(diào)用時(shí)加模塊名。無(wú)論是在模塊內(nèi)，還是在模塊外調(diào)用，結(jié)果總會(huì)引用這個(gè)唯一過(guò)程。如果過(guò)程僅出現(xiàn)在一個(gè)地方，這個(gè)過(guò)程就是唯一的。

如果兩個(gè)以上的模塊都包含同名的過(guò)程，那就有必要用模塊名來(lái)限定了。在同一模塊內(nèi)調(diào)用一個(gè)公共過(guò)程就會(huì)運(yùn)行該模塊內(nèi)的過(guò)程。例如，對(duì)于 Module1 和 Module2 中名為 CommonName 的過(guò)程，從 Module2 中調(diào)用 CommonName 則運(yùn)行 Module2 中的 CommonName 過(guò)程，而不是 Module1 中的 CommonName 過(guò)程。

從其它模塊調(diào)用公共過(guò)程名時(shí)必須指定那個(gè)模塊。例如，若在 Module1 中調(diào)用 Module2 中的 CommonName 過(guò)程，要用下面的語(yǔ)句：

Module2.CommonName (arguments)

Public ? 用于聲明對(duì)所有模塊中的所有其它過(guò)程都可以使用的過(guò)程。?

Private ?用于聲明只能在包含該聲明的模塊中使用的過(guò)程。

當(dāng)前文章：vb.net過(guò)程 VBNET教程
網(wǎng)頁(yè)路徑：http://m.kartarina.com/article10/dodsjdo.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站排名、企業(yè)網(wǎng)站制作、標(biāo)簽優(yōu)化、網(wǎng)站內(nèi)鏈、響應(yīng)式網(wǎng)站、網(wǎng)站設(shè)計(jì)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)