من فرض کردم شما با درختی مثل این کار می کنید:
کد:
+------parent1
| +----child11
| +----child12
|
+------parent2
| +----child21
| +----child22
|
+-----parent3
هر درخت فقط یک ریشه دارد مثلا در درخت بالا گره parent1 ریشه درخت است . parent2 و parent3 خواهرهای (sibling) گره parent1 هستند. پس اگر گره ای با گره ریشه خواهر باشد یک parent است. توجه کنید که گره ریشه با خودش خواهر است. چون اولین گره ای که ایجاد می شود ریشه است پس FirstSibling هر parent به ریشه اشاره می کند. اگر منظور شما را درست فهمیده باشم این تابع مشکل را حل می کند:
کد:
Function NodeType(myNode As Node) As String
If myNode.FirstSibling = myNode.Root Then
NodeType = "PARENT"
Exit Function
End If
NodeType = "CHILD"
End Function