Método Application. dÚltimo (Access)Application.DLast method (Access)

Você pode usar a função dÚltimo para retornar um registro aleatório de um campo específico em uma tabela ou consulta quando precisar de qualquer valor desse campo.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.

SintaxeSyntax

expressão. DÚltimo (Expr, domínio, critérios)expression.DLast (Expr, Domain, Criteria)

expressão Uma variável que representa um Aplicativo objeto.expression A variable that represents an Application object.

ParâmetrosParameters

NomeName Obrigatório/OpcionalRequired/Optional Tipo de dadosData type DescriçãoDescription
ExprExpr ObrigatórioRequired StringString Uma expressão que identifica o campo do qual você deseja localizar o valor de nome ou sobrenome.An expression that identifies the field from which you want to find the first or last value. Pode ser uma expressão de cadeia de caracteres que identifica um campo em uma tabela ou consulta ou uma expressão que executa um cálculo nos dados desse campo.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. Na expr, você pode incluir o nome de um campo em uma tabela, um controle em um formulário, em uma constante ou em uma função.In expr, you can include the name of a field in a table, a control on a form, a constant, or a function. Se expr incluir uma função, ela poderá ser interna ou definida pelo usuário, mas não outro domínio agregado ou função SQL agregada.If expr includes a function, it can be either built-in or user-defined, but not another domain aggregate or SQL aggregate function.
DomainDomain ObrigatórioRequired StringString Uma expressão formada por cadeia de caracteres que identifica o conjunto de registros que constitui o domínio.A string expression identifying the set of records that constitutes the domain.
CriteriaCriteria OpcionalOptional VariantVariant Uma expressão de cadeia de caracteres opcional utilizada para restringir o intervalo de dados no qual a função DLast é executada.An optional string expression used to restrict the range of data on which the DLast function is performed. Por exemplo, criteria costuma ser equivalente à cláusula WHERE em uma expressão SQL, sem o termo WHERE.For example, criteria is often equivalent to the WHERE clause in an SQL expression, without the wrd WHERE. Se criteria for omitido, a função DLast avaliará expr em relação ao domínio inteiro.If criteria is omitted, the DLast function evaluates expr against the entire domain. Qualquer campo incluído nos critérios também deve ser um campo no domínio; caso contrário, a função dÚltimo retornará um valor nulo.Any field that is included in criteria must also be a field in domain; otherwise, the DLast function returns a Null.

Valor de retornoReturn value

VariantVariant

ComentáriosRemarks

Observação

Para retornar o primeiro ou o último registro de um conjunto de registros (um domínio), crie uma consulta classificada como crescente ou decrescente e defina a propriedade TopValues como 1.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. No Visual Basic, você pode também criar um objeto Recordset do ADO e usar o método MoveFirst ou MoveLast para retornar o primeiro ou o último registro de um conjunto de registros.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.

ExemploExample

Os exemplos a seguir mostram como usar os diversos tipos de critérios com a função 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")
    ' ***************************

Suporte e comentáriosSupport and feedback

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação?Have questions or feedback about Office VBA or this documentation? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.