P2E11 – día de la semana

Crear un formulario teniendo como entrada de datos un número entero cualquiera. Habiendo hecho una evaluación, usted deberá determinar mediante mensaje en una etiqueta el día de la semana con letra al que corresponde.

Deberá además cambiar el fondo de color de la etiqueta tomando de referencia la siguiente tabla:

Valor de entrada	Constante	Descripción
1	vbBlack	Negro
2	vbRed	Rojo
3	vbGreen	Verde
4	vbYellow	Amarillo
5	vbBlue	Azul
6	vbMagenta	Fucsia
7	vbCyan	Aguamarina

Ejemplo: si el usuario dio como entrada el numero 3 usted deberá visualizar como salida MARTES y color de fondo verde. Si el usuario dio como entrada el numero 7 usted deberá visualizar como salida SABADO y color de fondo Aguamarina.

Generales:

• Debe validar que el cuadro de texto acepte solo números.
• La entrada de números debe ser únicamente en el rango de 1…7
• Incluir los botones de calcular, limpiar y salir; incluyendo icono en cada uno.
• Utilizar nombres y prefijos tanto para controles como para variables según corresponda.
• Determine un color de texto para la etiqueta que combine con todos los colores de fondo.

Siempre iniciativa, creatividad, análisis y capacidad de resolución.

Recuerden que los ejercicios son equipos de dos integrantes y entre los dos deben realizar los diferentes ejercicios. Trabajo colaborativo y participativo.

Créditos: lemm

P2E10 – aplicar descuento

Una empresa vende hojas de hielo seco, con las condiciones siguientes de descuento:

• Si el cliente es tipo 1 se le descuenta el 5%
• Si el cliente es tipo 2 se le descuenta el 8%
• Si el cliente es tipo 3 se le descuenta el 12%
• Si el cliente es tipo 4 se le descuenta el 15%

Cuando el cliente realiza una compra se solicitan los siguientes datos de entrada:

• Nombre del cliente
• Tipo de cliente (1, 2, 3, 4)
• Cantidad de hojas
• Precio por hoja

Crear dicho formulario para que genere como salida:

• Nombre del cliente
• Subtotal a pagar (Cantidad de hojas X Precio por hoja)
• Descuento (El porcentaje correspondiente del Subtotal a pagar)
• Total a pagar (Subtotal – Descuento)

Generales:

• La captura del nombre del cliente es en un cuadro de texto el cual debe aceptar solo letras y espacios. Al perder el foco dicho control, su contenido debe cambiar a mayúsculas automáticamente.
• La elección del tipo de cliente es mediante botón de opción.
• Poner un rango para la cantidad de hojas y para el precio por hoja. Validar que su entrada sean solo números.
• La secuencia de tabulación debe ser correcta (TabIndex)
• El paso de un cuadro de texto a otro es mediante ENTER.
• Incluir los botones de calcular, limpiar y salir; incluyendo icono en cada uno.
• Utilizar nombres y prefijos tanto para controles como para variables según corresponda.

Busca siempre la estética en la presentación, el control del formulario y la optimización del código.

Recuerda utilizar tu sentido común.

Créditos: lemm

P2E9 – tipo de ángulo

Crear un formulario teniendo como entrada de datos un número entero cualquiera el cual representa el tamaño de un ángulo en grados.

Habiendo hecho una evaluación, usted deberá determinar mediante mensaje en una etiqueta cual de los siguientes estatus es el que corresponde al número introducido por el usuario:

• Agudo si es menor que 90°
• Recto si es igual a 90°
• Obtuso si es mayor que 90° pero menor que 180°
• Llano si es igual a 180°
• Cóncavo si es mayor que 180° pero menor que 360°

Generales:

• Debe validar que el cuadro de texto acepte solo números.
• La entrada de números debe ser únicamente en el rango de 0…360
• La secuencia de tabulación debe ser correcta (TabIndex)
• Incluir los botones de calcular, limpiar y salir; incluyendo icono en cada uno.
• Utilizar nombres y prefijos tanto para controles como para variables según corresponda.

*Recuerda que el tema que se esta revisando son Instrucciones de Decisión: IF o SELECT CASE.

Consulta en tiempo y forma todas tus dudas..!

Créditos: lemm

P2E8 – par - impar

Crear un formulario teniendo como entrada de datos un número entero cualquiera ya sea positivo o negativo. Habiendo hecho una evaluación, usted deberá determinar mediante mensaje en una etiqueta cual de los siguientes estatus es el que corresponde al número introducido por el usuario:

