Visual Basic - CONOCER EL DIR DE WINDOWS !!!!!

Como puedo saber el directorio de Windows????
Por ejemplo en DOS solo se escribe:
C:\>cd %windir%
C:\Windows>

Me comprenden?????
Si alguien lo sabe favor contestar
o enviar respuesta a :
[email protected] - [email protected]

De antemano muchas gracias..!!!!

Para esto puedes utilizar una función de la API: GetWindowsDirectory. Te pongo un ejemplo:

En un módulo, declaras la función con este código:

Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Después, en el mismo módulo si quieres, te haces una función que te va a devolver el directorio de Windows:

Public Function DirectorioWindows() As String

Dim strDir As String * 255
Dim lngRes As Long

lngRes = GetWindowsDirectory(strDir, Len(strDir))
DirectorioWindows = Left(strDir, lngRes)

End Function

El resto, ya sabes:

ChDir DirectorioWindows ´Por ejemplo

Un saludo

Erik... muchas gracias me sirvio de maravilla ...!!!!!!!

Viva VB6....!!!