カレントフォルダを変更する方法

◆概要


このページは、Visual Basic 6.0でカレントフォルダを変更する方法について記載しています。


カレントフォルダを変更するには、ChDir 関数を使用します。

◆Sample code


次の例は、カレントフォルダを取得したのち、カレントフォルダをC:\Program Filesに変更します。そのあとで、カレントフォルダをメッセージボックスに表示します。 

Private Sub Command1_Click()
     Dim strCurrentFolder As String
    
    'カレントフォルダをCドライブにする
    ChDir ("C:\")
    
    'カレントフォルダを取得
    strCurrentFolder = CurDir
    
    '現在のカレントフォルダ表示する。
    MsgBox "カレントフォルダは、" + strCurrentFolder + "です。" _
        + vbNewLine + "カレントフォルダをProgram Filesに変更します。"
    
    'カレントフォルダを変更する
    ChDir ("\Program Files")

    'カレントフォルダを取得
    strCurrentFolder = CurDir
    
    '現在のカレントフォルダ表示する。
    MsgBox "カレントフォルダは、" + strCurrentFolder + "です。"
    
End Sub
　　

◆実行結果


最初のメッセージボックス

最後のメッセージボックス



▼ページトップへ