0
如何檢查某個對象是否屬於某個函數中的某種類型。這裏是我的代碼:是某種類型的對象
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)
只是一個小點:您正在創建一個新的對象(使用新的關鍵字),然後立即拋出的是新創建的對象路程,從返回的實例替換它OpenObjectFromFile。您可以通過在此代碼示例中省略New關鍵字來保存創建不必要的對象。只需使用這一行:'Dim ObjetToCheck As Object = OpenObjectFromFile(FileName)' –