Desarrollo de programas

Fecha: Febrero 24 de 2014

Asignatura: Tecnología e Informática.

Formación en Valor: Justicia.

Núcleo Integrador:  Desarrollo de programas básicos con el condicional IF y la instrucción MSGBOX.

Objetivo: Desarrollar programas utilizando condicionales y mensajes.

Tenga en cuenta:

La instrucción INPUTBOX, me permite mostrar un mensaje y capturar un dato, el cual se almacena en una variable. (vea el núcleo anterior).

Ejemplo:

DIM Nombre AS String

Nombre = INPUTBOX("Escriba su Nombre ")

Esta instrucción muestra el mensaje "Escriba su Nombre ", el usuario escribe el nombre y este queda almacenado en la variable Nombre.

MSGBOX, es una instrucción que nos muestra un mensaje.

Para que aparezca este mensaje debe escribir:

MsgBox "Ejemplo de como mostrar un Mensaje", vbExclamation, "Clase Nro 3"

EJEMPLO:

Desarrolle el siguiente diseño:

copie el código:

Private Sub Command1_Click()
  Dim Nombre As String, Ingresos As Currency, Deudas As Currency, ValorPagar As Currency
  Nombre = InputBox("Escriba su Nombre")
  Ingresos = InputBox("Escriba el valor de sus ingresos mensuales")
  Deudas = InputBox("Escriba el valor de sus Deudas Mensuales")

  ValorPagar = Ingresos - Deudas
  Text1 = ValorPagar
  MsgBox "El Valor a pagar es " + Str(ValorPagar), vbExclamation, "Clase Nro 3"

End Sub 

PRESIONE LA TECLA F5, PARA EJECUTAR EL PROGRAMA

TALLER:

Desarrolle un programa que capture dos datos y brinde una respuesta acorde con el resultado.