在VB.NET的類里，實(shí)現(xiàn)一個(gè)接口的語句是：
成都創(chuàng)新互聯(lián)專業(yè)為企業(yè)提供亞東網(wǎng)站建設(shè)、亞東做網(wǎng)站、亞東網(wǎng)站設(shè)計(jì)、亞東網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計(jì)與制作、亞東企業(yè)網(wǎng)站模板建站服務(wù)，10余年亞東做網(wǎng)站經(jīng)驗(yàn)，不只是建網(wǎng)站，更提供有價(jià)值的思路和整體網(wǎng)絡(luò)服務(wù)。
implements接口名稱
例如，下面定義一個(gè)車（總稱）的接口，這里的車是各種車的總稱：
Public Interface ICar
Property color() As String
Property speed() As Long
Sub PrintInfo()
End Interface
然后在不同類型的“車”類里實(shí)現(xiàn)它：
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()
運(yùn)行之后就創(chuàng)建了一個(gè) A_Car 類的實(shí)例 myCar，然后出現(xiàn)兩個(gè)對(duì)話框，分別說明實(shí)例已經(jīng)創(chuàng)建和汽車的信息。當(dāng)窗體卸載時(shí)，這個(gè)類的實(shí)例 myCar 將自動(dòng)銷毀，這時(shí)將出現(xiàn)一個(gè)“I was deconstructed!”的對(duì)話框。
聲明一個(gè)接口時(shí),需春饑要考慮以下幾點(diǎn)：
1.接口主體只限于對(duì)方法,索引器以及屬性的伍森前聲明；
2.接口成員是隱式公開的,如果對(duì)其顯式指定訪問級(jí)別,就會(huì)出現(xiàn)編譯器錯(cuò)誤；
3.接口中不能包含字段,構(gòu)造函數(shù)和常量等；
4.在接口中不能實(shí)現(xiàn)任何方法,屬性或者索引器；
5.在指定方法時(shí),只需要給出返回類型,名稱和參數(shù)列表,然后分號(hào)結(jié)束。
面向?qū)ο蟮慕涌?/p>
在C++中，一個(gè)類被允許繼承多個(gè)類。但是在Java以后的語言不被允許。
這樣，如果想繼承多個(gè)類時(shí)便非常困難。所以開發(fā)方想出了新辦法：接口。
一個(gè)接口內(nèi)，允許包含變量、常量等一個(gè)類所包含的基本內(nèi)容。但是，接口中的函數(shù)不允許設(shè)定代碼，也就意味著不能把程序入口放到接口里。由上可以理解到，接口是專門被繼承的。接口存在的意義也是被繼承。和C++里的抽象類里的純虛函數(shù)是相同的。不能被實(shí)例化。
定義接口的關(guān)鍵字是interface，例如：
publicinterfaceMyInterface{
public void add(int x,int y);
public void volume(int x,int y,int z);
}
繼承接口的關(guān)鍵字是implements，相當(dāng)于繼承類的腔清e(cuò)xtends。
需要注意的是，當(dāng)繼承一個(gè)接口時(shí)，接口里的所有函數(shù)必須全部被覆蓋。例如：
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);
}
}
輸出結(jié)果：
30
1000
當(dāng)想繼承多個(gè)類時(shí)，開發(fā)程序不允許，報(bào)錯(cuò)。這樣就要用到接口。因?yàn)榻涌谠试S多重繼承(,)，而類不允許。所以就要用到接口。
可以的，把項(xiàng)目的類型設(shè)成類庫，將所有的函數(shù)用Public修飾附封裝在類里面，生成dll文件。這樣別人就可以在別人項(xiàng)目屬性的引用頁里面添加對(duì)你的dll文件的引用，然后導(dǎo)入命名空間，直接使用悔逗猛了。
比如說，在一個(gè)項(xiàng)目里：
NameSpace Controller
Public Class ControlMachine
Public Sub Boot()
End Sub
Public Sub Shutdown()
End Sub
End Class
End NameSpace
進(jìn)入另一個(gè)項(xiàng)目的項(xiàng)目屬碧橋性，進(jìn)入引用頁，添加到那個(gè)dll文件的引用。在代碼中：
Imports Controller '加在代碼文檔指物的最頂端
使用：
Dim controller As New ControlMachine
controller.Boot()
controller.Shutdown()
希望你能了解，不懂再追問
1 生成txt文件。
DimSaveFileDialog1AsNewSaveFileDialog()?'創(chuàng)建一個(gè)保存對(duì)話框
SaveFileDialog1.Filter?="txt?files?(*.txt)|*.txt"?'設(shè)置團(tuán)升山擴(kuò)展名
IfSaveFileDialog1.ShowDialog()?=?System.Windows.Forms.DialogResult.OKThen?'塌中如果確定保存
My.Computer.FileSystem.WriteAllText(SaveFileDialog1.Filename,?Textbox1.Text,False)?'保存文本,False表示笑含不追加文本，直接覆蓋其內(nèi)容
EndIf
原文鏈接：
C#下用信虧is判斷
VB.NET下用培鎮(zhèn)CType .. Is ..判斷滑中神。
Printer is C330
TypeOf Printer Is C330
重慶分公司
重慶分公司
