HasParent

From scripting
Revision as of 06:05, 22 April 2017 by Nickpisca (talk | contribs) (Created page with " Function HasParent(CurObj As Variant) As Boolean On Error GoTo Blast Dim NAParent Set NAParent = CurObj.Parent HasParent = True Exit Function Blast: HasParent = False...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search 
Function HasParent(CurObj As Variant) As Boolean
On Error GoTo Blast
Dim NAParent
Set NAParent = CurObj.Parent
HasParent = True
Exit Function
Blast:
HasParent = False
End Function
Retrieved from "http://nickpisca.com/BLAST/index.php?title=HasParent&oldid=157"