適用先: Access 2013 | Access 2016
クエリで指定したフィールドにある値を母集団または母集団の標本と見なして、その分散の概算値を返します。
構文
Var(expr)
VarP(expr)
expr プレースホルダーは、評価する数値データを含むフィールドを識別する文字列式、またはそのフィールド内のデータを使用して計算を実行する式を表します。 expr のオペランドには、テーブル フィールド、定数、または関数の名前を含めることができます (組み込み関数またはユーザー定義関数のいずれかでも、他の SQL 集計関数の 1 つでもかまいません)。
注釈
VarP 関数は母集団を評価し、Var 関数は母集団の標本を評価して分散を計算します。
元になるクエリにレコードが 1 つしかない場合は、Var および VarP 関数は分散を計算できないため Null 値を返します。
クエリ式または SQL ステートメントで Var 関数と VarP 関数を使用します。
例
次の使用例では、Orders テーブルを使用して、英国に出荷された受注品の運送料の分散を計算します。
この例では、EnumFields プロシージャを呼び出します。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
関連項目
- 開発者フォーラムにアクセスする
- support.office.com のヘルプにアクセスする
- UtterAccess のフォーラムにアクセスする
- 開発者と VBA のプログラミング ヘルプ センター (FMS) にアクセスする
- StackOverflow のアクセス ポスト
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。