Pegar Diretorios Pocket PC VB.Net

// diretorio raiz
DirectoryInfo dir = new DirectoryInfo(@"C:\Meus Documentos\Teste");
           
// no raiz
TreeNode noRaiz = new TreeNode(dir.FullName);           

// lista diretorios a partir do no raiz
ListaDiretorios(dir, noRaiz);
          
// adiciona os nos à TreeView
treeView1.Nodes.Add(noRaiz);

// METODO RECURSIVO PARA LISTA DIRETORIOS E SUB-DIRETORIOS
private void ListaDiretorios(DirectoryInfo diretorioPai, TreeNode noPai)
{             
       // para cada sub-diretorio
       foreach(DirectoryInfo dir in diretorioPai.GetDirectories())
      {                       
            // adiciona diretorio ao no corrente
            noPai.Nodes.Add(dir.Name);   
           
            // lista diretorios do diretorio corrente
            ListaDiretorios(dir, noPai.LastNode);                          
       }                     
}

veja se não fica lento se os diretorios estiverem muito cheios