您可以使用 DAvg 函數來計算網域) (指定記錄集中的一組值的平均值。 在 Visual Basic for Applications (VBA) 模組、巨集、查詢運算式或計算控制項中使用 DAvg 函數。
例如，您可以在運費的選取查詢準則列中使用 DAvg 函數，將結果限制為運費超過平均值的記錄。 或者，您可以在計算控件中使用包含 DAvg 函數的運算式，並在新訂單的值旁邊顯示先前訂單的平均值。
語法
DAvg (expr， domain [， criteria] )
DAvg 函數語法具有下列引數：
| 引數 | 描述 |
|---|---|
| expr | 必要。 運算式，用來識別包含您想要計算平均值之數值資料的欄位。 它可以是識別資料表或查詢中欄位的字串運算式，或可以是在該欄位的資料上執行計算的運算式。 在 expr 中，您可以加入資料表中的欄位名稱、表單上的控制項、常數或函數。 如果 expr 包含函數，它可以是內建或使用者定義，但不得是另一個網域彙總或 SQL 彙總函數。 |
| domain | 必要。 識別構成範圍之記錄集的字串運算式。 它可以是資料表名稱，或不需要參數之查詢的查詢名稱。 |
| criteria | 可省略。 用來限制執行 DAvg 函數的資料範圍的字串運算式。 例如， criteria 通常相當於 SQL 運算式中的 WHERE 子句，但沒有 WHERE 字樣。 如果省略 準則 ， DAvg 函數會針對整個範圍評估 expr 。 準則 中包含的任何 欄位也必須是 範圍內的欄位;否則， DAvg 函數會傳回 Null。 |
註解
包含 Null 值的記錄不會被計入平均值的計算中。
無論您是在巨集、模組、查詢運算式或計算控制項中使用 DAvg 函數，您都必須仔細建構 準則 引數以確保能正確進行評估。
您可以使用 DAvg 函數在查詢的 [準則] 列中指定準則。 例如，假設您想要檢視訂單數量高於平均訂單數量的所有產品清單。 您可以在 [訂單]、[訂單詳細資料] 和 [產品] 資料表上建立查詢，並包含 [產品名稱] 欄位和 [數量] 欄位，在 [數料] 欄位底下的 [準則] 資料列中包含下列運算式：
>DAvg("[Quantity]", "Orders")
您可以在查詢的導出欄位運算式內，或在更新查詢的 [更新至] 列中使用 DAvg 函數。
注意
您可以在合計查詢的導出欄位運算式中使用 DAvg 或 Avg 函數。 如果您使用 DAvg 函數，值會在資料分組之前進行平均。 如果您使用 Avg 函數，資料會在欄位運算式中的值平均之前進行分組。
當您需要指定準則以限制執行 DAvg 函數的資料範圍時，請使用計算控制項中的 DAvg 函數。 例如，若要顯示出貨至加州的平均運費，請將文字輸入框的 ControlSource 屬性設定為下列運算式：
=DAvg("[Freight]", "Orders", "[ShipRegion] = 'CA'")
如果您只想想要 平均範圍中所有記錄，請使用 Avg 函數。
如果需要顯示的欄位不在表單所根據的記錄來源時，您也可以在模組或巨集中或是表單上的計算控制項中，使用 DAvg 函數。 例如，假設您有一份以 [訂單] 資料表為基礎的表單，而您想要從 [訂單詳細資料] 資料表包含 [數量] 欄位，以顯示特定客戶訂購的平均項目數。 您可以使用 DAvg 函數 執行此計算，並顯示表單上的資料。
秘訣
- 如果您在計算控制項中使用 DAvg 函數，建議您將控制項放在表單頁首或頁尾，如此一來，每次移至新記錄時，就不會重新計算此控制項的值。
- 如果衍生 expr 之欄位的資料類型是數字， DAvg 函數會傳回 Double 資料類型。 如果您在計算控制項中使用 DAvg 函數，請在運算式中包含資料類型轉換函式，以改善效能。
- 雖然您可以使用 DAvg 函數來決定外部資料表中欄位值的平均，但建立包含所需欄位的查詢，然後根據該查詢來執行表單或報表可能會更有效率。
注意
使用這個函數時，不會包括 網域 中未儲存的記錄變更。 如果想要 DAvg 函數以變更的值為基礎，您必須先儲存變更，方法是按一下 [資料] 索引標籤的 [記錄] 底下的 [儲存記錄]，將焦點移到另一筆記錄，或是使用 [更新] 方法。
範例
注意
下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊，請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考]，並在 [搜尋] 方塊中輸入一個或多個字詞。
下列函數會傳回指定日期或之後出貨訂單的平均運費。 網域是 [訂單] 資料表。 criteria 引數會根據指定的國家/地區和出貨日期來限制結果的記錄集。 請注意，字串中包含關鍵字 AND ，以分隔 準則 引數中的多個欄位。 DAvg 函數計算中包含的所有記錄都會有這兩個準則。
Public Function AvgFreightCost _
(ByVal strCountryRegion As String, _
ByVal dteShipDate As Date) As Double
AvgFreightCost = DAvg("[Freight]", "Orders", _
"[ShipCountryRegion] = '" & strCountryRegion & _
"'AND [ShippedDate] >= #" & dteShipDate & "#")
End Function
若要呼叫函數，請在 [立即] 視窗中使用下列程式碼行：
:AvgFreightCost "UK", #1/1/96#