comisión de ventas se puede estructurar de muchas maneras diferentes, dependiendo de la industria y la empresa. La realización de este cálculo dentro de un programa de Visual Basic es rápido y eficiente. VB proporciona un par de formas de bucle a través de un conjunto de datos, el procesamiento de cada elemento de uno en uno hasta el final. El programa puede leer toda la información de un archivo o base de datos, un bucle a través de los datos de un registro a la vez. Los resultados tampoco se pueden insertar en una tabla de base de datos para la generación de informes más tarde, escribe en un archivo o por correo electrónico a un supervisor.
Instrucciones
1 Abrir una conexión ya sea a una base de datos o un archivo externo para recuperar la entrada para la aplicación de Visual Basic. Tendrá que definir las variables de tipo double para mantener la comisión, salario, tipo de comisión y las cifras de ventas para el mes en curso.
2 Bucle a través de la información utilizando un "Do While" bucle. Si la recuperación de las aportaciones de una base de datos, "Hacer mientras que no rstSalesData.EOF" se ejecutará los comandos que siguen a esta declaración hasta que se haya alcanzado el final del conjunto de registros.
3 Recuperar las cantidades necesarias para el cálculo de la comisión. Una comisión típico podría ser que el vendedor recibe el 10 por ciento de las ventas de más de $ 10.000 y un 5 por ciento en las ventas de menos de $ 10.000. En primer lugar, recuperar el importe de las ventas para el mes en la variable de ventas y el salario en la variable salario. Si la cantidad es más de $ 10.000, la tasa de comisión será del 5 por ciento. Establecer la variable tasa igual a 0,05 y las ventas variable igual a la cantidad de las ventas, $ 4,700 para ejemplo.
4 Calcular la comisión mediante la adopción de las ventas de tiempos variables el tipo de comisión.
dCommission = dSales * Drate.
Obtener el salario total para el mes añadiendo "dCommission" a la variable salario de "dSalary." Formato "dSalary" con dos decimales para obtener una cantidad exacta en dólares.
5 Terminar el ciclo con "Loop". El código del programa final debe ser similar a esto:
Aunque no hacer rstSalesData.EOF
dSales = rstSalesData.field ( "Ventas"). Valor
Si dSales <10000 A continuación,
dRate = .05
Más
dRate = .10
Terminara si
dSalary = rstSalesData.fields ( "salario"). Valor
dCommission = dSales * Drate
dSalary = round ((+ dSalary dCommission), 2)
"Añadir código aquí para actualizar la base de datos con dSalary o escribir en un archivo
rstSalesData.MoveNext
Lazo
La línea que comienza con un apóstrofe es un comentario en Visual Basic. Aquí es donde se podría añadir una función a salvar "dSalary" a un archivo o la base de datos antes de pasar al siguiente registro.