TextFieldParser.EndOfData 속성
업데이트: 2007년 11월
현재 커서 위치와 파일의 끝 사이에 공백이 없고 주석줄이 없으면 True를 반환합니다.
' Usage
Dim value As Boolean = TextFieldParserObject.EndOfData
' Declaration
Public ReadOnly Property EndOfData As Boolean
반환 값
Boolean.
설명
이 속성은 파일을 읽을 때 읽을 데이터의 끝을 확인하는 데 사용할 수 있습니다.
작업
다음 표에서는 EndOfData 속성과 관련된 작업의 예를 보여 줍니다.
작업 |
참조 |
---|---|
쉼표로 구분한 파일에서 읽기 |
|
고정 폭 파일에서 읽기 |
예제
이 예제에서는 EndofData 속성을 TextFieldReader, FileReader와 함께 사용하여 파일의 모든 필드를 반복합니다.
Dim StdFormat As Integer() = {5, 10, 11, -1}
Dim ErrorFormat As Integer() = {5, 5, -1}
Using FileReader As New _
Microsoft.VisualBasic.FileIO.TextFieldParser("C:\testfile.txt")
FileReader.TextFieldType = FileIO.FieldType.FixedWidth
FileReader.FieldWidths = StdFormat
Dim CurrentRow As String()
While Not FileReader.EndOfData
Try
Dim RowType As String = FileReader.PeekChars(3)
If String.Compare(RowType, "Err") = 0 Then
' If this line describes an error, the format of the row will be different.
FileReader.SetFieldWidths(ErrorFormat)
CurrentRow = FileReader.ReadFields
FileReader.SetFieldWidths(StdFormat)
Else
' Otherwise parse the fields normally
CurrentRow = FileReader.ReadFields
For Each newString As String In CurrentRow
My.Computer.FileSystem.WriteAllText("newFile.txt", newString, True)
Next
End If
Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
MsgBox("Line " & ex.Message & " is invalid. Skipping")
End Try
End While
End Using
요구 사항
네임스페이스:Microsoft.VisualBasic.FileIO
클래스:TextFieldParser
어셈블리: Visual Basic 런타임 라이브러리(Microsoft.VisualBasic.dll)
권한
다음과 같은 사용 권한이 필요합니다.
권한 |
설명 |
---|---|
파일 및 폴더에 대한 액세스 가능성을 제어합니다. 연결된 열거형: Unrestricted. |
|
코드에 적용된 보안 권한 집합을 설명합니다. 연관된 열거형: ControlEvidence |
자세한 내용은 코드 액세스 보안 및 권한 요청을 참조하십시오.