Cómo asignar permisos a carpetas creadas por vb.net

Ejemplo:

Primero introduzca el espacio de nombres: Imports?System.IO

Imports?System.Security.AccessControl

Código: Dim ?seg?As?DirectorySecurity=? ¿Nuevo? DirectorySecurity

¿Atenuado? ¿regla? ¿Como? FileSystemAccessRule=? ¿Nuevo? FileSystemAccessRule("Administrador",?FileSystemRights.Delete,?AccessControlType.Allow)

seg.AddAccessRule(regla)

Directorio.CreateDirectory("C:\test",?seg)

Este código creará una carpeta de prueba en C:\ bajo la cuenta de administrador.