在VB.NET的类里，实现一个接口的语句是：
成都创新互联专业为企业提供亚东网站建设、亚东做网站、亚东网站设计、亚东网站制作等企业网站建设、网页设计与制作、亚东企业网站模板建站服务，10余年亚东做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
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
当想继承多个类时，开发程序不允许，报错。这样就要用到接口。因为接口允许多重继承(,)，而类不允许。所以就要用到接口。
可以的，把项目的类型设成类库，将所有的函数用Public修饰附封装在类里面，生成dll文件。这样别人就可以在别人项目属性的引用页里面添加对你的dll文件的引用，然后导入命名空间，直接使用悔逗猛了。
比如说，在一个项目里：
NameSpace Controller
Public Class ControlMachine
Public Sub Boot()
End Sub
Public Sub Shutdown()
End Sub
End Class
End NameSpace
进入另一个项目的项目属碧桥性，进入引用页，添加到那个dll文件的引用。在代码中：
Imports Controller '加在代码文档指物的最顶端
使用：
Dim controller As New ControlMachine
controller.Boot()
controller.Shutdown()
希望你能了解，不懂再追问
1 生成txt文件。
DimSaveFileDialog1AsNewSaveFileDialog() '创建一个保存对话框
SaveFileDialog1.Filter ="txt files (*.txt)|*.txt" '设置团升山扩展名
IfSaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OKThen '塌中如果确定保存
My.Computer.FileSystem.WriteAllText(SaveFileDialog1.Filename, Textbox1.Text,False) '保存文本,False表示笑含不追加文本，直接覆盖其内容
EndIf
原文链接：
C#下用信亏is判断
VB.NET下用培镇CType .. Is ..判断滑中神。
Printer is C330
TypeOf Printer Is C330
