Visual Basic

Dim nodeFound as TreeNode
For Each node As TreeNode In myTree.Nodes
  If node.Level = 0 Then 'Search only nodes that are on the first level
    If node.Text.Trim = strSearchText Then
      nodeFound = node
      Exit For
    End If
  End If
Next

If nodeFound IsNot Nothing Then
  myTree.SelectedNode = nodeFound
End If

Dim myFSO As Object
Dim f As Object

Set myFSO = CreateObject("Scripting.FileSystemObject")
Set f = myFSO.GetFile("c:\test.txt")
    
Debug.Print f.DateCreated