界面

执行界面

就象在VB6中,执行一个界面是通过使用Implements关键字来实现的:

Public Class TheClass 
  Implements MyInterface 
End Class

但是在VB6和VB.NET中还是有点区别的。在VB6中,我们执行不同的界面元素是设置为Private方法的。这些方法不直观并且容易使程序员感到困惑。而在VB.NET提供了一个清晰的、简便的语法来执行界面,它的实现是通过应用Implements关键字来完成的。

我们可以在类中简单地标记一个方法作为界面中的特殊方法的执行:

Public Sub MyMethod() Implements MyInterface.MyMethod

这样为了执行我们本例子的界面,我们必须编写以下代码:

Public Class TheClass
  Implements MyInterface
Public Event MyEvent() Implements MyInterface.MyEvent
 
Public Function MyFunction(ByVal Param1 As Integer) _
As System.Integer Implements OOlib.MyInterface.MyFunction
 
End Function
 
Public Sub MyMethod() Implements OOlib.MyInterface.MyMethod
 
End Sub
 
Public Property MyProperty() As String _
Implements OOlib.MyInterface.MyProperty
  Get
 
  End Get
  Set
 
  End Set
End Property 
End Class

不象在VB6中,当我们执行界面的时候,我们必须执行界面中的所有元素,包括事件、方法以及属性等等。我们可以通过这个界面来创建客户代码以处理我们的对象:

Dim obj As MyInterface
 
obj = New Implementer()
obj.MyMethod

而VB6中执行界面中的一个方法需要编写如下的代码:

 

Private Sub MyInterface_MyMethod()
  (此处是执行的代码)
End Sub