به نظر شما این کد چه مشکلی داره؟

Dim oObj As New cSimpleClass

Set oObj = Nothing

If oObj Is Nothing Then
.
.
.
.
End If