Application.DLast メソッド (Access)

DLast 関数を 使用すると 、そのフィールドの値が必要なときに、テーブルまたはクエリ内の特定のフィールドからランダム なレコードを返します。

構文

.DLast (Expr, Domain, Criteria)

expression Application オブジェクトを 表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Expr 必須 String 最初と最後の値を取得するフィールドを示す式です。 テーブルまたはクエリ内のフィールドを示す文字列式、または対象フィールド内のデータに対して計算を実行する式を指定できます。 expr では、テーブルのフィールド、フォームのコントロール、定数、または関数の名前を指定できます。 expr に 関数が含まれる場合は、組み込み関数またはユーザー定義関数を使用できますが、別のドメイン 集計関数またはSQLできません。
ドメイン 必須 String 定義域を構成するレコードを指定する文字列式です。テーブル名またはクエリ名が指定できます。
Criteria 省略可能 Variant DLast 関数の対象となるデータの範囲を指定する省略可能な文字列式です。 たとえば、 criteria は多くの場合、SQL 式の WHERE 句と同じ役割を果たします (ただし WHERE という語は使用しません)。 引数 criteria を省略すると、DLast 関数は定義域全体に対して expr を適用します。 criteria に含まれるフィールドが domain のフィールドでない場合、DLast 関数は Null 値を返します。

戻り値

バリアント型

注釈

注意

レコードのセット (定義域) の先頭レコードまたは最終レコードを取得する必要がある場合は、昇順または降順に並べ替えるクエリを作成し、"TopValues/トップ値" プロパティを 1 に設定します。 また、Visual Basic から ADO オブジェクトの Recordset オブジェクトを作成し、MoveFirst メソッドまたは MoveLast メソッドを使って、レコードのセットの先頭レコードまたは最終レコードを取得することもできます。

次の例では、DLast 関数でさまざまな criteria の種類を使用する方法を示します。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。