重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
以class2为例,如果你只需陪皮要一个class2实例,那穗羡么把它在class1成员中声明为共享成员即可。
目前成都创新互联公司已为1000多家的企业提供了网站建设、域名、虚拟空间、网站托管、企业网站设计、松北网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。
Shared c2 As New Class2()
然后调用它的函数,
c2.func()
如果class2的这个函数不依赖于class2实例,那么直接将这个函数用Shared声明,
Public Shared Function func() As xxx
'xxxxx
End Function
然后在class1中引入,
Imports class2
直接调用即可。
func()
我想芦族差第二种更符合你的情况。
1.对象变量与对象本身是不同的,对象变量代表了对象真实数据在内存中的地址仿悄明.
打个比方,“对运圆象变量”就象你家的地址,“对象本身”就象你家。
你不能说你家的地址(xx路xx号xx房)就是你家,但是可以通过这个地址而找到你家。
2.传值的参数本身是被复制一份的,但这并不意味着它所代表的对象也被复制一份.
有如下一个函数:
Public
Function
Do_delete(ByVal
ps_usr_id
As
String)
As
Boolean
你在调用时可能这样调用:
dim
strID
as
string
strID
=
"kknd001"备告
if
Do_delete(strID)
then.....
当程序执行到Do_delete函数体里面时ps_usr_id变量其实是按照StrID的值而复制的一个变量。
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)
''想要的结果就是在这里使用a的值是哗闷"bian"
MsgBox(a)
End Sub
===================
以上就可以,不知销衡道你亏芦做“ByRef a As b”的b是什么东西
当然有啊,
引用类型的变量就是类的实例化对象
VB点虐 值类型包括14种基本数据灶早销类型(除String)、结构隐游和枚举,其他都是引用类型
引用一个按钮对象
Dim a As Button = Button1 '假设窗体中有Button1这个按钮控件
引用一个自定义类的对象
Public Class Class1
End Class
Dim b 睁睁As New Class1
上面的a和b都是引用型的变量。
字符串也是引用型的变量
它是基础数据类型中唯一的引用型数据类型。
Dim s As String = "字符串也是引用类型!"
满意请采纳,谢谢。