VB如何将一个内容为字符类型的文件,在每两个字节之后增加1个空格呢?
例如文件的内容为FFD8FFE0...,转换之后格式变为FFD8FFE0...,文件的内容很大,怎样处理好呢?谢谢~将转换后的内容存入另一个文件中,源文件为txt格式的。...
例如文件的内容为FFD8FFE0...,转换之后格式变为FF D8 FF E0 ...,文件的内容很大,怎样处理好呢?谢谢~
将转换后的内容存入另一个文件中,源文件为txt格式的。 展开
将转换后的内容存入另一个文件中,源文件为txt格式的。 展开
2个回答
展开全部
Open "c:\###119Hex.txt" For Binary As #8
If Dir("c:\###110Hex.txt") <> "" Then Kill "c:\###110Hex.txt"
Open "c:\###110Hex.txt" For Binary As #9
Do Until EOF(8)
a1 = a1 & Input(2, #8)
a1 = a1 & " "
Loop
Put #9, , a1
Close #8
Close #9
If Dir("c:\###110Hex.txt") <> "" Then Kill "c:\###110Hex.txt"
Open "c:\###110Hex.txt" For Binary As #9
Do Until EOF(8)
a1 = a1 & Input(2, #8)
a1 = a1 & " "
Loop
Put #9, , a1
Close #8
Close #9
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询