189 8069 5689
以class2为例，如果你只需要一个class2实例，那么把它在class1成员中声明为共享成员即可。
创新互联成立于2013年，公司以成都网站建设、网站制作、系统开发、网络推广、文化传媒、企业宣传、平面广告设计等为主要业务，适用行业近百种。服务企业客户1000+，涉及国内多个省份客户。拥有多年网站建设开发经验。为企业提供专业的网站建设、创意设计、宣传推广等服务。 通过专业的设计、独特的风格，为不同客户提供各种风格的特色服务。
Shared c2 As New Class2()
然后调用它的函数，
c2.func()
如果class2的这个函数不依赖于class2实例，那么直接将这个函数用Shared声明，
Public Shared Function func() As xxx
'xxxxx
End Function
然后在class1中引入，
Imports class2
直接调用即可。
func()
我想第二种更符合你的情况。
让两个类都继承同一个“电源设备”抽象类或者实现接口，然后用反射来动态读取类库中的类。
在项目A里添加引用，在“添加引用”对话框里找到项目B就可以了。也可以先把项目B生成dll文件，然后在项目A中添加对这个dll文件的引用。
DLL（动态链接库）是一个很有用的东西，在开发大项目的时候显得非常重要，因为多人合作开发时，可以给每个人分配一个任务，用DLL完成，最后组合起来，就不会出现互相冲突的问题。这里给出最简单的DLL编写与调用的示例
首先，我们打开VB.NET，选择类库，名称改为test
然后输入以下代码
Public Class test
Public Function test(ByVal a As Long, ByVal b As Long) As Long
Return a + b
End Function
End Class
保存后，生成DLL文件。
这就是最简单的一个DLL，下面是调用该DLL的示例
新建一个工程，单击“项目” -- 添加引用
找到刚才生成的DLL，双击它
添加引用以后，似乎什么也没发生，这时我们输入以下代码：
Imports test.test
这样，就包含了该DLL的类。
然后我们定义一个类
Dim test As New test.test
这样，就可以使用里面的函数了，下面是程序示例
Imports test.test
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim test As New test.test
MsgBox(test.test(1, 2))
End Sub
End Class
运行该程序，可以看到，调用了DLL内的函数。
这就是最简单的DLL示例，可以将一些复杂的代码集成到DLL里，以后升级或重用都比较方便。