Application.DLast-Methode (Access)

Artikel
04/07/2023

Verwenden Sie die DLast-Funktion , um einen zufälligen Datensatz aus einem bestimmten Feld in einer Tabelle oder Abfrage zurückzugeben, wenn Sie einen Wert aus diesem Feld benötigen.

Syntax

Ausdruck. DLast (Expr, Domain, Criteria)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Expr	Erforderlich	String	Ein Ausdruck, der das Feld identifiziert, aus dem Sie den ersten oder letzten Wert finden möchten. Dies kann entweder ein Zeichenfolgenausdruck sein, der ein Feld in einer Tabelle oder Abfrage identifiziert, oder ein Ausdruck, der eine Berechnung für Daten in diesem Feld ausführt. In expr können Sie den Namen eines Felds in einer Tabelle, ein Steuerelement in einem Formular, eine Konstante oder eine Funktion einschließen. Wenn expr eine Funktion enthält, kann sie entweder integriert oder benutzerdefinierte sein, aber keine andere Domänenaggregat- oder SQL-Aggregatfunktion.
Domäne	Erforderlich	String	Ein Zeichenfolgenausdruck, der die Gruppe der Datensätze angibt, die die Domäne bilden.
Kriterium	Optional	Variant	Ein Zeichenfolgenausdruck, den Sie optional angeben können, um den Datenbereich einzuschränken, für den die Funktion DLast ausgeführt wird. Das Argument criteria ist z. B. oft gleichbedeutend mit der WHERE-Klausel in einem SQL-Ausdruck (ohne das Wort WHERE). Wird das Argument criteria nicht angegeben, so berechnet DLast das Argument expr für die gesamte Domäne. Jedes Feld, das im Argument criteria enthalten ist, muss auch ein Feld des Arguments domain sein, sonst gibt die Funktion DLast den Wert Null zurück.

Rückgabewert

Variant

Bemerkungen

Hinweis

Wenn Sie den ersten oder letzten Datensatz in einer Gruppe von Datensätzen (einer Domäne) zurückgeben möchten, sollten Sie eine Abfrage erstellen, die als aufsteigend oder absteigend sortiert ist, und die TopValues-Eigenschaft auf 1 festlegen. In Visual Basic können Sie auch ein ADO Recordset-Objekt erstellen und die MoveFirst - oder MoveLast-Methode verwenden, um den ersten oder letzten Datensatz in einer Gruppe von Datensätzen zurückzugeben.

Beispiel

Die folgenden Beispiele zeigen, wie verschiedene Arten von Kriterien mit der Funktion DLast verwendet werden .

    ' ***************************
    ' Typical Use
    ' Numerical values. Replace "number" with the number to use.
    variable = DLast("[FieldName]", "TableName", "[Criteria] = number")

    ' Strings.
    ' Numerical values. Replace "string" with the string to use.
    variable = DLast("[FieldName]", "TableName", "[Criteria]= 'string'")

    ' Dates. Replace "date" with the string to use.
    variable = DLast("[FieldName]", "TableName", "[Criteria]= #date#")
    ' ***************************

    ' ***************************
    ' Referring to a control on a form
    ' Numerical values
    variable = DLast("[FieldName]", "TableName", "[Criteria] = " & Forms!FormName!ControlName)

    ' Strings
    variable = DLast("[FieldName]", "TableName", "[Criteria] = '" & Forms!FormName!ControlName & "'")

    ' Dates
    variable = DLast("[FieldName]", "TableName", "[Criteria] = #" & Forms!FormName!ControlName & "#")
    ' ***************************

    ' ***************************
    ' Combinations
    ' Multiple types of criteria
    variable = DLast("[FieldName]", "TableName", "[Criteria1] = " & Forms![FormName]![Control1] _
             & " AND [Criteria2] = '" & Forms![FormName]![Control2] & "'" _
            & " AND [Criteria3] =#" & Forms![FormName]![Control3] & "#")
    
    ' Use two fields from a single record.
    variable = DLast("[LastName] & ', ' & [FirstName]", "tblPeople", "[PrimaryKey] = 7")
            
    ' Expressions
    variable = DLast("[Field1] + [Field2]", "tableName", "[PrimaryKey] = 7")
    
    ' Control Structures
    variable = DLast("IIf([LastName] Like 'Smith', 'True', 'False')", "tableName", "[PrimaryKey] = 7")
    ' ***************************

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über