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 のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示