作者Changsunche (长孙辙)
看板Visual_Basic
标题[VB6 ] 关於EOF(1)的解释
时间Thu Oct 8 20:36:54 2009
由於，最近老师指导说，
要学独txt档案以及输出txt档案，
所以给我了这样的程式码：
Private Sub Command1_Click()
Dim n1, n2 As Integer
Open "d:\00.txt" For Input As #1
Open "d:\01.txt" For Output As #2
Do While Not EOF(1)
Input #1, n1, n2
Print #2, n1, n2
Print n1, n2
Loop
Close #1 , #2
End Sub
'------------------------------------------------
对於几个地方有想请教的地方，
Input , Output , EOF(1)
重点这三个，不过说实话，对整组程式码解释不太了解，
只知道跑完之後，会怎样，
重点在於EOF(1)这个地方，完完全全不知道它是做什麽的。
----------------------------------------------------
想请各位对於VB有了解的，
可以的话逐字解释程式码。
谢谢>w<
**********************************************
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 125.228.228.17
1F：推 Y78:EOF(1) = 是否读到#1的档案结尾 10/08 21:10
2F：→ Changsunche:也就是说，如果我前面是拿#2当读档的，那就要输入2， 10/08 21:56
3F：→ Changsunche:是这个意思吗？ 10/08 21:56
4F：推 Y78:恩 没错 10/08 22:42
5F：→ Changsunche:谢谢你的解释。 10/09 00:11
6F：→ MOONRAKER:麻烦把<>和()的分别弄清楚再叫人「逐字解释」程式。 10/09 00:41
7F：推 jwjeng:EOF(1> 两边用不一样是什麽状况? 10/09 00:45
8F：→ Changsunche:喔，因为复制贴上不小心删除，编辑时候错误，已经编辑 10/09 00:54
9F：→ Changsunche:完毕。 10/09 00:54
※ 编辑: Changsunche 来自: 125.228.228.17 (10/09 00:57)