![]() |
||
6.- Sueldo Neto de un programador en 30 dias. En el siguiente ejercicio se realizara una aplicación en el cual se obtenga el sueldo neto del trabajador. Los datos a solicitar son: código o clave del trabajador, nombre del trabajador, sueldo diario del trabajador. Al sueldo se le bonificara el 3%. Este sueldo mencionado es por día, el trabajador tiene 30 días laborados. Al calcular el sueldo neto, el programa deberá mostrar el mensaje “FELICIDADES”.
Para realizar la aplicación el formulario debe contener cuatro etiquetas, cuatro cajas de texto y tres botones de comando.
![]() Después de terminar de asignarle el nombre a cada objeto del formulario continuamos a escribir el código de cada botón. Comenzamos con el botón Calcular.
Private Sub Btncal_Click()
Text4 = Val(Text3 * 30) + Val(Text3 + Val(Text3 * 3 / 100))
MsgBox ("felicidades")
End Sub
Después de haber terminado de escribir el código de el botón Calcular seguimos con el botón Nuevo. Private Sub Cmd2_Click() Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text1.SetFocus
End Sub
Posteriormente codificamos el botón Salir. Private Sub Cmd3_Click()
End
End Sub
Una vez que se haya terminado de escribir el código de los tres botones entonces ejecutamos la aplicación. ![]() |
|
|
![]() |