Funciones Var, VarP (Microsoft Access SQL)
Se aplica a: Access 2013 | Access 2016
Devuelven cálculos de la variación de un llenado o muestra de llenado representado como un conjunto de valores contenidos en un campo especificado de una consulta.
Sintaxis
Var(expr)
VarP(expr)
El marcador expresión representa una expresión de cadena que identifica el campo que contiene los datos numéricos que se desean evaluar o una expresión que realiza un cálculo con los datos del campo. Los operandos de expresión pueden incluir el nombre de un campo de tabla, una constante o una función (que puede ser intrínseca o definida por el usuario, pero no una de las otras funciones de agregado de SQL).
Comentarios
La función VarP evalúa un llenado y la función Var evalúa una muestra de llenado.
Si la consulta base contiene menos de dos registros, las funciones Var y VarP devuelven un valor Null, que indica que no se puede calcular una variación.
Use las funciones Var y VarP en una expresión de consulta o en una instrucción SQL.
Ejemplo:
En este ejemplo, se utiliza la tabla Orders para calcular la variación de costos de transporte para los pedidos enviados al Reino Unido.
En este ejemplo, se llama al procedimiento EnumFields, que se incluye en el ejemplo de la instrucción 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
Vea también
- Acceso al foro de desarrolladores
- Acceso a la ayuda en support.office.com
- Acceso a foros en UtterAccess
- Acceso al centro de ayuda de programadores VBA y desarrolladores (FMS)
- Acceso a las publicaciones en StackOverflow
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.