フォルダを作成する方法
◆概要
このページは、Visual Basic 6.0でフォルダを作成する方法について記載しています。
ファイルシステムオブジェクトのCreateFolder メソッドを使うことで、フォルダを作成できます。
◆Sample code
次の例は、アプリケーションのカレントフォルダにtestFolderというフォルダを作成します。
Private Sub Command1_Click() Dim objFileSystem As Object Dim strFolderName As String '作成するフォルダ strFolderName = App.Path & "\testFolder" Set objFileSystem = CreateObject("Scripting.FileSystemObject") 'フォルダを作成 objFileSystem.createFolder (strFolderName) 'オブジェクトを開放 Set objFileSystem = Nothing End Sub |
◆実行結果