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

?

?

?

?