2

私は次のインターフェースとクラスを持っています

Public Interface IMyInterface
    Sub GenericImplementation()
End Interface

Public Class MyClass
    Implements IMyInterface

    Public Sub GenericImplementation() implements IMyInterface.GenericImplementation
        'doing some stuff
    end Sub

    Public Sub DoRefresh()
        'doing some stuff
    End Sub
End Class

今、インターフェイスとして渡されたオブジェクトが具象型であるかどうかを確認して実行するコードがいくつかありMyClassますDoRefresh()

Public Sub TestMethod(testObject As IMyInterface)
    Dim test = TryCast(testObject, MyClass)
    If test IsNot Nothing Then
        test.DoRefresh()
    End If
End Sub

コードをデバッグしていると、インターフェイスのインスタンスが「MyClass」であることがはっきりとわかります。しかし、これをTryCastすると何も返されません。

4

0 に答える 0