以class2为例，如果你只需要一个class2实例，那么把它在class1成员中声明为共享成员即可。
让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：主机域名、雅安服务器托管、营销软件、网站建设、原平网站维护、网站推广。
Shared c2 As New Class2()
然后调用它的函数，
c2.func()
如果class2的这个函数不依赖于class2实例，那么直接将这个函数用Shared声明，
Public Shared Function func() As xxx
'xxxxx
End Function
然后在class1中引入，
Imports class2
直接调用即可。
func()
我想第二种更符合你的情况。
泛型参数，表示一种特定类型，通常用于集合List, Dictionary之类的。
原型：Dictionary(Of TKey, TValue)
原型不能直接使用，必须给TKey, TValue指定一个类型(Type)
强类型字典：Dictionary(Of String, String)
表示键和值都为String类型的字典。
Thread不会返回值的。你应该创建委托的，使用委托的异步方法
Dim funcInt32 As Func(Of String, Integer) = AddressOf GetList
Dim s As IAsyncResult = funcInt32.BeginInvoke("(参数)", Nothing, Nothing)
’在要获得结果的地方调用EndInvoke方法结束异步调用并获得结果。
Dim result As Int32 = funcInt32.EndInvoke(s)