「VB.NET」指定フォルダの存在チェックのサンプル

2021年9月17日

書式
Public Shared Function Exists (path As String) As Boolean
path が既存のディレクトリを参照している場合は true。ディレクトリが存在していない場合や、
指定したディレクトリが存在するかどうかを判断しようとしたときにエラーが発生した場合は false。
使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module Module1
Sub Main()
'指定ディレクトリの文字列型の宣言
Dim dirName As String = "C:\data\study\arkgame"
'指定ディレクトリの存在チェック
Dim flg As Boolean = System.IO.Directory.Exists(dirName)
If flg = True Then
Console.WriteLine("指定ディレクトリが存在します")
Else
Console.WriteLine("指定ディレクトリが存在しません")
'指定ディレクトリを作成
System.IO.Directory.CreateDirectory(dirName)
Console.WriteLine("指定ディレクトリを作成しました")
End If
Console.ReadKey()
End Sub
End Module
Module Module1 Sub Main() '指定ディレクトリの文字列型の宣言 Dim dirName As String = "C:\data\study\arkgame" '指定ディレクトリの存在チェック Dim flg As Boolean = System.IO.Directory.Exists(dirName) If flg = True Then Console.WriteLine("指定ディレクトリが存在します") Else Console.WriteLine("指定ディレクトリが存在しません") '指定ディレクトリを作成 System.IO.Directory.CreateDirectory(dirName) Console.WriteLine("指定ディレクトリを作成しました") End If Console.ReadKey() End Sub End Module
Module Module1

    Sub Main()

        '指定ディレクトリの文字列型の宣言
        Dim dirName As String = "C:\data\study\arkgame"
        '指定ディレクトリの存在チェック
        Dim flg As Boolean = System.IO.Directory.Exists(dirName)

        If flg = True Then
            Console.WriteLine("指定ディレクトリが存在します")
        Else
            Console.WriteLine("指定ディレクトリが存在しません")

            '指定ディレクトリを作成
            System.IO.Directory.CreateDirectory(dirName)

            Console.WriteLine("指定ディレクトリを作成しました")
        End If

        Console.ReadKey()

    End Sub



End Module

結果
指定ディレクトリが存在しません
指定ディレクトリを作成しました

VB.net

Posted by arkgame