Visual Basic.NET - Ayuda visual basic 2010 calculr horas extras y regulares pagadas 1.2

   
Vista:

Ayuda visual basic 2010 calculr horas extras y regulares pagadas 1.2

Publicado por Ivan (1 intervención) el 04/05/2014 23:40:24
Es mi primer año de Universidad necesito ayuda en cómo escribir un código en Visual Basic 2010

El cual el usuario pueda ingresar las horas que trabajo ejemplo 40 y que sean pagadas a $10.00 la hora pero que si trabajo horas extras ósea mas de 40 que sean multiplicadas a 1.5
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Ayuda visual basic 2010 calculr horas extras y regulares pagadas 1.2

Publicado por omar pc.net.2018@hotmail.com (128 intervenciones) el 05/05/2014 17:16:53
1
2
3
4
5
6
7
8
9
10
11
cadahora=10
horastrabajados=40
sitrabajomasde40horas=1.5
 
saberhorasextras=?
 
if horastrabajadas>40
 
saberhorasextras*1.5
 
end if
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Ayuda visual basic 2010 calculr horas extras y regulares pagadas 1.2

Publicado por Alvaro Godoy aegodoy@gmail.com (26 intervenciones) el 05/05/2014 17:29:46
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
dim  vlTotalHorasTrabajadas as integer
dim vlValorHorasExtrasTrabajadas as integer
vlTotalHorasTrabajadas = 0
vlTotalHorasTrabajadas = Cint(txtTotalHorasTrabajadas.text
 
' Aqui hacemos el calulo normal del valor de las horas, pues esta como base las 40 horas laboradas
'-----------------------------------------------------------------------------------------------------------------------------------------
 vlValorHorasTrabajadas = vlTotalHorasTrabajadas * 10
 
' En este IF solo el resto de las horas laboradas, por ejemplo el empleado trabajo 45 horas, en el paso anterior
' se calcularon las primeras 40 horas (40*10 = 400), en este condicional solo se tomaran el resto de las horas
' osea las 5 horas restantes (5*1.5 = 7.5) 
'-----------------------------------------------------------------------------------------------------------------------------------------
if (vlTotalHorasTrabajadas >40) then
    vlValorHorasExtrasTrabajadas = (40 - vlTotalHorasTrabajadas) * 1.5
end if
 
msgbox ("Total de horas trabajadas " & vlTotalHorasTrabajadas & chr(13) & _
                 "Valor de horas trabajadas " & (vlValorHorasTrabajadas + vlValorHorasExtrasTrabajadas)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar