Office: Seek-Funktion

Tutorials · 1. Januar 2020

Seek-Funktion
Access für Microsoft 365 Access 2019 Access 2016 Access 2013 Access 2010 Access 2007 Mehr... Weniger Hinweis: Wir möchten Ihnen die aktuellsten Hilfeinhalte so schnell wie möglich in Ihrer eigenen Sprache bereitstellen. Diese Seite wurde automatisiert übersetzt und kann Grammatikfehler oder Ungenauigkeiten enthalten. Unser Ziel ist es, Ihnen hilfreiche Inhalte bereitzustellen. Teilen Sie uns bitte über den Link am unteren Rand dieser Seite mit, ob die Informationen für Sie hilfreich sind. Hier finden Sie den englischen Artikel als Referenz.

Hinweis: Die Funktion, die Methode, das Objekt oder die Eigenschaft, die bzw. das in diesem Thema erläutert wird, ist deaktiviert, falls der Ausdrucksdienst in Microsoft Jet im geschützten Modus (Sandkastenmodus) ausgeführt wird. In diesem Modus wird die Auswertung von potenziell unsicheren Ausdrücken verhindert. Weitere Informationen zum geschützten Modus finden Sie in der Hilfe unter "Sandkastenmodus".

Gibt einen Long-Wert zurück, die die aktuelle Position/Lese innerhalb einer mithilfe der Open -Anweisung geöffneten Datei angibt.

Syntax

Suche ( Dateinummer )

Die erforderlichen DateinummerArgument ist eine ganze Zahl mit einer gültigen Dateinummer.

Anmerkungen

Suche gibt einen Wert zwischen 1 und 2.147.483.647 (entspricht 2 ^ 31 – 1), einschließlich.

Im folgenden wird die Rückgabewerte für jede Dateizugriffsmodus beschrieben.

Modus
Rückgabewert

Random

Nummer des nächsten Datensatzes gelesen oder geschrieben

Binäre,
Ausgabe,
Anfügen,
Eingabe

Byte-Position, an der die nächste Operation stattfindet. Das erste Byte in einer Datei beginnt an Position 1, das zweite Byte an Position 2 usw..

Beispiel
Hinweis: Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

In diesem Beispiel wird die Suche -Funktion verwendet, um die aktuelle Dateiposition zurückzukehren. Angenommen, dass TESTFILE eine Datei, die Datensätze mit den benutzerdefinierten Typ Recordist.

Type Record ' Define user-defined type.
ID As Integer
Name As String * 20
End Type
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Für Dateien, die im Random-Modus geöffnet werden gibt die Suche Nummer des nächsten Datensatzes.

Dim MyRecord As Record ' Declare variable.
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
Do While Not EOF(1) ' Loop until end of file.
Get #1, , MyRecord ' Read next record.
' Print record number to the Immediate window.
Debug.Print Seek(1)
Loop
Close #1 ' Close file.
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Für Dateien, die nicht im Random-Modus geöffnet werden gibt die Suche die Byte-Position, an der die nächste Operation stattfindet. Wird davon ausgegangen Sie, dass TESTFILE eine Datei mit wenigen Textzeilen ist.

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file for reading.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Read next character of data.
' Print byte position to the Immediate window.
Debug.Print Seek(1)
Loop
Close #1 ' Close file.
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

:)

Office: Seek-Funktion

Seek-Funktion

Seek-Funktion

Seek-Funktion - Similar Threads - Seek Funktion

Probleme mit bedingter Formatierung

neue Filter Funktion

Zahlenreihe addieren

DropDown Auswahl mit 2 Funktionen

ISOKalenderwoche Powerquery

Bei meinem Outlook (new) fehlen wichtige Funktionen!

Daten per Index-Funktion übertragen

Modus	Rückgabewert
Random	Nummer des nächsten Datensatzes gelesen oder geschrieben
Binäre, Ausgabe, Anfügen, Eingabe	Byte-Position, an der die nächste Operation stattfindet. Das erste Byte in einer Datei beginnt an Position 1, das zweite Byte an Position 2 usw..