Application. DLast, méthode (Access)Application.DLast method (Access)

Vous pouvez utiliser la fonction DLast pour renvoyer un enregistrement aléatoire d’un champ particulier dans une table ou une requête lorsque vous avez besoin de n’importe quelle valeur de ce champ.You can use the DLast function to return a random record from a particular field in a table or query when you need any value from that field.

SyntaxeSyntax

expression. DLast (Expr, domaine, critères)expression.DLast (Expr, Domain, Criteria)

_expression_Une variable qui représente un objet**Application**.expression A variable that represents an Application object.

ParamètresParameters

NomName Requis/FacultatifRequired/Optional Type de donnéesData type DescriptionDescription
ExprExpr ObligatoireRequired StringString Expression qui identifie le champ dont vous voulez trouver la première ou la dernière valeur.An expression that identifies the field from which you want to find the first or last value. Il peut s'agir soit d'une expression chaîne identifiant un champ dans une table ou dans une requête, soit d'une expression qui effectue un calcul sur les données de ce champ.It can be either a string expression identifying a field in a table or query, or an expression that performs a calculation on data in that field. Dans expr, vous pouvez inclure le nom d'un champ de table, un contrôle de formulaire, une constante ou une fonction.In expr, you can include the name of a field in a table, a control on a form, a constant, or a function. Si expr inclut une fonction, celle-ci peut être intégrée ou définie par l’utilisateur, mais pas une autre fonction d’agrégation de domaine ou SQL.If expr includes a function, it can be either built-in or user-defined, but not another domain aggregate or SQL aggregate function.
DomainDomain ObligatoireRequired StringString Expression chaîne identifiant les enregistrements qui constituent le domaine.A string expression identifying the set of records that constitutes the domain.
CriteriaCriteria FacultatifOptional VariantVariant Expression chaîne facultative servant à limiter la plage des données sur laquelle porte la fonction DLast.An optional string expression used to restrict the range of data on which the DLast function is performed. Par exemple, critères est souvent équivalent à la clause WHERE d'une expression SQL sans le mot WHERE.For example, criteria is often equivalent to the WHERE clause in an SQL expression, without the wrd WHERE. En cas d'omission de criteria, la fonction DLast évalue expr par rapport à l'intégralité du domaine.If criteria is omitted, the DLast function evaluates expr against the entire domain. Chaque champ compris dans criteria doit aussi l'être dans domain, sans quoi la fonction DLast renvoie la valeur Null.Any field that is included in criteria must also be a field in domain; otherwise, the DLast function returns a Null.

Valeur renvoyéeReturn value

VariantVariant

RemarquesRemarks

Notes

Si vous voulez renvoyer le premier ou le dernier enregistrement dans un jeu d'enregistrements (un domaine), vous devez créer une requête triée de manière ascendante ou descendante et affecter la valeur 1 à la propriété TopValues.If you want to return the first or last record in a set of records (a domain), you should create a query sorted as either ascending or descending and set the TopValues property to 1. Dans Visual Basic, vous pouvez également créer un objet ADO Recordset et utiliser les méthodes MoveFirst ou MoveLast pour renvoyer le premier ou le dernier enregistrement dans un jeu d'enregistrements.From Visual Basic, you can also create an ADO Recordset object and use the MoveFirst or MoveLast method to return the first or last record in a set of records.

ExempleExample

Les exemples suivants montrent comment utiliser différents types de critères avec la fonction DLast .The following examples show how to use various types of criteria with the DLast function.

    ' ***************************
    ' 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")
    ' ***************************

Assistance et commentairesSupport and feedback

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ?Have questions or feedback about Office VBA or this documentation? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.