VB中，按扭删除text1控件中的文件路径下的所有文件，就是把文件路径复制到text1中点击按扭就可以删除的

1楼说的那个提示找不到文件出错“删除文件路径下的所有“文件”还包括“文件夹”的”... 1楼说的那个提示找不到文件出错
“删除文件路径下的所有“文件”还包括“文件夹”的” 展开

 我来答

2个回答

tianjinfan2
2010-11-30 · TA获得超过280个赞

知道小有建树答主

回答量：129

采纳率：0%

帮助的人：89.2万

关注

展开全部

Private Sub Command1_Click()
Kill (Text1.Text + "\*.*")
End Sub

本回答由提问者推荐

已赞过 已踩过<

评论收起

yangyingjun999
2010-11-30 · TA获得超过1230个赞

知道小有建树答主

回答量：782

采纳率：0%

帮助的人：413万

关注

展开全部

Private Sub Command1_Click()
if Right(Text1.Text,1)="\" then
Kill (Text1.Text & "*.*")
else
Kill (Text1.Text & "\*.*")
end if
msgbox "已经删除成功"
End Sub

已赞过 已踩过<

评论收起

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

为你推荐：