VB中怎么判断某个类是否实现了某个接口

VB中如何判断某个类是否实现了某个接口

在这里记录下,实在有些对不起JavaEye了,在Java里轻松完成的事情,在VB中我找了半天也不知道是何语法,因为接手负责一个VB的遗留项目想到用动态接口实现,结果在这上卡了壳。知道了就简单了,直接给出语法:TypeOf [ObjectVariableName] Is [InterfaceName],例如: 

 

Class Employee

    Implements Person

    Implements Workable

    Implements ...

 

Dim objEmployee as Employee

 

If TypeOf objEmployee Is Person Then

...

Else

        ...

End If