摘要: 引有:http://bbs.blueidea.com/thread-1585191-1-1.htmlVB试试chr(13)&chr(10)或vbcrlf 阅读全文
posted @ 2011-12-06 14:40 镇水古月 阅读(763) 评论(0) 推荐(0) 编辑
摘要: 引用:http://topic.csdn.net/t/20060504/16/4730208.htmlOpen "f:\new.txt " For Input As #1Dim b As Stringb = StrConv(InputB(LOF(1), 1), vbUnicode)'open 打开文件的路径 for 打开方式(这里是读取,下面的是写入和创建) as 文件号Close #1'以上为读取文件,以下为写入文件Open "f:\new1.txt " For Output As #2Print #2, bClose #2MsgBox 阅读全文
posted @ 2011-12-06 10:48 镇水古月 阅读(353) 评论(0) 推荐(0) 编辑