次の方法で共有

Application.DLast メソッド (Access)

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

構文

式。DLast (Expr、 Domain、 Criteria)

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

パラメーター

名前 必須 / オプション データ型 説明
Expr 必須 文字列型 (String) 最初と最後の値を取得するフィールドを示す式です。 テーブルまたはクエリ内のフィールドを示す文字列式、または対象フィールド内のデータに対して計算を実行する式を指定できます。 expr では、テーブルのフィールド、フォームのコントロール、定数、または関数の名前を指定できます。 expr に関数が含まれている場合は、組み込み関数またはユーザー定義関数を使用できますが、別のドメイン集計関数や SQL 集計関数は使用できません。
ドメイン 必須 文字列型 (String) 定義域を構成するレコードを指定する文字列式です。テーブル名またはクエリ名が指定できます。
Criteria 省略可能 バリアント型 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 のサポートおよびフィードバックを参照してください。