作者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)