有一个数据为TEST.DAT 里面有一个数据 0.06181100
用VB怎么样插入两个空格使用数据变成  0.0618  1100

解决方案 »

  1.   

    提供一个思路
    打开此文件infile,同时创建一个零时文件outfile
    按行查找你要修改的字符串,把要修改的修改掉写入新文件,其它的不动
        Do While Not EOF(infile)
            Line Input #infile, one_line
            If InStr(one_line, "0.06181100") = 0 Then
                Print #outfile, "0.0618 1100"
            Else
                Print #outfile, one_line
            End If
        Loop    Close infile
        Close outfile
        
        Kill 原文件    
        Name 临时文件 As 原文件名
      

  2.   

    问题是TEST.DAT不是我编写的数据,不能直接加Space(2), 只能是用
    Open "c:\TEST.DAT" For Input As #1
    Line Input #1, strA
    Close #1
    现在要做是如何将strA分成两个数据