調(diào)用過(guò)程,調(diào)用過(guò)程有諸多技巧,它們與過(guò)程的類型、位置以及在應(yīng)用程序中的使用方式有關(guān)。下面說(shuō)明如何調(diào)用 Sub 過(guò)程和 Function 過(guò)程。
創(chuàng)新互聯(lián)長(zhǎng)期為1000多家客戶提供的網(wǎng)站建設(shè)服務(wù),團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年,關(guān)注不同地域、不同群體,并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù);打造開(kāi)放共贏平臺(tái),與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為三沙企業(yè)提供專業(yè)的網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站,三沙網(wǎng)站改版等技術(shù)服務(wù)。擁有十多年豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開(kāi)發(fā)。
調(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)用自行編寫(xiě)的函數(shù)過(guò)程的方法和調(diào)用 Visual Basic 內(nèi)部函數(shù)過(guò)程(例如 Abs)的方法一樣;即在表達(dá)式中寫(xiě)上它的名字。
'下面的語(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ò)程。
在模塊中引用到窗體中的控件,必須在該控件名之前由相應(yīng)的窗體名作為前導(dǎo),例如:
1,要引用窗體Form1中的控件TextBox1
MsgBox(Form1.TextBox1.Text)
2,要引用窗體Form2中的控件TextBox1
MsgBox(Form2.TextBox1.Text)
在項(xiàng)目A里添加引用,在“添加引用”對(duì)話框里找到項(xiàng)目B就可以了。也可以先把項(xiàng)目B生成dll文件,然后在項(xiàng)目A中添加對(duì)這個(gè)dll文件的引用。
以class2為例,如果你只需要一個(gè)class2實(shí)例,那么把它在class1成員中聲明為共享成員即可。
Shared c2 As New Class2()
然后調(diào)用它的函數(shù),
c2.func()
如果class2的這個(gè)函數(shù)不依賴于class2實(shí)例,那么直接將這個(gè)函數(shù)用Shared聲明,
Public Shared Function func() As xxx
'xxxxx
End Function
然后在class1中引入,
Imports class2
直接調(diào)用即可。
func()
我想第二種更符合你的情況。
如果是托管的Dll或則com組件類,直接在項(xiàng)目上添加這個(gè)DLL的引用\x0d\x0a如果是非托管的,已API函數(shù)方式調(diào)用的DLL,使用DllImport方式申明DLL函數(shù)\x0d\x0a\x0d\x0a不過(guò)一般這種情況是吧IP地址等配置信息寫(xiě)在配置文件里面,若XML,INI,應(yīng)用程序配置文件等方式\x0d\x0a\x0d\x0a配置文件用戶可以直接打開(kāi)查看,連接字符串寫(xiě)在那里,數(shù)據(jù)庫(kù)就不安全了。
在任何一個(gè)類前面 Imports + 要引入的命名空間即可。
一些默認(rèn)的命名空間 VB.net 已經(jīng)自動(dòng)導(dǎo)入。