• Par – positivo
• Par – negativo
• Impar – positivo
• Impar – negativo

Generales:

• Debe validar que el cuadro de texto acepte solo números.
• La entrada de números debe ser únicamente en el rango de -1000…1000
• La secuencia de tabulación debe ser correcta (TabIndex)
• Incluir los botones de calcular, limpiar y salir; incluyendo icono en cada uno.
• Utilizar nombres y prefijos tanto para controles como para variables según corresponda.

*Esta es solo una versión combinada de los ejercicios realizados ya realizados en clase.

Recuerda que todo es un proceso el cual se va ampliando gradualmente por lo que es importante mantener el paso.

Consulta en tiempo y forma todas tus dudas..!

Créditos: lemm

P2E7 – mayor de tres números

Dentro del mismo proyecto de Parcial_dos

Crear un formulario teniendo como entrada de datos tres números enteros cualesquiera, para determinar cual es el Mayor de dichos números (se asume son diferentes) debiendo informarle al usuario en una etiqueta.

Generales:

• Debe validar que los cuadros de texto acepten solo números.
• La entrada de números debe ser únicamente en el rango de 0…1000
• La secuencia de tabulación debe ser correcta (TabIndex)
• El paso de un cuadro de texto a otro es mediante ENTER.
• Incluir los botones de calcular, limpiar y salir; incluyendo icono en cada uno.
• Utilizar nombres y prefijos tanto para controles como para variables según corresponda.
• El diseño y propiedades principales quedan a su consideración tomando de referencia conocimientos y habilidades.

*Para la realización de este ejercicio toma de referencia los ya realizados en clase. Recuerda que todo es un proceso el cual se va ampliando gradualmente por lo que el reto principal es mantener el paso.

Planea bien tus tiempos.

Créditos: lemm

Instrumentos de evaluación

Aquí se encuentra el archivo con los instrumentos de evaluación de las primeras seis practicas del segundo parcial.

Recuerden imprimirlas y verificar sus ejercicios para que cumplan con todos los puntos.

Parte I - Practicar el uso de IF

De acuerdo a lo visto en clase el objetivo de los siguientes planteamientos es reforzar la comprensión sobre el uso y funcionamiento de la instrucción de decisión IF.

Para lo anterior deberás realizar con lápiz y en una hoja de tu cuaderno (que puedas desprender) la resolución de los diferentes planteamientos, haciendo referencia únicamente el segmento correspondiente al IF.

Ejemplo:

Planteamiento

Teniendo como entrada de datos un numero entero, determinar si es un numero positivo o negativo.

Resolución

IF intNumero > 0 THEN

lblRes.Caption = intNumero & “ es positivo”

ELSE

lblRes.Caption = intNumero & “ es negativo”

END IF

PLANTEAMIENTOS A RESOLVER

1. Teniendo como entrada de datos dos números enteros cualesquiera, determinar cual es el menor de dichos números debiendo informarle al usuario.

2. Teniendo como entrada de datos un numero entero cualquiera, determinar si dicho numero es PAR o IMPAR debiendo informarle al usuario.

Para este ejercicio debes utilizar MOD (residuo de una división entera).

25 MOD 2 = 1	10 MOD 2 = 0
17 MOD 2 = 1	24 MOD 2 = 0
57 MOD 2 = 1	98 MOD 2 = 0
45 MOD 2 = 1	36 MOD 2 = 0

Recuerda cual fue la conclusión de la tabla anterior.

3. El total a pagar por un cliente depende del monto de su compra, ya que se la aplicara un descuento considerando lo siguiente:

a) La compra es menor a $500.00 el descuento es del 3% (0.03)

b) La compra es mayor a $500.00 el descuento es del 7% (0.07)

Realice la validación y operaciones correspondientes, que determinan finalmente cuanto debe pagar el cliente.

4. Teniendo como entrada de datos un numero entero cualquiera entre 1 y 12, determinar el nombre del mes al que corresponde debiendo informarle al usuario.

Ejemplo: si el usuario dio como entrada el numero 3 usted deberá visualizar como salida MARZO. Si el usuario dio como entrada el numero 11 usted deberá visualizar como salida NOVIEMBRE.

Importante: la validación para que solo acepte números y estos sean  en el rango 1..12 será parte complementaria en otro ejercicio.

