vb.net的接口定义及使用

  对于接口和对象等的使用在这里就不重复说了，只是保留一下vb.net中接口怎样定义及使用。

  vb.net接口的定义列子：

Public Interface RealPrint

    Sub startPrint(ByRef p As Printer)

    Sub endPrint()

    Sub print(ByRef msg As String)

    Sub testPrinter(ByRef p As Printer)

End Interface

  如果有属性一类的需要在接口中定义的话，那么加入：ReadOnly Property Count() As Integer

前面的readonly也可以设置为可写的等（Property 语句可以具有 Default、ReadOnly 或 WriteOnly 修饰符）。

  实现接口的例子如下：

Public Class RealPrintWindowsLtp : Implements RealPrint

    Private handleValue As Microsoft.Win32.SafeHandles.SafeFileHandle = Nothing

    Private fs As FileStream

    Private sw As StreamWriter

    Sub startPrint(ByRef p As Printer) Implements RealPrint.startPrint

      '你的代码

    End Sub

    Sub endPrint() Implements RealPrint.endPrint

      '你的代码

    End Sub

    Sub print(ByRef msg As String) Implements RealPrint.print

      '你的代码

    End Sub

    Sub testPrinter(ByRef p As Printer) Implements RealPrint.testPrinter

       '你的代码

    End Sub

End Class

    我们在使用接口时：

Dim wifiprinter As New RealPrintWifi

dim printerobj as Printer = wifiprinter