１．このコンピューター上で利用可能なドライ名を列挙する(29_Drv_01)　(旧、SampleNo.037)

１．Directory.GetLogicalDrives メソッドを使ってのドライブ名の列挙 ２．FileSystemProxy.Drives プロパティを使ってのドライブ名の列挙 ３．DriveInfo.GetDrives メソッドを使ってのドライブ名の列挙 ４．Environment.GetLogicalDrives メソッドを使ってのドライブ名の列挙 ５．WMIのWin32_LogicalDisk クラスを使ってのドライブ名の列挙 ６．

下記プログラムコードに関する補足・注意事項　 動作確認：Windows 8.1 (Windows 7) / VB2013 (VB2010) / Framework 4.5.1 / 対象の CPU：x86 Option　：[Compare Text] [Explicit On] [Infer On] [Strict On] Imports ：System.Management(WMI を使用する場合) 参照設定：System.Management(WMI を使用する場合)　　参照設定方法の参照 その他　： 　　　　： このサンプル等の内容を無断で転載、掲載、配布する事はお断りします。(私の修正・改訂・削除等が及ばなくなるので) 必要ならリンクをはるようにして下さい。(引用の場合は引用元のリンクを明記して下さい)

１．Directory.GetLogicalDrives メソッドを使ってのドライブ名の列挙

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '利用可能なドライブを列挙する     TextBox1.Text = ""     'GetDrives メソッド :コンピューター上のすべての論理ドライブのドライブ名を取得します。     For Each Drive As System.IO.DriveInfo In System.IO.DriveInfo.GetDrives()         TextBox1.Text &= Drive.Name & vbCrLf     Next End Sub 上記実行結果 ----- DriveInfo.GetDrives ---- C:\ D:\ E:\ F:\ G:\ H:\

２．FileSystemProxy.Drives プロパティを使ってのドライブ名の列挙

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '利用可能なドライブを列挙する     TextBox1.Text = ""     'Directory.GetLogicalDrives メソッド :このコンピューターの論理ドライブ名を "<drive letter>:\" の形式で取得します。     For Each Drive As String In System.IO.Directory.GetLogicalDrives()         TextBox1.Text &= Drive & vbCrLf     Next End Sub 上記実行結果 ----- Directory.GetLogicalDrives ---- C:\ D:\ E:\ F:\ G:\ H:\

３．DriveInfo.GetDrives メソッドを使ってのドライブ名の列挙

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '利用可能なドライブを列挙する     TextBox1.Text = ""     'FileSystemProxy.Drives プロパティ :利用可能なすべてのドライブ名の読み取り専用コレクションを返します。     For Each Drive As System.IO.DriveInfo In My.Computer.FileSystem.Drives()         TextBox1.Text &= Drive.Name & vbCrLf     Next End Sub 上記実行結果 ----- FileSystem.Drives ---- C:\ D:\ E:\ F:\ G:\ H:\

４．Environment.GetLogicalDrives メソッドを使ってのドライブ名の列挙

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '利用可能なドライブを列挙する     TextBox1.Text = ""     'Environment.GetLogicalDrives メソッド:現在のコンピューターの論理ドライブの名前を格納している文字列の配列を返します。     Dim drives() As String = Environment.GetLogicalDrives()     For Each Drive As String In drives         TextBox1.Text &= Drive & vbCrLf     Next End Sub 上記実行結果 ----- Environment.GetLogicalDrives ---- C:\ D:\ E:\ F:\ G:\ H:\

５．WMIのWin32_LogicalDisk クラスを使ってのドライブ名の列挙

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '利用可能なドライブを列挙する     TextBox1.Text = ""     'WMIのWin32_LogicalDisk クラス：論理ディスク情報を取得     Dim mc As New ManagementClass("Win32_LogicalDisk")     Dim moCollection As ManagementObjectCollection = mc.GetInstances()     For Each mo As ManagementObject In moCollection         TextBox1.Text &= mo("Caption").ToString & vbCrLf     Next End Sub 上記実行結果 ----- Win32_LogicalDisk ---- C: D: E: F: G: H:

６．

検索キーワード及びサンプルコードの別名(機能名)

ドライブ　Drive 　GetDrives メソッド　Directory.GetLogicalDrives メソッド　FileSystemProxy.Drives プロパティ　Environment.GetLogicalDrives メソッド WMIの Win32_LogicalDisk クラス　論理ディスク情報を取得