5. Teniendo como entrada el valor de X calcular el de Y de acuerdo con las siguientes condiciones:

• Si X < 0 entonces Y = 3X + 6
• Si X >= 0 entonces Y = X² + 6

Es importante que realices estos ejercicios los cuales contribuyen a complementar y reforzar tus bases de programación.

.: – :.

A aprender a programar se aprende programando.

Es importante utilices el sentido común, el menos común de los sentidos.

Date tiempo para realizarlos: analiza, deduce, plantea y replantea si es necesario..!

Esto apenas comienza, redobla esfuerzos si es necesario… estamos trabajando en desarrollar lógica de programación, esencial para todos los futuros ingenieros.

Si se puede..!

.: – :.

Créditos: lemm

Estructuras de Decisión

Puedes encontrar los apuntes de estructuras de decisión en esta dirección.

Toda vez que revisaste el apunte contesta para entregar impreso las siguientes preguntas:

1. Señala cuales son las estructuras de decisión que pueden ser utilizadas en VB.
2. Describa que es una condición.
3. Ponga un ejemplo utilizando If…Then
4. Cuando utilizaría una sentencia If…Then…Else
5. Cuando utilizaría una sentencia If…Then…ElseIf
6. Cuando recomendaría utilizar Select Case en lugar de If…Then..End If
7. Explica el funcionamiento de los ejemplos 1, 2 y 3 de la pagina 5

Créditos: lemm

P2E6 – Tipo de cambio

Crear un formulario el cual lea una cantidad en dólares y el tipo de cambio (costo de un dólar en pesos).

Calcular y visualizar la cantidad equivalente en pesos mexicanos (deberá visualizar con formato tipo moneda).

Importante: el tipo de cambio deberá ser el primer dato que se capture en un InputBox al momento de arrancar el formulario (Form Load), dicho InputBox deberá validar la entrada de solo números.

Apóyate en la información de este link

Créditos: lemm

P2E5 – Convertir

Crear un formulario el cual reciba como dato de entrada una cantidad de horas, a continuación usted deberá realizar los cálculos correspondientes para visualizar el equivalente en: minutos, segundos y días.

Importante: el cuadro de texto que acepta la cantidad en horas debe aceptar máximo cuatro caracteres y estos deben ser números por lo que deberá realizar dicha validación.

Para ello consulta las siguientes direcciones y elije: link, link2, link3, link4.

Créditos: lemm

P2E4 – volumen de un cilindro

Para este ejercicio se deberán mostrar inicialmente las siguientes opciones:

Derivado de lo anterior realizaras lo correspondiente para la opcion que elijar el usuario.

OPCION UNO:

El volumen de un cilindro se calcula multiplicando la constante PI (PI=3.1415926536) por el cuadrado del radio de la base (r) por la altura (h).

V = ¶r²h

Leer el radio de la base y la altura de un cilindro, para calcular y visualizar el volumen.

OPCION DOS:

Leer el radio de una esfera para calcular el volumen:

V = (4¶r³)/3

OPCION TRES:

Realizar los cálculos para el área de una esfera:

área  = 4¶r²

IMPORTANTE:

Según la opción que elija el usuario serán los datos de entrada a solicitar, los cálculos a realizar y los únicos controles a visualizar.

Para ello puedes utilizar un formulario a parte para cada opción, o bien un frame (preferente) el cual contenga lo correspondiente para cada opción  el cual se pueda estar ocultando o visualizando.

Antes de iniciar imagina como debería estar operando.

Créditos: lemm

P2E3 – Total a pagar

Crear un formulario para realizar el pago de una compra.

Los datos de entrada son: nombre del articulo, cantidad de artículos comprados y precio por cada articulo.

Las operaciones a realizar serían: importe, IVA del 16% y el total a pagar.

Ejemplo:

• ARTICULO: camisas
• CANTIDAD: 20
• PRECIO UNITARIO: 10
• Importe: 200 (20 * 10)
• IVA: 32 (200 * 0.16)
• Total a pagar: 232 (200 + 32)

La siguiente es una imagen de referencia:

Consideraciones:

