MyClass
Fornece uma maneira de fazer referência aos membros de instância classe corrente sem substituí-los por overrides de classe derivados.
Comentários
The MyClass palavra-chave se comporta sistema autônomo uma variável de objeto referir-se a instância corrente de uma classe sistema autônomo originalmente implementada. MyClass é semelhante a Me, mas cada método e propriedade ligar MyClass é tratado sistema autônomo se fosse o método ou propriedade NotOverridable. Portanto, o método ou propriedade não é afetado por substituição numa classe derivada.O exemplo a seguir compara Me e MyClass.
Class baseClass
Public Overridable Sub testMethod()
MsgBox("Base class string")
End Sub
Public Sub useMe()
' The following call uses the calling class's version, even if
' that version is an override.
Me.testMethod()
End Sub
Public Sub useMyClass()
' The following call uses this version and not any override.
MyClass.testMethod()
End Sub
End Class
Class derivedClass : Inherits baseClass
Public Overrides Sub testMethod()
MsgBox("Derived class string")
End Sub
End Class
Class testClasses
Sub startHere()
Dim testObj As derivedClass = New derivedClass()
' The following call displays "Derived class string".
testObj.useMe()
' The following call displays "Base class string".
testObj.useMyClass()
End Sub
End Class
Mesmo se derivedClass substitui testMethod, a palavra-chave MyClass na useMyClass anula os efeitos da substituição, e o compilador defina a chamada à versão da classe base de testMethod.
Você não pode usar MyClass num método Compartilhamento (Visual Basic), mas você pode usá-la num método de instância para acessar um membro compartilhado de uma classe.