martes, 8 de febrero de 2011

DAR CLIK PARA VER LOS DATOS DEL EMPLEADOS

IF CInt(TextBox1.Text) > 500 THEN
Message("CHEQUE SEMANAL")
ELSE
IF CInt(TextBox1.Text) <= 500 THEN
TextBox2.Text = Val(TextBox1.Text) * 0.25
Message(" BONO DEL 25% ")
END IF
END IF
END

No hay comentarios:

Publicar un comentario