1. Recuerda que la cantidad, precio y articulo son diferentes en cada ocasión.
2. El porcentaje de IVA debes declararlo como una constante.
3. Debes obligar a que en tu formulario se declaren las variables de manera explicita, o sea utilizando al inicio de la ventana de código: Option Explicit.
4. El botón SALIR tiene activada la tecla de ESC.
5. Para la descripción del articulo se utiliza un Maxlength de 35
6. Se brinca de un cuadro de texto a otro mediante la tecla de ENTER.
7. No olvides el uso de las variables tipo Currency.
8. Bloquear los cuadros de texto que no requieran captura de información.
9. Utilizar la propiedad TabStop y TabIndex para los cuadros de texto.
10. Para que el total a pagar te aparezca con signo de pesos y siempre con solo dos decimales puedes utilizar la siguiente línea:

 

Donde lblRes es el nombre de la etiqueta, Format es una funcion para dar formato, curTotal es la variable de tipo currency para calcular el total y “currency” es el tipo de formato que queremos que aplique.

Todas tus dudas anótalas para consultarlas en clase.

Créditos: lemm

P2E2 – promedio de calificaciones

Calcular el promedio de cuatro calificaciones correspondientes a cuatro materias.

Los datos de entrada son la calificación de cada materia en escala de 0..100.

El resultado de salida es el promedio de las mismas.

IMPORTANTE:

Investiga como pasar de un cuadro de texto a otro, utilizando la tecla de ENTER en lugar de la tecla de tabulación. Toda vez que dispongas del código agrégalo en este formulario a los controles correspondientes.

Puedes seguir este link.

Procedimiento general:

1. Colocar controles y sus propiedades

2. En cada procedimiento declarar las variables que se requieran.

3. Realizar las operaciones aritméticas y/o de inicialización correspondientes.

4. Mostrar el resultado de salida.

Consideraciones:

• Utilizar para cada control aquellas propiedades que redunden en estética, control y buenos principios de la programación.

• Asignar nombres a todos los controles y variables valiéndose de los prefijos correspondientes.

NOTA: La imagen es solo una guía de como podría ser el diseño y la distribución, aplica tus habilidades y conocimientos para superarlo.

Para cualquier duda o aclaración consúltalo con oportunidad en clase.

Créditos: lemm

P2E1 – área de un triangulo

Este es el primer ejercicio correspondiente al segundo parcial, además de corresponder a la aplicación de tus primeros conocimientos y habilidades sobre programar en VB.

Enhorabuena..!

Calcular el área de un triangulo, teniendo como datos de entrada la base y la altura; deberás calcular el área.

Procedimiento general:

1. Colocar controles y sus propiedades
2. En cada procedimiento declarar las variables que se requieran.
3. Realizar las operaciones aritméticas y/o de inicialización correspondientes.
4. Mostrar los resultados de salida.

Consideraciones:

• Utilizar para cada control aquellas propiedades que redunden en estética, control y buenos principios de la programación.
• Asignar nombres a todos los controles y variables valiéndose de los prefijos correspondientes.

Para cualquier duda o aclaración consúltalo con oportunidad en clase.

Créditos: lemm

Variables y constantes

Comenzaremos a revisar lo referente a la segunda parte de Visual Basic, la cual corresponde a la programación.

Lo primero que revisaremos serán los diferentes tipos de datos, variables y constantes, para ello accede a esta dirección para bajar el archivo: revísalo, subráyalo, señala lo que no entiendas, realiza anotaciones; todo ello previo a la clase.

Toda vez que haz revisado el apunte, deberás contestar las siguientes preguntas en un archivo en Word e imprimirlo (individual):

1. ¿Cuales son los tipos de datos numéricos que existen en VB?
2. ¿Cuando se utiliza un tipo de dato currency?
3. Explique el uso de un tipo de dato Boolean:
4. ¿Que tipo de dato utilizara para manejar contenidos alfanuméricos?
5. ¿Cuando utilizaría las funciones de conversión?
6. ¿Que se debe hacer para declarar variables de forma explicita?
7. ¿Cual es la diferencia entre una variable declarada como Private y una declarada como Dim?
8. ¿Cuándo utilizaría una variable pública?
9. Ponga tres ejemplos de declaración de constantes (evitar poner las del apunte)
10. Complete la siguiente tabla

Tipo de datos	Tamaño de almacenamiento	Prefijo	Ejemplo*
Boolean
Byte
Currency
Date
Integer
Single
Double
String
Variant
Integer - global

*no poner los ejemplos del apunte

Bienvenido al mundo de la programación…!

Instrumentos de Evaluación

Puedes acceder a esta dirección para bajar los instrumentos de evaluación de todas las prácticas.

