Application.DVar-Methode (Access)

Schätzt die Varianz einer Stichprobe in einer angegebenen Datensatzgruppe (einer Domäne).

Syntax

Ausdruck. DVar (Expr, Domain, Criteria)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Expr	Erforderlich	String	Ein Ausdruck, der das numerische Feld identifiziert, für das Sie die Varianz ermitteln möchten. Es kann sich um einen Zeichenfolgenausdruck handeln, der ein Feld aus einer Tabelle oder Abfrage identifiziert, oder es kann sich um einen Ausdruck handeln, der eine Berechnung für Daten in diesem Feld ausführt. In Expr können Sie das Namensfeld in eine 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. Jedes im Ausdruck enthaltene Feld muss ein numerisches Feld sein.
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 Zeichenfolgenausdruck, den Sie optional angeben können, um den Datenbereich einzuschränken, für den die Funktion DVar ausgeführt wird. Beispielsweise ist criteria oft äquivalent mit der WHERE-Klausel in einem SQL-Ausdruck, ohne das Wort WHERE. Wird das Argument criteria nicht angegeben, so berechnet DVar das Argument expr für die gesamte Domäne. Jedes Feld, das in Kriterien enthalten ist, muss ebenfalls ein Feld in der Domäne sein; Andernfalls gibt die DVar-Funktion einen Null-Wert zurück.

Rückgabewert

Variant

Bemerkungen

Sie können z. B. DVar verwenden, um die Varianz einer Gruppe von Testergebnissen von Studenten zu ermitteln.

Wenn domäne auf weniger als zwei Datensätze verweist oder weniger als zwei Datensätze Kriterien erfüllen, geben die DVar-Funktionen einen Null-Wert zurück, der angibt, dass eine Varianz nicht berechnet werden kann.

Unabhängig davon, ob Sie die DVar-Funktion in einem Makro, einem Modul, einem Abfrageausdruck oder einem berechneten Steuerelement verwenden, müssen Sie das Argument criteria sorgfältig erstellen, um sicherzustellen, dass es ordnungsgemäß ausgewertet wird.

Verwenden Sie die Funktion DVar , um Kriterien in der Zeile Kriterien einer Auswahlabfrage, in einem berechneten Feldausdruck in einer Abfrage oder in der Zeile Aktualisieren auf einer Updateabfrage anzugeben.

Hinweis

Verwenden Sie die DVar-Funktion oder die Var-Funktion in einem berechneten Feldausdruck in einer Summenabfrage. Wenn Sie DVar verwenden, werden die Werte berechnet, bevor die Daten gruppiert werden. Wenn Sie Var verwenden, werden die Daten gruppiert, bevor die Werte im Feldausdruck ausgewertet werden.

Verwenden Sie die DVar-Funktion in einem berechneten Steuerelement, wenn Sie das Argument Kriterien angeben möchten, um den Datenbereich einzuschränken, in dem die Funktion ausgeführt wird. Um beispielsweise eine Varianz für Bestellungen anzuzeigen, die nach Kalifornien versendet werden sollen, legen Sie die ControlSource-Eigenschaft eines Textfelds auf den folgenden Ausdruck fest:

=DVar("[Freight]", "Orders", "[ShipRegion] = 'CA'")

Möchten Sie lediglich die Standardabweichung aller Datensätze im Argument Domäne ermitteln, so verwenden Sie Var oder VarP.

Beispiel

Im folgenden Beispiel werden Schätzungen der Varianz für eine Grundgesamtheit und eine Grundgesamtheitsprobe für Bestellungen zurückgegeben, die in das Vereinigte Königreich versendet werden. The domain is an Orders table. Das Argument criteria schränkt den resultierenden Satz von Datensätzen auf diejenigen ein, für die ShipCountry gleich UK ist.

Dim dblX As Double 
Dim dblY As Double 
 
' Sample estimate. 
dblX = DVar("[Freight]", "Orders", "[ShipCountry] = 'UK'") 
 
' Population estimate. 
dblY = DVarP("[Freight]", "Orders", "[ShipCountry] = 'UK'")

Im nächsten Beispiel werden Schätzungen mithilfe der Variablen strCountry im Argument criteria zurückgegeben. Beachten Sie, dass einfache Anführungszeichen (') im Zeichenfolgenausdruck enthalten sind, sodass beim Verketten der Zeichenfolgen das Zeichenfolgenliteral UK in einfache Anführungszeichen eingeschlossen wird.

Dim strCountry As String| 
Dim dblX As Double 
 
strCountry = "UK" 
 
dblX = DVar("[Freight]", "Orders", "[ShipCountry] = '" _ 
    & strCountry & "'")

Die folgenden Beispiele zeigen, wie verschiedene Arten von Kriterien mit der Funktion DVar verwendet werden.

    ' ***************************
    ' Typical Use
    ' Numerical values. Replace "number" with the number to use.
    variable = DVar("[FieldName]", "TableName", "[Criteria] = number")

    ' Strings.
    ' Numerical values. Replace "string" with the string to use.
    variable = DVar("[FieldName]", "TableName", "[Criteria]= 'string'")

    ' Dates. Replace "date" with the string to use.
    variable = DVar("[FieldName]", "TableName", "[Criteria]= #date#")
    ' ***************************

    ' ***************************
    ' Referring to a control on a form
    ' Numerical values
    variable = DVar("[FieldName]", "TableName", "[Criteria] = " & Forms!FormName!ControlName)

    ' Strings
    variable = DVar("[FieldName]", "TableName", "[Criteria] = '" & Forms!FormName!ControlName & "'")

    ' Dates
    variable = DVar("[FieldName]", "TableName", "[Criteria] = #" & Forms!FormName!ControlName & "#")
    ' ***************************

    ' ***************************
    ' Combinations
    ' Multiple types of criteria
    variable = DVar("[FieldName]", "TableName", "[Criteria1] = " & Forms![FormName]![Control1] _
             & " AND [Criteria2] = '" & Forms![FormName]![Control2] & "'" _
            & " AND [Criteria3] =#" & Forms![FormName]![Control3] & "#")
    
    ' Use two fields from a single record.
    variable = DVar("[LastName] & ', ' & [FirstName]", "tblPeople", "[PrimaryKey] = 7")
            
    ' Expressions
    variable = DVar("[Field1] + [Field2]", "tableName", "[PrimaryKey] = 7")
    
    ' Control Structures
    variable = DVar("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.