如何使用VB.NET中可選參數(shù)調(diào)用方法

VB.NET可選參數(shù)的默認值必須是一個常數(shù)表達式。

創(chuàng)新互聯(lián)建站長期為上千家客戶提供的網(wǎng)站建設服務，團隊從業(yè)經(jīng)驗10年，關注不同地域、不同群體，并針對不同對象提供差異化的產(chǎn)品和服務；打造開放共贏平臺，與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為蒼梧企業(yè)提供專業(yè)的成都網(wǎng)站制作、成都網(wǎng)站設計，蒼梧網(wǎng)站改版等技術服務。擁有十載豐富建站經(jīng)驗和眾多成功案例,為您定制開發(fā)。

過程定義中跟在可選參數(shù)后的每個參數(shù)也都必須是可選的。

下面的語法顯示帶VB.NET可選參數(shù)的過程聲明：

Sub sub name（ByVal parameter 1 As data type 1,

Optional ByVal parameter 2 As data type 2 = default value）

調(diào)用帶VB.NET可選參數(shù)的過程

過程在運行時無法檢測到給定的參數(shù)是否已被省略，或者調(diào)用代碼是否已顯式提供默認值。如果需要弄清楚這一點，可以設置一個不可能的值作為默認值。下面的過程定義了可選參數(shù) office,并測試其默認值 QJZ 以查看它在調(diào)用中是否已被省略：

Visual Basic

Sub notify（ByVal company As String, Optional ByVal office As String = "QJZ"）

If office = "QJZ" Then

Debug.WriteLine（"office not supplied -- using Headquarters"）

office = "Headquarters" End If

' Insert code to notify headquarters or specified office.

End Sub

如果可選參數(shù)是像 String 這樣的引用類型，只要它不是該變量所預期的值，就可以使用 Nothing 作為默認值。

VB.NET可選參數(shù)和重載

定義帶可選參數(shù)的過程的另一種方法是使用重載。如果有一個可選參數(shù)，可以定義過程的兩個重載版本，一個接受此參數(shù)，另一個則不帶參數(shù)。此方法隨可選參數(shù)數(shù)目的增加而變得更復雜。然而，這樣做的優(yōu)點是可以完全確定調(diào)用程序是否提供了每個VB.NET可選參數(shù)。

如何正確理解VB.NET函數(shù)調(diào)用

1. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

2. MessageBoxA(ByVal hwnd As Integer,

ByVal text As String, ByVal

lpcaption As String, ByVal

wtype As Integer) As Integer

3. End Function

首先integer被作為32位數(shù)據(jù)替代了long(long是64位)

System是Net語言中的一個族，System.Runtime.InteropServices是system中的一個類。System.Runtime.InteropServices.DLLimpor是其中的一個方法。調(diào)用DLL的API

接口，這個的意思就是vb6的lib"user32", share是共享的意思，例如：

1. Public Class classA

2. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

MessageBoxA(ByVal h As Integer,

ByVal m As String, ByVal c As

String, ByVal type As Integer) As Integer

3. End Function

4. End Class

你可以這樣調(diào)用 classA.MessageboxA 但是如果沒有這個share 在class后打點就沒有MessageboxA的成員出現(xiàn)了 ，現(xiàn)在你就象以前一樣的使用他吧。

其實上面這個VB.NET函數(shù)調(diào)用方法并不正確，我們?nèi)耘f要使用API聲明，只是換了一各形式

如果你認為這就是VB.NET就錯了，看看這個：

system.WinForms.MessageBox.Show("對話內(nèi)容寫在這里", "標題寫在這里", messagebox.OK BitOr messagebox.IconAsterisk)

這就是面向?qū)ο?，你已?jīng)完成了所有的任務。不需要任何的API聲明。不需要寫多余的代碼。

1. messagebox.IconAsterisk=驚嘆號圖標

2. messagebox.IconError=錯誤圖標

3. messagebox.IconExclamation=警告圖標

4. messagebox.IconHand=錯誤圖標

5. messagebox.IconInformation=提示圖標

所經(jīng)點NET就是打點到達，在族后面打點，在類后面打點，在對象后面打點。第二個問題就是類與類之間相互的關系，Net在網(wǎng)上處理人與人的關系，在程序語言中處理類與類的關系。倒底是加不加share,倒底是類后面打點,還是Dim成一個對象（把他當一個變量吧）再說，是等于class,還是New class.是dim xxx as class=new class 還是dim xxx as new class

就是這樣VB.NET函數(shù)調(diào)用將更簡單，不須要研究一些很難的東西。

如何用vb.net 調(diào)用VBS文件？

一般的VBS程序都是可以寫在VB程序里面的 只需要稍加變化 加上些關鍵字 或者數(shù)據(jù)類型

如果 你想調(diào)用一個VBS程序 也可以使用Shell的方法

vb.net調(diào)用vb6.0組件

可以的。

VB6所產(chǎn)生的DLL全都都是標準COM組件，只需要注冊一下就可以引用了。

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

Sub過程實現(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("過程實現(xiàn) 1! + 2! + 3! + … + 10! = " sum)

End Sub

Function函數(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ù)實現(xiàn) 1! + 2! + 3! + … + 10! = " sum)

End Sub

當前名稱：vb.net調(diào)用vb腳本,vbs腳本編程簡明教程
轉(zhuǎn)載源于：http://sd-ha.com/article32/hdhipc.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供自適應網(wǎng)站、搜索引擎優(yōu)化、品牌網(wǎng)站制作、定制網(wǎng)站、外貿(mào)網(wǎng)站建設、全網(wǎng)營銷推廣

廣告

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