' Change the directory to %WINDIR%                            
Environment.CurrentDirectory = Environment.GetEnvironmentVariable("windir")
Dim info As New DirectoryInfo(".")
Console.WriteLine(("Directory Info:   " + info.FullName))        

        // Change the directory to %WINDIR%                            
        Environment.CurrentDirectory = Environment.GetEnvironmentVariable("windir");        
        DirectoryInfo info = new DirectoryInfo(".");
            lock(info)
            {      
            Console.WriteLine("Directory Info:   "+info.FullName);
            }

// Change the directory to %WINDIR%       
Environment::CurrentDirectory = Environment::GetEnvironmentVariable( "windir" );
DirectoryInfo^ info = gcnew DirectoryInfo( "." );
System::Threading::Monitor::Enter( info );
try
{
   Console::WriteLine( "Directory Info:   {0}", info->FullName );
}
finally
{
   System::Threading::Monitor::Exit( info );
}