是某种类型的对象

Question

如何检查某个对象在函数中是否属于某种类型。这是我的代码：

Public Function IsSerializedObjectAValidObjectType(Of ObjectType)(FileName As String) As Boolean
    Dim ObjectToCheck As New Object
    ObjectToCheck = OpenObjectFromFile(FileName)
    Return ObjectToCheck.GetType Is ObjectType
End Function

以下代码从文件中获取对象。

ObjectToCheck = OpenObjectFromFile(FileName)

Answer 1

试试这个：

Public Function IsSerializedObjectAValidObjectType(Of T)(FileName As String) As Boolean
      Dim ObjectToCheck As New Object
      ObjectToCheck = OpenObjectFromFile(FileName)
      Return TypeOf ObjectToCheck.GetType Is T
End Function