24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 569  |  回复: 2

亡国使徒

新虫 (初入文坛)

[求助] VB读写文件问题,求各路大神帮忙 已有1人参与

用notepad打开一个文件后,用line input语言读取成字符串,为什么结果是把所有的内容读成了一个字符数,不应该是只读取一行的吗?
原文件打开后见图片:
代码如下:
Private Sub Command1_Click()
Dim LineStr As String
Open "F:\试验体.kml" For Input As #1
      Do While Not EOF(1)
           Line Input #1, LineStr
                 Open "f:\1.txt" For Append As #2
                 Print #2, LineStr
                 Close #2
        Loop
Close #1
End Sub

VB读写文件问题,求各路大神帮忙
360反馈意见截图16400301336671.png
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

【答案】应助回帖

原因可能是你的行不是真的,末尾的回车符不是chr(10)+chr(13), 可能是单独的chr(13) ,lineinput 读取不能当不同的行。

另一个解决方法,读入的是一个字符串,你可以进行分割,vb中有个一个split 函数,可以进行分割转成数组。你再操作数组就随便啦。
2楼2016-11-08 22:53:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

【答案】应助回帖

硬回车是 chr(13)+chr(10), 软回车是chr(10)
3楼2016-11-08 22:57:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 学员QgE3nq 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 295材料工程专硕求调剂 +6 1428151015 2026-03-27 6/300 2026-03-28 03:51 by fmesaito
[考研] 266求调剂 +11 阳阳哇塞 2026-03-27 12/600 2026-03-27 17:56 by yu221
[考研] 0703化学 +6 妮妮ninicgb 2026-03-27 6/300 2026-03-27 17:18 by shangxh
[考研] 298调剂 +3 jiyingjie123 2026-03-27 3/150 2026-03-27 11:57 by wxiongid
[考研] 334求调剂 +3 雨清天晴 2026-03-21 3/150 2026-03-27 11:30 by 不吃魚的貓
[考研] 324求调剂 +8 hanamiko 2026-03-26 10/500 2026-03-27 08:06 by hypershenger
[考研] 342求调剂 +3 加油a李zs 2026-03-26 3/150 2026-03-27 00:29 by wxiongid
[考研] 一志愿北化求调剂 +3 Jsman 2026-03-22 3/150 2026-03-26 21:06 by ajpv风雷
[考研] 321求调剂 +5 材料cailiao 2026-03-21 5/250 2026-03-26 20:41 by fmesaito
[考研] 化学工程085602 305分求调剂 +17 RichLi_ 2026-03-25 17/850 2026-03-26 19:44 by plmuchong
[考研] 资源与环境 调剂申请(333分) +9 holy J 2026-03-21 9/450 2026-03-26 15:47 by 161765490
[考研] 调剂310 +3 温柔的晚安 2026-03-25 4/200 2026-03-25 23:16 by peike
[考研] 材料与化工328分调剂 +6 。,。,。,。i 2026-03-23 6/300 2026-03-25 22:30 by 418490947
[考研] 【2026考研调剂】制药工程 284分 求相关专业调剂名额 +4 袁奂奂 2026-03-25 8/400 2026-03-25 14:32 by lbsjt
[考研] 289材料与化工(085600)B区求调剂 +4 这么名字咋样 2026-03-22 5/250 2026-03-25 08:20 by mx.yue
[考研] 食品专硕 一志愿双一流 328 +3 xiaom99 2026-03-21 4/200 2026-03-24 21:20 by lailaisimei
[有机交流] 有机合成求助 20+3 FENGSHUJEI 2026-03-23 5/250 2026-03-24 19:31 by 88817753
[考研] 341求调剂(一志愿湖南大学070300) +5 番茄头--- 2026-03-22 6/300 2026-03-23 23:45 by Txy@872106
[考研] 070300,一志愿北航320求调剂 +3 Jerry0216 2026-03-22 5/250 2026-03-23 09:16 by 。。堂堂
[考研] 考研调剂 +3 呼呼?~+123456 2026-03-21 3/150 2026-03-21 20:04 by 无际的草原
信息提示
请填处理意见