一个字符一个字符的判断，空格就删除，非空格就保留
顺德网站建设公司创新互联建站,顺德网站设计制作，有大型网站制作公司丰富经验。已为顺德数千家提供企业网站建设服务。企业网站搭建\外贸网站制作要多少钱，请找那个售后服务好的顺德做网站的公司定做！
一个字符一个字符的判断，空格就删除，非空格就保留
一个字符一个字符的判断，空格就删除，非空格就保留
一个字符一个字符的判断，空格就删除，非空格就保留
一个字符一个字符的判断，空格就删除，非空格就保留
一个字符一个字符的判断，空格就删除，非空格就保留
你是要把连续多个空格，变换成只需要一个空格，那么：
do while Instr(tStr," ")0
tStr = Replace(tStr, " ", " ") '用一个空格，替换2个空格
loop
思路与方法：
1，一行为读取单位，读取并保存到数组。
2，逆序循环，可以获得末尾空白行数。
3，以行为写单位，写入到文件。
