13518219792
dim objEye as IEye = new Eye(); '用接口型引用，new 实现类的对象。
目前创新互联建站已为上1000+的企业提供了网站建设、域名、网络空间、绵阳服务器托管、企业网站设计、西市网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。
messagebox.show(objEye.IEye) '调用属性
在VB.NET的类里，实现一个接口的语句是：
implements接口名称
例如，下面定义一个车（总称）的接口，这里的车是各种车的总称：
Public Interface ICar
Property color() As String
Property speed() As Long
Sub PrintInfo()
End Interface
然后在不同类型的“车”类里实现它：
Public Class A_Car
Implements ICar
Dim m_color As String, m_speed As Long
Public Property color() As String Implements ICar.color
Get
Return m_color
End Get
Set(ByVal Value As String)
m_color = Value
End Set
End Property
Protected Overrides Sub Finalize()
MsgBox(I was deconstructed!)
End Sub
Public Sub New()
m_color = Red
m_speed = 210
MsgBox(I was constructed!)
End Sub
Public Property speed() As Long Implements ICar.speed
Get
Return m_speed
End Get
Set(ByVal Value As Long)
m_speed = speed
End Set
End Property
Public Sub PrintInfo() Implements ICar.PrintInfo
MsgBox(Color: m_color vbNewLine Speed: m_speed, MsgBoxStyle.Information)
End Sub
End Class
在 Form 的 Load 事件中编写：
Dim myCar As New A_Car
myCar.PrintInfo()
运行之后就创建了一个 A_Car 类的实例 myCar，然后出现两个对话框，分别说明实例已经创建和汽车的信息。当窗体卸载时，这个类的实例 myCar 将自动销毁，这时将出现一个“I was deconstructed!”的对话框。
声明一个接口时,需要考虑以下几点：
1.接口主体只限于对方法,索引器以及属性的声明；
2.接口成员是隐式公开的,如果对其显式指定访问级别,就会出现编译器错误；
3.接口中不能包含字段,构造函数和常量等；
4.在接口中不能实现任何方法,属性或者索引器；
5.在指定方法时,只需要给出返回类型,名称和参数列表,然后分号结束。
面向对象的接口
在C++中，一个类被允许继承多个类。但是在Java以后的语言不被允许。
这样，如果想继承多个类时便非常困难。所以开发方想出了新办法：接口。
一个接口内，允许包含变量、常量等一个类所包含的基本内容。但是，接口中的函数不允许设定代码，也就意味着不能把程序入口放到接口里。由上可以理解到，接口是专门被继承的。接口存在的意义也是被继承。和C++里的抽象类里的纯虚函数是相同的。不能被实例化。
定义接口的关键字是interface，例如：
publicinterfaceMyInterface{
public void add(int x,int y);
public void volume(int x,int y,int z);
}
继承接口的关键字是implements，相当于继承类的extends。
需要注意的是，当继承一个接口时，接口里的所有函数必须全部被覆盖。例如：
class Demo implements MyInterface{
public void add(int x,int y){
System.out.println( +(x+y));
}
public void volume(int x,int y,int z){
System.out.println( +(x*y*z));
}
public static void main(String args[]){
Demo d=new Demo();
d.add(10,20);
d.volume(10,10,10);
}
}
输出结果：
30
1000
当想继承多个类时，开发程序不允许，报错。这样就要用到接口。因为接口允许多重继承(,)，而类不允许。所以就要用到接口。
在您的代码中，您已经成功使用了RegAsm命令将DLL注册为COM组件，并在VB6中成功引用了该组件的类型库文件（TLB文件）。此外，您还在VB6代码中声明了一个YCImageDo类型的对象，并成功创建了该对象。
但是，当您尝试使用YCImageDo对象的属性和方法时，却发现这些成员不可见。这可能是因为在编写DLL代码时您没有正确地声明这些成员的可见性。
在VB.NET中，您可以使用"Public"关键字来声明一个类型的成员（属性、方法、过程等）对外可见，而使用"Private"关键字则声明该成员仅在类型内可见。如果您希望YCImageDo类型的成员在VB6代码中可见，则应将这些成员声明为Public类型。
例如，如果您希望YCImageDo类型拥有一个名为"GetImage"的方法，则可以在DLL代码中按如下方式声明该方法：
Public Function GetImage() As String
' 在这里编写方法的代码
End Function
同样，如果您希望YCImageDo类型拥有一个名为"ImagePath"的属性，则可以在DLL代码中按如下方式声明该属性：
Public Property ImagePath As String
