Visual Basic - CÓMO FORMATEAR DISKETTE DESDE VB6.0

ALGUIEN SABE CÓMO FORMATERA UN DISKETTE CONVISUAL BASIC?
YA HE ENCONTRADO PROGARAMAS PERO ÚNICAMENTE HACEN LA LLAMADA AL PROGRAMA QUE UTILIZA WINDOWS PARA FORMATEAR Y LO QUE REQUIERO ES QUE EL PROGRAMA LO HAGA COMPLETAMENTE, ES DECIR, QUE LA APLICACIÓN PUEDA MANIPULAR FÍSICAMENTE EL DISKETTE.

SI ALGUEN ME PUEDE AYUDAR, LE AGRADECERÉ INFORMACIÓN AQUÍ O A MI CORREO.

GRACIAS...

Private Declare Function SHFormatDrive Lib "shell32" (ByVal hwndOwner As Long, ByVal iDrive As Long, ByVal iCapacity As Long, ByVal iFormatType As Long) As Long

Private Sub Command1_Click()
SHFormatDrive Me.hWnd, 0, 0, 0
End Sub

Saludos