Функции Var, VarP (Microsoft Access SQL)

Статья
04/07/2023

Область применения: Access 2013 | Access 2016

Возвращает оценки дисперсии для совокупности или выборки, представленной в виде набора значений, содержащихся в указанном поле в запросе.

Синтаксис

Var(expr)

VarP(expr)

Заполнитель expr представляет строковое выражение, идентифицирующее поле, содержащее числовые данные, которые требуется вычислить, или выражение, которое выполняет вычисление с использованием данных в этом поле. Операнды в expr могут включать имя поля таблицы, константы или функции (которые могут быть встроенными или определяемыми пользователем, но не одной из других агрегатных функций SQL).

Замечания

Функция VarP оценивает популяцию, а функция Var — выборку совокупности.

Если базовый запрос содержит менее двух записей, функции Var и VarP возвращают значение NULL , указывающее, что отклонение не может быть вычислено.

Используйте функции Var и VarP в выражении запроса или в инструкции SQL.

Пример

В этом примере таблица Orders используется для оценки дисперсии транспортных расходов для заказов, отправляемых в Соединенное Королевство.

В этом примере вызывается процедура EnumFields, которую можно найти в примере инструкции SELECT.

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

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через