ディスクのフォーマット

＜ダイアログを表示しフロッピーをフォーマット＞

宣言（準備としてまず次のMciSendStringの宣言を追加します）

(Private) Declare Function SHFormatDrive Lib "SHELL32" (ByVal hWnd&, ByVal Drive&, ByVal fmtID&, ByVal opt&) As Long

※Privateは必要に応じて削除またはPublicに変更

引 数 説 明

hWnd	Long(HWND)	呼び出すウィンドウのウィンドウハンドル
Drive	Long	フォーマットするドライブ（Ａなら０、Ｂなら１・・・）
fmtID	Long	0に指定
Option	Long	フォーマット時のオプション（以下） 0 クイックフォーマット 1 通常のフォーマット 2 システムファイルの転送（起動ディスク）

返 り 値 説 明

-1	エラーが発生
-2	ユーザーによって処理が中断された
-3	ディスクがフォーマットされていない（クイックフォーマットの場合に発生）

サ ン プ ル プ ロ グ ラ ム

コードを張りつけ実行するとフォーマットダイアログボックスを表示しＡドライブのフォーマットを行います。ディスクが入ってない場合もダイアログは表示されます。

動作確認：Visual Basic 5.0,Windows98