Avg関数 : Access

Access Avg関数はSQL集合関数です。

クエリで指定したフィールドの平均値を計算します。
また、Recordset オブジェクトを作成するSQL文でも使用できます。

BackHomeへ BackAccess関数メニューへ



■ 構文
Avg(expr)

■ 引数
expr : 平均値を求めるフィールドを指定します。

■ 戻り値
合計を個数で割った算術平均が返ります。
フィールド値がNullの場合は除外して計算します。

■ Access実行画面

「平均算出」ボタンをクリックすると、商品マスターの”単価平均”と”重量平均”が表示されます。
レコードセットでAvg関数を使用したフォーム


■ Access VBA 実行コード

Avg関数を使用し、レコードセットを開いています。
Option Compare Database
Private Sub コマンド0_Click()
    Dim rs As Recordset
    'レコードセットを開く
    Set rs = CurrentDb.OpenRecordset("SELECT Avg(単価),avg(重量) FROM 商品マスター")
    If Not rs.EOF Then
        'フィールド0 は単価の平均値
        Me!テキスト1 = rs(0)
        'フィールド1 は重量の平均値
        Me!テキスト3 = rs(1)
        End If
    '終了処理
    Set rs = Nothing
End Sub



BackHomeへ BackAccess関数メニューへ

Copyright(C) FeedSoft