.
Private Sub Command1_Click()
Dim sofen As String
sofen = Drive1.Drive + "/F"
Shell "cmd.exe /k " & CHKDSK & sofen
End Sub
总是出错,新手求指点
.
Private Sub Command1_Click()
Dim sofen As String
sofen = Drive1.Drive + "/F"
Shell "cmd.exe /k " & CHKDSK & sofen
End Sub
总是出错,新手求指点
CHKDSK变量没定义吧?chkdsk命令应该放到字符串吧?
Shell "cmd.exe /k CHKDSK" & sofen