我利用kill语句写出"kill app.path + '*.txt'",运行时出错,
请问各位那么如何调用VB语句,才能删除当前路径或是某一个文件夹下面,所有后缀为".txt"的文件呢?
谢过!

[[it] 本帖最后由 fantasy_spz 于 2008-9-30 21:12 编辑 [/it]]

字符串连接不推荐用加号。

这样，你试试，获取一个目录下文件列表。可以一个一个得到，没关系的，比如有一个叫做Dir的函数，给他一个路径，他给出路径下的第一个文件路径；给他一个文件路径，他给出下一个文件路径。

最简单调用CMD del

请问各位那么[bo]如何调用VB语句[/bo],才能删除当前路径或是某一个文件夹下面,所有后缀为".txt"的文件呢?

人家就是问VB语句……

shell "del " & "路径" & "*.txt"
这算是标准的VB语句吧 哈哈

核心不是，而且难说效率高还是低

用上幾個Dir1控件就可以啊

我用语句 :Shell "del" & App.Path & "*.txt"
怎么不行呀,一运行就出错!

叫你偷懒。很显然del后面少了空格

Shell "cmd /c del " & IIf(Len(App.Path)=3,App.Path,App.Path & "\") & "*.txt"

搞定了,是我的疏忽,
使用"kill app.path + '\*.txt'"语句即可,我开始时忘了在*.txt前面加一个表示路径的斜线了,麻烦大家了,谢谢大家的帮忙.
语句Shell "cmd /c del " & IIf(Len(App.Path) = 3, App.Path, App.Path & "\") & "*.txt"
也很好用,运行都很顺畅,就是不太理解"cmd /c del " & IIf(Len(App.Path) = 3, App.Path, App.Path & "\") 语句的含义!

[[it] 本帖最后由 fantasy_spz 于 2008-9-30 09:35 编辑 [/it]]