在項目A里添加引用,在“添加引用”對話框里找到項目B就可以了。也可以先把項目B生成dll文件,然后在項目A中添加對這個dll文件的引用。
成都創(chuàng)新互聯(lián)公司一直秉承“誠信做人,踏實做事”的原則,不欺瞞客戶,是我們最起碼的底線! 以服務(wù)為基礎(chǔ),以質(zhì)量求生存,以技術(shù)求發(fā)展,成交一個客戶多一個朋友!為您提供網(wǎng)站設(shè)計、做網(wǎng)站、成都網(wǎng)頁設(shè)計、重慶小程序開發(fā)、成都網(wǎng)站開發(fā)、成都網(wǎng)站制作、成都軟件開發(fā)、成都app開發(fā)是成都本地專業(yè)的網(wǎng)站建設(shè)和網(wǎng)站設(shè)計公司,等你一起來見證!
Private Function ReadFile(ByRef a As String) As String
a = "bian"
End Function
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As String = "yuanlai"
ReadFile(a)
''想要的結(jié)果就是在這里使用a的值是"bian"
MsgBox(a)
End Sub
===================
以上就可以,不知道你“ByRef a As b”的b是什么東西
1.對象變量與對象本身是不同的,對象變量代表了對象真實數(shù)據(jù)在內(nèi)存中的地址.
打個比方,“對象變量”就象你家的地址,“對象本身”就象你家。
你不能說你家的地址(xx路xx號xx房)就是你家,但是可以通過這個地址而找到你家。
2.傳值的參數(shù)本身是被復(fù)制一份的,但這并不意味著它所代表的對象也被復(fù)制一份.
有如下一個函數(shù):
Public
Function
Do_delete(ByVal
ps_usr_id
As
String)
As
Boolean
你在調(diào)用時可能這樣調(diào)用:
dim
strID
as
string
strID
=
"kknd001"
if
Do_delete(strID)
then.....
當(dāng)程序執(zhí)行到Do_delete函數(shù)體里面時ps_usr_id變量其實是按照StrID的值而復(fù)制的一個變量。
以class2為例,如果你只需要一個class2實例,那么把它在class1成員中聲明為共享成員即可。
Shared c2 As New Class2()
然后調(diào)用它的函數(shù),
c2.func()
如果class2的這個函數(shù)不依賴于class2實例,那么直接將這個函數(shù)用Shared聲明,
Public Shared Function func() As xxx
'xxxxx
End Function
然后在class1中引入,
Imports class2
直接調(diào)用即可。
func()
我想第二種更符合你的情況。