TOP > カテゴリ > Visual Basic >

「FDをフォーマット」ダイアログを表示する

「FDをフォーマット」ダイアログを表示するサンプルです。

サンプルの実行画面

ソースコード

[SHFormatDrive.frm]

'SHFormatDrive　＝＞フロッピーディスクをフォーマットする

'＜引数＞
'hWnd:      ウインドウのハンドル
'nDrive：   ドライブを指定（Aドライブは0,Bドライブは1..)
'nID：       0
'dwFlag：   定数（SHFMT_××参照）


Private Declare Function SHFormatDrive Lib "SHELL32" (ByVal hWnd As Long, ByVal nDrive As Long, ByVal nID As Long, ByVal dwFlag As Long) As Long


Const SHFMT_OPT_FULL = 1 'フルフォーマット
Const SHFMT_OPT_QUICK = 0 'クイックフォーマット

Private Sub Command1_Click()
  Dim Ret As Long
    Ret = SHFormatDrive(Form1.hWnd, 0, 0, SHFMT_OPT_FULL)
End Sub

ソースコード一式のダウンロード

vbapi_shformatdrive.zip 824 バイト (824 バイト)

このサンプルの動作環境について

このサンプルは 「Windows98」及び「Microsoft Visual Basic 5.0 Professional Edition」で確認しております。環境が異なる場合は正常に動作しない場合もございますのでご了承下さい。





関連記事


前の記事：ドライブの種類を取得する
次の記事：ファイルをコピーする

公開日：2015年03月04日
記事NO：00334