dim empName as string, dim hourlyRate as single, dim hoursWorked as integer, dim wages as single, empName = inputbox("Enter employee name"), hourlyRate = inputbox("Enter employee's hourly rate"), hours = inputbox("Enter employee's hours worked"), wage = hourlyRate * hours, msgbox("The wages for " & empName & " are £ " & wages).

Tabla de clasificación

Estilo visual

Opciones

Cambiar plantilla

¿Restaurar actividad almacenada automáticamente: ?