Example - ChDrive Statement

Sub Main ()
    Dim Msg, NL                                                   ' Declare variables.
    NL = Chr(10)                                                  ' Define newline.
    CurPath = CurDir()                                            ' Get current path.
    ChDir "\"
    ChDrive "C:"
    Msg = "The current directory has been changed to "
    Msg = Msg & CurDir() & NL & NL & "Press OK to change back "
    Msg = Msg & "to your previous default directory."
    MsgBox Msg                                                    ' Get user response.
    ChDir CurPath                                                 ' Change back to user default.
    Msg = "Directory changed back to " & CurPath & "."
    MsgBox Msg                                                    ' Display results.
End Sub

More:

ChDir

CurDir

CurDir$

MkDir

RmDir