ドライブタイプの取得

VB6,VBA,VBS,EXCEL,DOS,BAT,WSH,WORDの小技メモ

HTML/ CSS/ CGI-Perl/ JavaScript/ JavaApplet/ AccessUp/ Internet/ EnglishLearn/ ちゃいちゃん天使/ 天使メッセージ/ 飯田ワールド/ 結城ワールド/ プロフィール/ WEB相談室/ WEBアンテナ/ 燈明日記/ Perlノート/ 漢字起源/ yahoo

はじめに

本ページは、ウインドウズ系全般のティプスメモです。

そう、はじめはVB系のティプスメモだったのですが…いつの間にか、ウインドウズ系全般のティプスメモになってしまいました。

ちなみに、ティプス(Tips)とは、マニュアルに書かれていない技法や裏わざのことですが、本ページでは、私が経験してこれはと思ったノウハウのメモになっています。

尚、以下は本サイトの最新情報(ブログ)です。

それでは、本ページが何かのお役に立てれば幸いです。ごゆっくりご覧ください。

◆ ドライブタイプの取得

以下で、PCに実装されているドライブの種類を取得することが出来ます。

    Dim allDrives() As DriveInfo = DriveInfo.GetDrives()
    Dim d As DriveInfo
    For Each d In allDrives
        If d.IsReady = True And d.DriveType = DriveType.Fixed Then
           MsgBox(d.Name & "は、固定ディスクです。")
        End If
    Next

*ポイント解説

DriveInfoオブジェクトのGetDrives()メソッドで、実装されているすべてのドライブ情報が、ドライブ毎に配列に格納されて取得ができます。

配列の一つの要素は、一つのドライブ情報で、その中のDriveTypeプロパティでドライブタイプを取得することが出来ます。


*DriveType列挙体メンバ

参考:

http://msdn2.microsoft.com/ja-jp/library/system.io.drivetype(VS.80).aspx

おわりに

以下のページには、すべてのTIPSがあります。もしよろしければ、どうぞ!

尚、ご感想、ご意見、誤字、脱字、間違い等がありましたら遠慮なくVB-TIPS掲示板へご指摘ください。

人のよいところをどんどん見つけよう