24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 570  |  回复: 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(13)+chr(10), 软回车是chr(10)
3楼2016-11-08 22:57:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

deephill

铁杆木虫 (职业作家)

【答案】应助回帖

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

另一个解决方法,读入的是一个字符串,你可以进行分割,vb中有个一个split 函数,可以进行分割转成数组。你再操作数组就随便啦。
2楼2016-11-08 22:53:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 考研调剂 +4 呼呼?~+123456 2026-03-21 4/200 2026-03-28 11:23 by gjlllb
[考研] 【求调剂】085601材料工程专硕 | 总分272 | +6 脚滑的守法公民 2026-03-27 6/300 2026-03-28 11:02 by gjlllb
[考研] 311求调剂 +8 lin0039 2026-03-26 8/400 2026-03-28 08:00 by Iveryant
[考研] 086502化学工程342求调剂 +6 阿姨复古不过 2026-03-27 6/300 2026-03-28 07:06 by wangy0907
[考研] 291求调剂 +7 孅華 2026-03-22 7/350 2026-03-28 04:02 by fmesaito
[考博] 26申博 +3 加油冲啊! 2026-03-26 3/150 2026-03-27 15:38 by cls512
[考研] 316求调剂 +5 Pigcasso 2026-03-24 5/250 2026-03-27 12:10 by zhshch
[考研] 考研调剂 +9 小蜡新笔 2026-03-26 9/450 2026-03-27 11:10 by 不吃魚的貓
[考研] 材料求调剂 +5 .m.. 2026-03-25 5/250 2026-03-27 11:08 by 不吃魚的貓
[考研] 325求调剂 +5 李嘉图·S·路 2026-03-23 5/250 2026-03-27 00:42 by wxiongid
[考研] 333求调剂 +7 87639 2026-03-21 12/600 2026-03-26 22:08 by 不吃魚的貓
[考研] 生物学学硕,一志愿湖南大学,初试成绩338 +4 YYYYYNNNNN 2026-03-26 4/200 2026-03-26 19:00 by macy2011
[考研] 340求调剂 +3 Amber00 2026-03-26 3/150 2026-03-26 18:57 by 不吃魚的貓
[考研] 085602化学工程求调剂。 +4 平乐乐乐 2026-03-26 4/200 2026-03-26 17:57 by fmesaito
[考研] 081700 调剂 267分 +11 迷人的哈哈 2026-03-23 11/550 2026-03-26 15:41 by zzll406
[考研] 309求调剂 +4 gajsj 2026-03-25 5/250 2026-03-26 00:27 by Dyhoer
[考研] 一志愿吉林大学材料与化工303分求调剂 +4 为学666 2026-03-24 4/200 2026-03-25 11:27 by BruceLiu320
[有机交流] 有机合成求助 20+3 FENGSHUJEI 2026-03-23 5/250 2026-03-24 19:31 by 88817753
[考研] 080500求调剂 +3 zzzzfan 2026-03-24 3/150 2026-03-24 16:38 by barlinike
[考研] 工科0856求调剂 +5 沐析汀汀 2026-03-21 5/250 2026-03-23 17:56 by 海瑟薇-
信息提示
请填处理意见