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