Var- und VarP-Funktionen (Microsoft Access SQL)

Gilt für: Access 2013 | Access 2016

Gibt die geschätzte Abweichung für eine Population oder für eine Populationsstichprobe als Menge von Werten zurück, die in einem angegebenen Feld einer Abfrage enthalten sind.

Syntax

Var(expr)

VarP(expr)

Der Platzhalter Ausdr stellt einen Zeichenfolgenausdruck dar, der das Feld mit den auszuwertenden numerischen Daten identifiziert, oder einen Ausdruck, der mit den Daten in diesem Feld eine Berechnung durchführt. Operanden in Ausdr können den Namen eines Tabellenfelds, eine Konstante oder eine Funktion einschließen (wobei es sich entweder um eine systeminterne oder benutzerdefinierte Funktion handeln kann, jedoch nicht um eine der anderen SQL-Aggregatfunktionen).

HinwBemerkungeneise

Mit der VarP-Funktion wird eine Population ausgewertet und mit der Var-Funktion eine Populationsstichprobe.

Wenn die zugrunde liegende Abfrage weniger als zwei Datensätze enthält, geben die Funktionen Var und VarP einen Null-Wert zurück, wodurch angezeigt wird, dass eine Abweichung nicht berechnet werden kann.

Verwenden Sie die Funktionen Var und VarP in einem Abfrageausdruck oder in einer SQL-Anweisung.

Beispiel

In diesem Beispiel wird die Orders-Tabelle verwendet, um die geschätzte Abweichung der Versandkosten für Bestellungen zu ermitteln, die nach Großbritannien versandt wurden.

In diesem Beispiel wird die EnumFields-Prozedur aufgerufen, die im Beispiel für die SELECT-Anweisung enthalten ist.

Sub VarX() 
 
    Dim dbs As Database, rst As Recordset 
 
    ' Modify this line to include the path to Northwind 
    ' on your computer. 
    Set dbs = OpenDatabase("Northwind.mdb") 
 
    ' Calculate the variance of freight costs for  
    ' orders shipped to the United Kingdom.
    Set rst = dbs.OpenRecordset("SELECT " _ 
        & "Var(Freight) " _ 
        & "AS [UK Freight Variance] " _ 
        & "FROM Orders WHERE ShipCountry = 'UK';") 
 
    ' Populate the Recordset. 
    rst.MoveLast 
     
    ' Call EnumFields to print the contents of the  
    ' Recordset. Pass the Recordset object and desired 
    ' field width. 
    EnumFields rst, 20 
     
    Debug.Print 
     
    Set rst = dbs.OpenRecordset("SELECT " _ 
        & "VarP(Freight) " _ 
        & "AS [UK Freight VarianceP] " _ 
        & "FROM Orders WHERE ShipCountry = 'UK';") 
 
    ' Populate the Recordset. 
    rst.MoveLast 
 
    ' Call EnumFields to print the contents of the  
    ' Recordset. Pass the Recordset object and desired 
    ' field width. 
    EnumFields rst, 20 
 
    dbs.Close 
 
End Sub 

Siehe auch

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.