vb 怎样删除一个文件夹中所有txt文本文件的最后一行?

Question

vb程序所有目录“App.Path & "aaa”中有若干个txt格式的文本文件，这些文件在最后一行都出现乱符。所以想统一把这些文件的最行一行删除。怎样做到？
更正：vb程序所在目录aaa（即：“App.Path & "aaa”）中有若干个txt格式的文本文件，这些文件在最后一行都出现乱符。所以想统一把这些文件的最行一行删除。怎样做到？

Answer 1

一、先检索列出txt的文件列表；
二、根据txt文件列表，将第一个txt文件除了最后一行读入text，删除原来txt文件，新建txt文件将text写入txt。
三、多次执行步骤二即可完成。
当然这都是比较基础的vb算法，还有数据库什么的我也了解的比较少。