List folder permission

[beerora]

Hello,

How do I list out the folder's permission on security tab?

Dim fs As FileSecurity
Dim fp As PermissionState
s = System.IO.Directory.GetDirectories("c:\test")

Dim di As DirectoryInfo = New DirectoryInfo("c:\test")
Dim ds As DirectorySecurity = di.GetAccessControl()
........
........

I have declared the variables in above code but dont know how to
enumerate the access control.
Pls show me the correct path.

Thanks

Cheers