Puedes hacerlo con environ...
(Esto devuelve el nombre de usuario de win)
Con esto accedes a las variables de sistema que aparecen al ingresar SET en una consola de ms-dos
Saludos
Código (vb) [Seleccionar]
MsgBox Environ("username")
(Esto devuelve el nombre de usuario de win)
Con esto accedes a las variables de sistema que aparecen al ingresar SET en una consola de ms-dos

Saludos