Recuerda que el objetivo de disponer de las listas de cotejo es realizar una revisión previa a todas y cada una de tus practicas para que identifiques lo que se te va a evaluar, realizando así los ajustes necesarios.

Estoy cierto de que han estado realizado su máximo esfuerzo, por lo que esta ultima parte no la dejaran a la desidia.

Les recuerdo que la revisión de evaluación es el lunes, por lo que deberán presentarse con las listas de cotejo impresas y con sus nombres(requisito).

Si crees que puedes o que no puedes… igual tienes razón..!

 

P1E14 – Menú sencillo

Este ejercicio consiste en el uso del Editor de Menus.

Se puede seleccionar color de fondo, color de texto, y diferentes mensajes, los diferentes valores al ser seleccionados deben aplicarse a la etiqueta, además de estar palomeando (vbChecked) las opciones elegidas.

En el menú de mensajes la ultima opción aparece inhabilitada, su estado cambia al momento en que se hace clic en Acerca de.

En la opción Acerca de… aparecen en un MsgBox los nombres completos de los autores de dicho formulario.

Creditos: lemm

P1E13 – Colores con scrollbar

Se te recomienda antes de hacer cualquier ejercicio leerlo completamente, al estarlo realizando anota todas las preguntas o dudas que te surjan para su aclaración en clase, asi como los elementos nuevos que descubras.

El archivo del formulario de este proyecto se puede llamar frmColores.frm.

En este ejemplo se dispone de tres barras de desplazamiento con las que pueden controlarse las componentes RGB del color del fondo y del color del texto de un control label. Dos botones de opción permiten determinar si los valores de las barras se aplican al fondo o al texto. Cuando se cambia del texto al fondo o viceversa los valores de las barras de desplazamiento (y la posición de los cursores) cambian de modo acorde.

A la derecha de las barras de desplazamiento tres cajas de texto contienen los valores numéricos de los tres colores (entre 0 y 255). A la izquierda tres labels indican los colores de las tres barras.

A continuación se muestra una tabla con los controles y las propiedades utilizadas en el este ejemplo.

Form1

Name	frmColores
Caption	Colores

Label1

Name	lblCuadro
Caption	Visual Basic
Font	MS Sans Serif, Bold, 24

Command1

Name	cmdSalir
Caption	Salir
Font	MS Sans Serif, Bold, 10

Option1*

Name	optColor
Index	0, 1
Caption	Fondo, Texto
Font	MS Sans Serif, Bold, 10

*copiar y pegar botón creando matriz de controles, lo único diferente es el index.

hsbScroll1*

Name	hsbColor
Min	1
Max	255
SmallChange	1
LargeChange	16
Index	0, 1, 2
Value	0

*copiar y pegar scrollbar creando matriz de controles (son tres).

Text1*

Name	txtColor
Text	0
Locked	True
Index	0, 1, 2

*copiar y pegar textbox creando matriz de controles (son tres).

Label2*

Name	lblColor
Caption	Rojo, Verde, Azul
Index	0,1, 2
Font	MS Sans Serif, 10

*copiar y pegar label creando matriz de controles (son tres).

Una característica importante de este ejemplo es que se han utilizado vectores (arrays) de controles. Las tres barras se llaman hsbColor y se diferencian por la propiedad Index, que toma los valores 0, 1 y 2. También las tres cajas de texto, las tres labels y los dos botones de opción son arrays de controles. Para crear un array de controles basta crear el primero de ellos y luego hacer Copy y Paste tantas veces como se desee, respondiendo afirmativamente al cuadro de diálogo que pregunta si desea crear un array.

El procedimiento Sub que contiene el código que gestiona un evento de un array es único para todo el array, y recibe como argumento la propiedad Index. De este modo que se puede saber exactamente en qué control del array se ha producido el evento. Así pues, una ventaja de los arrays de controles es que pueden compartir el código de los eventos y permitir un tratamiento conjunto por medio de bucles for. A continuación se muestra el código correspondiente a los procedimientos que tratan los eventos de este ejemplo.

Option Explicit

Public Brojo, Bverde, Bazul As Integer

Public Frojo, Fverde, Fazul As Integer

Private Sub cmdSalir_Click()

End

End Sub

Private Sub Form_Load()

Brojo = 0

Bverde = 0

Bazul = 0

Frojo = 255

Fverde = 255

Fazul = 255

