Control de Ciber Clic aquí para descargar código fuente - Mediafire Puedes llevar de una forma muy sencilla el control de un pequeño Ciber. Practica plantilla que puedes modificar dependiendo de tus necesidades. Tenemos la hoja Principal(menú) haciendo clic en una de las cuatro imágenes este nos lleva a cada una de las hojas PC 1, PC 2, PC 3, PC 4 y solo debemos registrar hora de entrada. Luego presionar botón detener y en forma automática va a registrar la hora de salida y el valor a pagar. Fórmulas: =hora(ahora())&”:”&minuto(ahora()) =(celda salida – celda entrada)*monto a cobrar*24 Para modificar el precio del monto a cobrar en este caso yo lo dispuse en $ 350 , debes presionar tecla ALT + F11 . Una vez en el editor de VBA debes modificar esta formula: ActiveCell.FormulaR1C1 = “=(R[-3]C-R[-6]C)* 350 *24″ Cambia el 350 por el monto que tu desees y guarda los cambios. Para hacer un nuevo registro ...
Estructuras Cíclicas o Repetitivas Ejercicio de Consola: Se desea calcular el salario neto mensual de un trabajador en función del número de horas trabajadas y las diferentes tasas de impuestos de acuerdo a la siguiente tabla: Las primeras 40 horas se pagan a tarifa normal. Las horas que excedan a 40, se pagan a 1,5 veces de la tarifa normal. Las tasas de impuestos son: Los primeros S/. 200,00 (nuevos soles) son libres de impuestos. Los siguientes S/. 200,00 (nuevos soles) tienen un impuesto del 25%. Los restantes o excedentes tienen un impuesto del 35%. Nota: El ejercicio debe repetirse dos veces sin salir de la ejecución. Sub Main() Dim nom As String Dim rep, hor, exc As Integer Dim suel, pag, sal, pag1, sal1, imp, cob As Single ...
Comentarios
Publicar un comentario