通过

Application.DStDevP 方法 (Access)

  • 项目

估计域) 指定记录集 (总体的标准偏差。

语法

表达式。DStDevP (Expr、 域、 条件)

expression：表示 Application 对象的变量。

参数

名称 必需/可选 数据类型 说明
Expr 必需 字符串 表达式，用于标识要从中查找标准偏差的数值字段。 它可以是一个标识来自表或查询中的字段的字符串表达式，或者也可以是一个对该字段中的数据执行计算的表达式。 在 expr 中，可以包含表中字段、窗体控件、常量或函数的名称。 如果 expr 包含函数，它可以是内置函数或用户定义的函数，但不能是其他域聚合函数或 SQL 聚合函数。
域 必需 字符串 字符串表达式，用于标识组成域的记录集。 可以是表名称或不需要参数的查询的查询名称。
Criteria 可选 Variant 可选的字符串表达式，用于限制作为 DStDevP 函数执行对象的数据范围。 例如，criteria通常是相当于 SQL 表达式中的 WHERE 子句位置，但是不使用 WHERE一词。 如果省略 criteria，DStDevP 函数将针对整个域对 expr 求值。 任何包含在 criteria 中的字段都必须也是 domain 中的字段，否则 DStDevP 函数将返回 Null。

返回值

Variant

备注

如果 domain 引用的记录少于两个，或者满足 条件的记录少于两个， 则 DStDevP 函数返回 Null，指示无法计算标准偏差。

使用 DStDevP 函数在选择查询的 “条件” 行中指定条件。 例如，可以在“Orders”表和“Products”表上创建一个查询来显示运输成本高于平均值加上标准偏差的所有产品。

在查询的计算字段表达式或更新查询的“更新到”行中使用 DStDevP 函数。

注意

在总计查询的计算字段表达式中使用 DStDev 和 DStDevP 函数或 StDev 和 StDevP 函数。 如果使用 DStDev 或 DStDevP 函数，则在将数据分组之前计算各个值。 如果使用 StDev 或 StDevP 函数，则在分组之后计算字段表达式中的值。

当需要指定条件来限制作为函数执行对象的数据的范围时，可在计算控件中使用 DStDev 函数。

如果只是要查找 domain 中所有记录的标准偏差，可使用 StDev 或 StDevP 函数。

如果派生 expr 的字段的数据类型是数字，则 DStDevP 函数返回 Double 数据类型。 如果在计算控件中使用 DStDevP 函数，则在表达式中包含数据类型转换函数以提高性能。

示例

下面的示例返回运往英国的订单全体或全体抽样的标准差估计值。 域为“Orders”表。 criteria 参数将生成的记录集限制为“ShipCountry”值等于 UK 的记录。

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

下一个示例使用 criteria 参数中的 变量strCountry计算相同的估计值。 请注意，字符串表达式中包含单引号 (') ，因此，当串联字符串时，字符串文本 UK 将括在单引号中。

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

以下示例演示如何对 DStDevP 函数使用各种类型的条件。

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

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

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

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

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

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

    ' ***************************
    ' Combinations
    ' Multiple types of criteria
    variable = DStDevP("[FieldName]", "TableName", "[Criteria1] = " & Forms![FormName]![Control1] _
             & " AND [Criteria2] = '" & Forms![FormName]![Control2] & "'" _
            & " AND [Criteria3] =#" & Forms![FormName]![Control3] & "#")
    
    ' Use two fields from a single record.
    variable = DStDevP("[LastName] & ', ' & [FirstName]", "tblPeople", "[PrimaryKey] = 7")
            
    ' Expressions
    variable = DStDevP("[Field1] + [Field2]", "tableName", "[PrimaryKey] = 7")
    
    ' Control Structures
    variable = DStDevP("IIf([LastName] Like 'Smith', 'True', 'False')", "tableName", "[PrimaryKey] = 7")
    ' ***************************

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。