FileSystem.Seek Metod

Definition

Returnerar en Long som anger den aktuella skriv-/skrivpositionen i en fil som öppnas med hjälp FileOpen av funktionen eller anger positionen för nästa läs-/skrivåtgärd i en fil som öppnas med hjälp FileOpen av funktionen. Funktionen My ger bättre produktivitet och prestanda i fil-I/O-åtgärder än Seek. Mer information finns i FileSystem.

Överlagringar

Name Description
Seek(Int32)

Returnerar en Long som anger den aktuella skriv-/skrivpositionen i en fil som öppnas med hjälp FileOpen av funktionen eller anger positionen för nästa läs-/skrivåtgärd i en fil som öppnas med hjälp FileOpen av funktionen. Funktionen My ger bättre produktivitet och prestanda i fil-I/O-åtgärder än Seek. Mer information finns i FileSystem.

Seek(Int32, Int64)

Returnerar en Long som anger den aktuella skriv-/skrivpositionen i en fil som öppnas med hjälp FileOpen av funktionen eller anger positionen för nästa läs-/skrivåtgärd i en fil som öppnas med hjälp FileOpen av funktionen. Funktionen My ger bättre produktivitet och prestanda i fil-I/O-åtgärder än Seek. Mer information finns i FileSystem.

Seek(Int32)

Källa:
FileSystem.vb
Källa:
FileSystem.vb
Källa:
FileSystem.vb
Källa:
FileSystem.vb
Källa:
FileSystem.vb

Returnerar en Long som anger den aktuella skriv-/skrivpositionen i en fil som öppnas med hjälp FileOpen av funktionen eller anger positionen för nästa läs-/skrivåtgärd i en fil som öppnas med hjälp FileOpen av funktionen. Funktionen My ger bättre produktivitet och prestanda i fil-I/O-åtgärder än Seek. Mer information finns i FileSystem.

public:
 static long Seek(int FileNumber);
public static long Seek(int FileNumber);
static member Seek : int -> int64
Public Function Seek (FileNumber As Integer) As Long

Parametrar

FileNumber
Int32

Required. En Integer som innehåller ett giltigt filnummer.

Returer

En Long som anger den aktuella läs-/skrivpositionen i en fil som öppnas med hjälp FileOpen av funktionen eller anger positionen för nästa läs-/skrivåtgärd i en fil som öppnas med hjälp FileOpen av funktionen.

Undantag

Filläget är ogiltigt.

Exempel

I det Seek här exemplet används funktionen för att returnera den aktuella filpositionen. Exemplet förutsätter TestFile att är en fil som innehåller poster i strukturen Record.

Structure Record   ' Define user-defined type.
    Dim ID As Integer
    Dim Name As String
End Structure

För filer som öppnas i Random läge Seek returnerar antalet nästa post.

FileOpen(1, "TESTFILE", OpenMode.Random)
Do While Not EOF(1)
    WriteLine(1, Seek(1))   ' Write record number.
    FileGet(1, MyRecord, -1)   ' Read next record.
Loop
FileClose(1)

För filer som öppnas i andra lägen än Random lägen Seek returnerar bytepositionen där nästa åtgärd inträffar. Anta TestFile att är en fil som innehåller flera textrader.

' Report character position at beginning of each line.
Dim TextLine As String
FileOpen(1, "TESTFILE", OpenMode.Input)   ' Open file for reading.
While Not EOF(1)
    ' Read next line.
    TextLine = LineInput(1)
    ' Position of next line.
    MsgBox(Seek(1))
End While
FileClose(1)

I det Seek här exemplet används funktionen för att ange positionen för nästa läsning eller skrivning i en fil.

För filer som öppnas i andra lägen än Random lägen anger Seek bytepositionen vid vilken nästa åtgärd inträffar. Anta TestFile att är en fil som innehåller flera textrader.

Dim someText As String = "This is a test string."
' Open file for output.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Move to the third character.
Seek(1, 3)
Input(1, someText)
Console.WriteLine(someText)
FileClose(1)

Kommentarer

Seek returnerar ett värde mellan 1 och 2 147 483 647 (motsvarande 2^31–1), inklusive.

Följande beskriver returvärdena för varje filåtkomstläge:

Läge Returvärde
Random Numret på nästa post läst eller skriven
Binary, Input, , OutputAppend Byteposition där nästa åtgärd inträffar. Den första byte i en fil är på position 1, den andra byte är på position 2 och så vidare.

Se även

Gäller för

Seek(Int32, Int64)

Källa:
FileSystem.vb
Källa:
FileSystem.vb
Källa:
FileSystem.vb
Källa:
FileSystem.vb
Källa:
FileSystem.vb

Returnerar en Long som anger den aktuella skriv-/skrivpositionen i en fil som öppnas med hjälp FileOpen av funktionen eller anger positionen för nästa läs-/skrivåtgärd i en fil som öppnas med hjälp FileOpen av funktionen. Funktionen My ger bättre produktivitet och prestanda i fil-I/O-åtgärder än Seek. Mer information finns i FileSystem.

public:
 static void Seek(int FileNumber, long Position);
public static void Seek(int FileNumber, long Position);
static member Seek : int * int64 -> unit
Public Sub Seek (FileNumber As Integer, Position As Long)

Parametrar

FileNumber
Int32

Required. En Integer som innehåller ett giltigt filnummer.

Position
Int64

Required. Tal i intervallet 1–2 147 483 647, inklusive, som anger var nästa läs-/skrivåtgärd ska ske.

Undantag

Filläget är ogiltigt.

Exempel

I det Seek här exemplet används funktionen för att returnera den aktuella filpositionen. Exemplet förutsätter TestFile att är en fil som innehåller poster i strukturen Record.

Structure Record   ' Define user-defined type.
    Dim ID As Integer
    Dim Name As String
End Structure

För filer som öppnas i Random läge Seek returnerar antalet nästa post.

FileOpen(1, "TESTFILE", OpenMode.Random)
Do While Not EOF(1)
    WriteLine(1, Seek(1))   ' Write record number.
    FileGet(1, MyRecord, -1)   ' Read next record.
Loop
FileClose(1)

För filer som öppnas i andra lägen än Random lägen Seek returnerar bytepositionen där nästa åtgärd inträffar. Anta TestFile att är en fil som innehåller flera textrader.

' Report character position at beginning of each line.
Dim TextLine As String
FileOpen(1, "TESTFILE", OpenMode.Input)   ' Open file for reading.
While Not EOF(1)
    ' Read next line.
    TextLine = LineInput(1)
    ' Position of next line.
    MsgBox(Seek(1))
End While
FileClose(1)

I det Seek här exemplet används funktionen för att ange positionen för nästa läsning eller skrivning i en fil.

För filer som öppnas i andra lägen än Random lägen anger Seek bytepositionen vid vilken nästa åtgärd inträffar. Anta TestFile att är en fil som innehåller flera textrader.

Dim someText As String = "This is a test string."
' Open file for output.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Move to the third character.
Seek(1, 3)
Input(1, someText)
Console.WriteLine(someText)
FileClose(1)

Kommentarer

Seek returnerar ett värde mellan 1 och 2 147 483 647 (motsvarande 2^31–1), inklusive.

Följande beskriver returvärdena för varje filåtkomstläge:

Läge Returvärde
Random Numret på nästa post läst eller skriven
Binary, Input, , OutputAppend Byteposition där nästa åtgärd inträffar. Den första byte i en fil är på position 1, den andra byte är på position 2 och så vidare.

Se även

Gäller för