輸入超出文件尾什麼意思

1. vb 運行時錯誤 '62' 輸入超過文件尾

1、打開VB6.0，新建一個工程，在窗體中添加一個命令按鈕，caption分別改為「調用函數」，將窗體Form1的caption屬性改為「VB6.0自定義函數」。

2. VB輸入超出文件尾

Dim ExitWhile As Boolean
ReDim t(g, g)
Open Path & "/原始阻抗矩陣.txt" For Input As #2
For i = 1 To g
For j = 1 To g
If Not EOF(2) Then
Input #2, a
t(i, j) = a
Else
ExitWhile = True
Exit For
End If
Next
If ExitWhile Then Exit For
Next
Close

Open Path & "/PA矩陣.txt" For Input As #1
ReDim pa(h, h)
ExitWhile = False
For i = 1 To h
For j = 1 To h
If Not EOF(1) Then
Input #1, b
pa(i, j) = b
Else
ExitWhile = True
Exit For
End If
Next
If ExitWhile Then Exit For
Next
Close
'Input #1, b '這里超出文件尾是因為執行「Do While Not EOF(1)」時並沒有超出，而另一循環體卻不止一次的讀取數據，由於循環未結束而無法返回「Do While Not EOF(1)」判斷文件尾，所以極易發生超出文件尾的錯誤

3. vb運行時提示 實時錯誤'62' 輸入超出尾文件

可能存在這樣的情況：在判斷文件時，沒有到達文件結尾，而在你的接下來的操作時，就達到了文件結尾，但你還讓程序進行文件讀寫。
打個比方(100為到達文件結尾)：當前文件到達98的位置，你的代碼還要讀寫下面三個內容，於是第99個內容可讀寫，第100個內容可讀寫，第101個內容VB提示超出尾文件

4. vb輸入超出文件尾

輸入超出文件尾（錯誤 62）

不能對文件尾位置後進行讀入。此錯誤有以下原因和解決方法：

Input # 或 Line Input #
語句要到已讀完文件或空文件中讀入數據。

在 Input # 語句之前直接使用 EOF
函數來測試是否處在文件的結尾。

在以 Binary 訪問所打開的文件上使用 EOF 函數。

EOF 只能用在順序 Input 訪問所打開的文件上。在
Binary 訪問所打開的文件上使用 Seek 和 Loc。

EOF 函數，返回一個 Integer，它包含 Boolean 值 True，表明已經到達為 Random
或順序 Input 打開的文件的結尾。

EOF 函數示例

本示例使用 EOF 函數來檢測文件尾。示例中假設 MYFILE
為有數個文本行的文本文件。

DimInputData
Open"MYFILE"ForInputAs#1'為輸入打開文件。
DoWhileNotEOF(1)'檢查文件尾。
LineInput#1,InputData'讀入一行數據。
Debug.PrintInputData'在立即窗口中顯示。
Loop
Close#1'關閉文件。

Seek 函數，返回一個 Long，在
Open 語句打開的文件中指定當前的讀/寫位置。

Seek 函數示例

本示例使用 Seek 函數來返回當前文件位置。示例中假設 TESTFILE
文件內含有用戶自定義數據類型 Record 的記錄。

TypeRecord'定義用戶自定義數據類型。
IDAsInteger
NameAsString*20
EndType

'如果以隨機方式打開文件，Seek返回下一個記錄的編號。
DimMyRecordAsRecord'聲明變數。
Open"TESTFILE"ForRandomAs#1Len=Len(MyRecord)
DoWhileNotEOF(1)'循環至文件尾。
Get#1,,MyRecord'讀入下一個記錄。
Debug.PrintSeek(1)'在立即窗口中顯示記錄號。
Loop
Close#1'關閉文件。

'如果不以Random方式打開文件，則Seek返回下一個操作會發生的位置。假設
TESTFILE文件內含有文本數據。
DimMyChar
Open"TESTFILE"ForInputAs#1'打開輸入文件。
DoWhileNotEOF(1)'循環至文件尾。
MyChar=Input(1,#1)'讀入下一個字元。
Debug.PrintSeek(1)'將下一字元的位置顯示在立即窗口。
Loop
Close#1'關閉文件。

Loc 函數，返回一個 Long，在已打開的文件中指定當前讀/寫位置。

Loc 函數示例

本示例使用 Loc 函數來返回在打開的文件中當前讀寫的位置。 本示例假設
TESTFILE 文件內含數行文本數據。

DimMyLocation,MyLine
Open"TESTFILE"ForBinaryAs#1'打開剛創建的文件。
DoWhileMyLocation<LOF(1)'循環至文件尾。
MyLine=MyLine&Input(1,#1)'讀入一個字元到變數中。
MyLocation=Loc(1)'取得當前位置。
'在立即窗口中顯示。
Debug.PrintMyLine:Tab:MyLocation
Loop
Close#1'關閉文件。

5. 求教！為什麼會出現「輸入超出文件尾」的錯誤

你的代碼有相當大的問題
在你打開文件之前，你是不知道文件裡面有多少記錄的
ReDim a(n) As stu
重新定義a()後，a()裡面原來的記錄就消失了
你打開文件的方式是input（讀取記錄），但是後面你又使用了print（寫記錄），這就造成了你的錯誤。我猜你的意思是想在窗體上輸出print後面的東西，但是你的print是寫在open下面的，這就是在文件裡面寫了。如果你要保持現在的結構不變的話，把你上面的print全改為form1.print（假設你的窗體名為form1）

6. vb中輸入超出文件尾是什麼意思 怎麼解決

你想讀取文件？還是將數據保存到文件，將數據保存到文件你應該用output。這個是不會超出文件尾的。但是你要是從文件中讀取數據的話。由於文件的長度肯定是有限的，所以有可能回超出文件尾。若是這樣，你可以加入 on error goto 或者on error resume next 語句。就不會發生錯誤了。

7. vb用input出錯，說什麼超出文件尾

VB輸入超出文件尾是指你想讀取超出文件結尾之後的部分，當然不可能，
這個是由於VB 內部採用Unicode方式問題，你所讀取的文件中可能含有中文（全形字元）和英文（半形字元）導致，甚至是空的文件。
解決的方法
1.用二進制打開，用GET方法讀入

Open"d:	est1.txt"ForBinaryAsfilenum1
TextLine=Space(LOF(filenum1))
Getfilenum1,,TextLine

遇到大的文件載入就滿點了。
2..用RichTextBox控制項實現。
添加部件:Microsoft Rich Textbox Control 6.0
添加控制項:RichTextBox1
添加讀取語句：RichTextBox1.LoadFile FileName
速度比較的快，方便簡潔。然後讓你的字元串變數為RichTextBox1.text就可以了。

參考自:http://..com/link?url=-sma0jdI_4bxCqD0GK