Sexto programa características sociales

Programa para determinar las características sociales (Censo)

A continuación los códigos de ejemplo y ejercicios de practica para el sexto programa en visual basic 6.0

Sexto programa en Visualbasic (Sexo_Nacionalidad)

DECLARACION DE VARIABLES PARA QUE FUNCIONE LOS CONTADORES

Dim mujeres as double

Dim hombres as double

Botón PROCESAR

If optfemenino.value = true then

Mujeres = mujeres + 1

Lblsexo.caption = “Es mujer”

Else:

Hombres = hombres + 1

Lblhombres.caption = “Es hombre”

End if

Botón VER RESULTADOS

Lbltotalmujeres.caption = mujeres

Lbltotalhombres.caption = hombres

1.        Colocar 1 característica social adicional  (1 Frame con 3 option button). Ejemplo: Tipo de vivienda, número de hijos, otros… Para realizar esta característica se debe utilizar el código con If anidados a continuación un ejemplo:

If… Anidados

Imagina que lo que queremos ahora es que el ordenador nos devuelva, mirando la edad que

introducimos, si es menor de 10 años, si tiene entre 10 y 20 años, si tiene entre 20 y 30 años o si es

mayor de 30. Hasta este momento solo hemos visto la instrucción If para poder controlar un caso

como el que planteamos.

Veamos que código tendríamos que usar para que funcione el caso anteriormente

planteado.

Escribe estás líneas dentro del botón Calcular. Borra las instrucciones escritas anteriormente:

2.       Al inicio (Form load) solo se deben mostrar los commandbutton: mostrar, totalizar, borrar pantalla, reiniciar y salir.

3.       Al hacer click en totalizar aparecerán los totales de las características sociales y se hace inusable o deshabilitado el botón “mostrar” con sus labels.

4.       Realizar un Botón “Continuar”que sirve para habilitar el botón “mostrar” con sus labels y desaparece los labels de los totales.

5.       Realizar los botones de: Borrar, reiniciar, salir, continuar con msgbox”.

6.      Realizar un msgbox de bienvenida utilizando “Inbox”.

hGUIA COMPLETA DEL SEXTO PROGRAMA: Descarga aquí