メニュー

IF文
FOR文
Usingステートメント

ArrayListを利用
IEnumerableを実装
Dictionaryを利用
StringDictionaryを利用
Stack(スタック)
Queue(キュー)
Generic List

小文字⇔大文字の変換
文字列をある文字列で分割

日付関係
現在日付と時刻の取得
明日、来月の日付の取得
月末の日付の取得
日付チェック

ファイル関係
ファイル選択ダイアログ
ファイル読み込み
CSVファイル読み込み
XmlSerializerを利用
GZip圧縮
ファイル情報の取得
フォルダ配下のファイル情報取得

MySQLに接続
ADO.NetでSQLServerに接続

スレッドを作成
ManagementObjectSearcherを利用

ドライブ情報を取得
Webリクエスト送信

フォーム関係
チェックボックス
メニューバーの作成
DataGridViewのDataSourceに配置
Timerコントロール
タスクバーにアイコンを表示
プログレスバーを表示
閉じるボタンの処理
透過度の変更
ListBoxにドラック&ドロップ
WebBrowserコントロール
コントロールをマウスで移動
MDIアプリケーション
フォームに線を引く

正規表現
「^」について
「$」について
「+」について
「*」について
「.」について
「|」について
「{n}」について
「{n,m}」について
「[]」について

トップ
E-Mail
xml

ASP.Netのお勉強
ASP.Netで掲示板を作成しよう
Excel マクロ・VBAのお勉強
PHPのお勉強
AJAXのお勉強
Webデザインのお勉強
Javaのお勉強
連想書籍検索
世界の観光地検索
路線図
総合サイトCocoaLiz
ドライブ情報を取得@VB.Net

ドライブ情報を取得します。
DriveInfoにより、ドライブ情報にアクセスできます。

ドライブ(A~Z)を指定して、DriveInfoを生成します。
生成したオブジェクトを利用して、各種ドライブ情報を取得します。

IsReadyにて、ドライブが準備できているかが分かります。
CD-ROMの準備ができているのかが分かります。

また、全てのドライブ情報を取得したい場合は、
DriveInfoのGetDrivesにより、DriveInfoの配列を取得できます。


'Cドライブの情報取得
Dim drive As DriveInfo = New DriveInfo("C")
Console.WriteLine("Cドライブの情報")
Console.WriteLine("ドライブ名:" + drive.Name)
Console.WriteLine(" タイプ:" + drive.DriveType.ToString())

If drive.IsReady Then
    Console.WriteLine(" ファイルシステム:" + drive.DriveFormat)
    Console.WriteLine(" 容量:" + drive.TotalSize.ToString())
    Console.WriteLine(" 空き容量:" + drive.TotalFreeSpace.ToString())
    Console.WriteLine(" ユーザが使用できる空き容量:" + drive.AvailableFreeSpace.ToString())
End If
Console.WriteLine("")


'全てのドライブの情報を取得
Dim drives() As DriveInfo = System.IO.DriveInfo.GetDrives()

Console.WriteLine("全てのドライブの情報")
For Each drive In drives
    Console.WriteLine("ドライブ名:" + drive.Name)
    Console.WriteLine(" タイプ:" + drive.DriveType.ToString())

    If drive.IsReady Then
        Console.WriteLine(" ファイルシステム:" + drive.DriveFormat)
        Console.WriteLine(" 容量:" + drive.TotalSize.ToString())
        Console.WriteLine(" 空き容量:" + drive.TotalFreeSpace.ToString())
        Console.WriteLine(" ユーザが使用できる空き容量:" + drive.AvailableFreeSpace.ToString())
    End If
Next




Copyright (C) 2008 VB.Netのお勉強. All Rights Reserved.