Application.DMin-Methode (Access)
Verwenden Sie die Funktion DMin , um den Mindestwert in einer angegebenen Gruppe von Datensätzen (einer Domäne) zu bestimmen.
Syntax
Ausdruck. DMin (Expr, Domain, Criteria)
expression Eine Variable, die ein Application-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Expr | Erforderlich | String | Ein Ausdruck, der das Feld kennzeichnet, von dem Sie den kleinsten oder größten Wert ermitteln möchten. Der Ausdruck kann ein Zeichenfolgenausdruck sein, der ein Feld in einer Tabelle oder Abfrage kennzeichnet, oder ein Ausdruck, der eine Berechnung mit Daten in dem Feld durchführt. In expr können Sie den Namen eines Felds in einer Tabelle, ein Steuerelement in einem Formular, eine Konstante oder eine Funktion einschließen. Wenn expr eine Funktion enthält, kann sie entweder integriert oder benutzerdefinierte sein, aber keine andere Domänenaggregat- oder SQL-Aggregatfunktion. |
Domäne | Erforderlich | String | Ein Zeichenfolgenausdruck, der die Gruppe der Datensätze angibt, die die Domäne bilden. Es kann sich dabei um einen Tabellennamen oder einen Abfragenamen für eine Abfrage handeln, die keinen Parameter benötigt. |
Criteria | Optional | Variant | Ein optionaler Zeichenfolgenausdruck, der verwendet wird, um den Datenbereich einzuschränken, für den die DMin-Funktion ausgeführt wird. Beispielsweise ist criteria oft äquivalent mit der WHERE-Klausel in einem SQL-Ausdruck, ohne das Wort WHERE. Wenn Kriterien nicht angegeben werden, wertet die DMin-Funktionexpr für die gesamte Domäne aus. Jedes Feld, das in Kriterien enthalten ist, muss ebenfalls ein Feld in der Domäne sein; Andernfalls gibt die DMin-Funktion einen Null-Wert zurück. |
Rückgabewert
Variant
Bemerkungen
Sie können z. B. die Funktion DMin in berechneten Steuerelementen für einen Bericht verwenden, um den kleinsten Auftragsbetrag für einen bestimmten Kunden anzuzeigen. Alternativ können Sie die DMin-Funktion in einem Abfrageausdruck verwenden, um alle Bestellungen mit einem Rabatt anzuzeigen, der über dem minimal möglichen Rabatt liegt.
Die Funktion DMin gibt die Mindestwerte zurück, die Kriterien erfüllen. Wenn expr numerische Daten identifiziert, gibt die DMin-Funktion numerische Werte zurück. Gibt das Argument expr Zeichenfolgendaten an, so wird die Zeichenfolge zurückgegeben, die alphabetisch an erster oder letzter Stelle steht.
Die DMin-Funktion ignoriert NULL-Werte in dem Feld, auf das von expr verwiesen wird. Wenn jedoch kein Datensatz die Kriterien erfüllt oder die Domäne keine Datensätze enthält, gibt die DMin-Funktion einen Null-Wert zurück.
Verwenden Sie die DMin-Funktion , um Kriterien in der Zeile Kriterien einer Abfrage, in einem berechneten Feldausdruck in einer Abfrage oder in der Zeile Aktualisieren auf einer Updateabfrage anzugeben.
Hinweis
Verwenden Sie die DMin-Funktion oder die Min-Funktion in einem berechneten Feldausdruck einer Summenabfrage. Wenn Sie die DMin-Funktion verwenden, werden die Werte ausgewertet, bevor die Daten gruppiert werden. Wenn Sie die Min-Funktion verwenden, werden die Daten gruppiert, bevor Werte im Feldausdruck ausgewertet werden.
Möchten Sie einfach nur den kleinsten oder größten Wert aller Datensätze der im Argument domain angegebenen Domäne finden, so verwenden Sie die Funktion Min oder Max.
Zwar können Sie mit DMin oder DMax den kleinsten oder größten Wert in einem Feld einer Fremdtabelle berechnen, aber es kann effizienter sein, eine Abfrage zu erstellen, die die benötigten Felder aus beiden Tabellen enthält, und dann Ihrem Formular oder Bericht diese Abfrage zugrunde zu legen.
Beispiel
Dieses Beispiel gibt den kleinsten und den größten Wert aus dem Feld "Frachtkosten" für Bestellungen zurück, die nach Großbritannien versandt wurden. Als Domäne wird die Tabelle "Bestellungen" verwendet. Das Argument criteria schränkt den resultierenden Satz von Datensätzen auf diejenigen ein, für die ShipCountry gleich UK ist.
Dim curX As Currency
Dim curY As Currency
curX = DMin("[Freight]", "Orders", "[ShipCountry] = 'UK'")
curY = DMax("[Freight]", "Orders", "[ShipCountry] = 'UK'")
Im nächsten Beispiel enthält der Kriterienausdruck die Variable dteOrderDate
. Beachten Sie, dass Nummernzeichen (#) im Zeichenfolgenausdruck enthalten sind, sodass die Zeichenfolgen beim Verketten des Datums eingeschlossen werden.
Dim dteOrderDate As Date
Dim curX As Currency
dteOrderDate = #03/30/2000#
curX = DMin("[Freight]", "Orders", _
"[OrderDate] = #" & dteOrderDate & "#")
Die folgenden Beispiele zeigen, wie verschiedene Arten von Kriterien mit der DMin-Funktion verwendet werden.
' ***************************
' Typical Use
' Numerical values. Replace "number" with the number to use.
variable = DMin("[FieldName]", "TableName", "[Criteria] = number")
' Strings.
' Numerical values. Replace "string" with the string to use.
variable = DMin("[FieldName]", "TableName", "[Criteria]= 'string'")
' Dates. Replace "date" with the string to use.
variable = DMin("[FieldName]", "TableName", "[Criteria]= #date#")
' ***************************
' ***************************
' Referring to a control on a form
' Numerical values
variable = DMin("[FieldName]", "TableName", "[Criteria] = " & Forms!FormName!ControlName)
' Strings
variable = DMin("[FieldName]", "TableName", "[Criteria] = '" & Forms!FormName!ControlName & "'")
' Dates
variable = DMin("[FieldName]", "TableName", "[Criteria] = #" & Forms!FormName!ControlName & "#")
' ***************************
' ***************************
' Combinations
' Multiple types of criteria
variable = DMin("[FieldName]", "TableName", "[Criteria1] = " & Forms![FormName]![Control1] _
& " AND [Criteria2] = '" & Forms![FormName]![Control2] & "'" _
& " AND [Criteria3] =#" & Forms![FormName]![Control3] & "#")
' Use two fields from a single record.
variable = DMin("[LastName] & ', ' & [FirstName]", "tblPeople", "[PrimaryKey] = 7")
' Expressions
variable = DMin("[Field1] + [Field2]", "tableName", "[PrimaryKey] = 7")
' Control Structures
variable = DMin("IIf([LastName] Like 'Smith', 'True', 'False')", "tableName", "[PrimaryKey] = 7")
' ***************************
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.