用vb想实现如下图这样的功能怎么实现，求大神指点

.

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

您的目的是什么，想运行什么？