lblCuadro.BackColor = RGB(Brojo, Bverde, Bazul

lblCuadro.ForeColor = RGB(Frojo, Fverde, Fazul)

End Sub

Private Sub hsbColor_Change(Index As Integer)

Dim i As Integer

If optColor(0).Value = True Then

lblCuadro.BackColor = RGB(hsbColor(0).Value, hsbColor(1).Value, _ hsbColor(2).Value)

For i = 0 To 2

txtColor(i).Text = hsbColor(i).Value

Next i

Else

lblCuadro.ForeColor = RGB(hsbColor(0).Value, hsbColor(1).Value, hsbColor(2).Value)

For i = 0 To 2

txtColor(i).Text = hsbColor(i).Value

Next i

End If

End Sub

Private Sub optColor_Click(Index As Integer)

If Index = 0 Then ‘Se pasa a cambiar el fondo

Frojo = hsbColor(0).Value

Fverde = hsbColor(1).Value

Fazul = hsbColor(2).Value

hsbColor(0).Value = Brojo

hsbColor(1).Value = Bverde

hsbColor(2).Value = Bazul

Else ’Se pasa a cambiar el texto

Brojo = hsbColor(0).Value

Bverde = hsbColor(1).Value

Bazul = hsbColor(2).Value

hsbColor(0).Value = Frojo

hsbColor(1).Value = Fverde

hsbColor(2).Value = Fazul

End If

End Sub

El código de este ejemplo es un poco más complicado que el de los ejemplos anteriores y requiere unas ciertas explicaciones adicionales adelantando cuestiones que se verán posteriormente:

1. La función RGB() crea un código de color a partir de sus argumentos: los componentes RGB (Red, Green and Blue). Estos componentes, cuyo valor se almacena en un byte y puede oscilar entre 0 y 255, se determinan por medio de las tres barras de desplazamiento.
2. El color blanco se obtiene con los tres colores fundamentales a su máxima intensidad. El color negro se obtiene con los tres colores RGB a cero. También se pueden introducir con las constantes predefinidas vbWhite y vbBlack, respectivamente.
3. Es importante disponer de unas variables globales que almacenen los colores del fondo y del texto, y que permitan tanto guardar los valores anteriores de las barras como cambiar éstas a sus nuevos valores cuando se cliquea en los botones de opción. Las variables globales, definidas en la parte de definiciones generales del código, fuera de cualquier procedimiento, son visibles desde cualquier parte del programa. Las variables definidas dentro de una función o procedimiento sólo son visibles desde dentro de dicha función o procedimiento (variables locales).
4. La función hsbColor_Change(Index As Integer) se activa cada vez que se cambia el valor en cualquiera de las barras de desplazamiento. El argumento Index, que Visual Basic define automáticamente, indica cuál de las barras del array es la que ha cambiado de valor (la 0, la 1 ó la 2). En este ejemplo dicho argumento no se ha utilizado, pero está disponible por si se hubiera querido utilizar en el código.

P1E12 – Calcular sueldo neto de trabajador

Se te recomienda antes de hacer cualquier ejercicio leerlo completamente, al estarlo realizando anota todas las preguntas o dudas que te surjan para su aclaración en clase, así como los elementos nuevos que descubras.

Recuerda que no se trata de copiar y pegar o de transcribir contenidos, ante todo es descubrir su operatividad y comprobar su funcionalidad.

Se desea elaborar la boleta de pago de los trabajadores de una fábrica. Para ello se cuenta con los siguientes datos de entrada:

Apellidos y nombres del trabajador

Sueldo básico

Horas extras trabajadas

Además, se sabe que los trabajadores laboran en dos turnos: diurno y nocturno. Y que la tarifa por las horas extras diurnas es de 10 pesos y por las horas extras nocturnas es de 15 pesos.

Los descuentos a aplicar son sobre el sueldo básico y se obtienen de la siguiente manera:

dblRenta = dblSueldoBasico * 0.1

dblFonavi = dblSueldoBasico * 0.07

dblISR = dblSueldoBasico * 0.03

Finalmente el sueldo neto del trabajador se calcula mediante las siguientes expresiones:

dblIngresos = dblSueldoBasico + intHorasExtras * dblPagoHoraExtra

dblEgresos = dblRenta + dblFonavi + dblISR

dblSueldoNeto = dblIngresos - dblEgresos

El diseño de la interfaz deberá ser similar a la figura mostrada:

Para el desarrollo de esta aplicación, proceda a ubicar los siguientes controles en el formulario:

2 marcos

5 etiquetas

8 cajas de texto

2 botones de opción

3 casillas de verificación

3 botones de comando

Luego, proceda a establecer las propiedades según se indica a continuación:

Form1

Nombre	frmBoletaDePago
BorderStyle	3-Fixed Dialog
Caption	Boleta de pago
Moveable	False

Label1

Nombre	lblTrabajador
AutoSize	True
Caption	Trabajador:

Label2

Nombre	lblSueldoBasico
AutoSize	True
Caption	Sueldo Bruto

Label3

Nombre	lblHorasExtras
AutoSize	True
Caption	Horas extras:

Label4

Nombre	lblPagoHoraExtra
AutoSize	True
Caption	Pago hora extra

Label5

Nombre	lblSueldoNeto
AutoSize	True
Caption	Sueldo neto

Text1

Nombre	txtTrabajador
Text

Text2

Nombre	txtSueldoBasico
Text

Text3

Nombre	txtHorasExtras
Text

Text4

Nombre	txtPagoHoraExtra
BackColor	&H80000004&
Text

Text5

Nombre	txtRenta
BackColor	&H80000004&
Locked	True
Text

Text6

Nombre	txtFonavi
BackColor	&H80000004&
Locked	True
Text

Text7

Nombre	txtISR
BackColor	&H80000004&
Locked	True
Text

Text8

Nombre	txtSueldoNeto
BackColor	&H80000004&
Locked	True
Text

option1

Nombre	optDiurno
Caption	Diurno
Value	True

option2

Nombre	optNocturno
Caption	Nocturno
Value	False

Check1

Nombre	chkRenta
Caption	Renta

Check2

Nombre	chkFonavi
Caption	Fonavi

Check3

Nombre	chkISR
Caption	ISR

Command1

Nombre	cmdAceptar
Caption	&Aceptar
Default	True

Command2

Nombre	cmdLimpiar
Caption	&Limpiar

Command3

Nombre	cmdSalir
Cancel	True
Caption	&Salir

Una vez establecidas las propiedades, proceda a ingresar el código que se indica a continuación:

Private Sub cmdAceptar_Click()

Dim dblSueldoBasico As Double

Dim intHorasExtras As Integer, dblPagoHoraExtra As Double

Dim dblRenta As Double, dblFonavi As Double, dblISR As Double

Dim dblIngresos As Double, dblEgresos As Double

Dim dblSueldoNeto As Double

dblSueldoBasico = Val(txtSueldoBasico.Text)

intHorasExtras = Val(txtHorasExtras.Text)

If optDiurno.Value Then

dblPagoHoraExtra = 10

End If

If optNocturno.Value Then

dblPagoHoraExtra = 15

End If

If chkRenta.Value Then

dblRenta = dblSueldoBasico * 0.1

Else

dblRenta = 0

End If

If chkFonavi.Value Then

dblFonavi = dblSueldoBasico * 0.07

Else

dblFonavi = 0

End If

If chkISR.Value Then

dblISR = dblSueldoBasico * 0.03

Else

dblISR = 0

End If

dblIngresos = dblSueldoBasico + intHorasExtras * dblPagoHoraExtra

dblEgresos = dblRenta + dblFonavi + dblISR

dblSueldoNeto = dblIngresos - dblEgresos

txtPagoHoraExtra.Text = Str(dblPagoHoraExtra)

txtRenta.Text = Str(dblRenta)

txtFonavi = Str(dblFonavi) : txtISR = Str(dblISR)

txtSueldoNeto = Str(dblSueldoNeto)

End Sub

Private Sub cmdSalir_Click()

End

End Sub

Guarde y ejecute su aplicación.

Anote sus observaciones:

- Que descubriste que sucede con el siguiente segmento de código:

If optDiurno.Value Then

dblPagoHoraExtra = 10

End If

If optNocturno.Value Then

dblPagoHoraExtra = 15

End If

- Consideras que es lo mismo utilizar opt y/o utilizar chk.

- En el siguiente segmento de código existe una condición, cuando se ejecutará la línea dblFonavi = 0.

If chkFonavi.Value Then

dblFonavi = dblSueldoBasico * 0.07

Else

dblFonavi = 0

End If

- Habiendo concluido el ejercicio. Describe la parte consideras necesario volver a repasar: