Unidad 3. Lenguaje Visual Basic de Aplicaciones (VBA) (IX)



Ingreso de datos. Emisión de resultados

Ingreso de datos: Método InputBox(…)

En VBA los datos se ingresan usando el método InputBox(…) el cual abre una ventana de diálogo. La sintaxis de este método es:

expresión.InputBox(Prompt[,Title][,Default][,XPos][,YPox]  [,HelpFile]  [,Context])

donde

expression       Es el nombre de un determinado objeto Application.

                        Si no se usa, asume Aplication.

Prompt            Cadena de caracteres, requerido. Es usado como información al usuario sobre lo que se le pide que ingrese.

Title                 Cadena de caracteres de tipo Variant, opcional. Es usado para colocarlo en la barra de titulo de la ventana de diálogo.

Default            Es opcional. Es el valor que se asigna a la variable receptora, si no se digita ningún dato.

XPos               Es la posición horizontal (en pixels) a partir de la cual se visualizará la ventana

YPos               Es la posición vertical (en pixels)a partir de la cual se visualizará la ventana.

HelpFile           Es el nombre del archivo de ayuda.

Context                       Es la posición o ubicación dentro del tema de la ayuda, relativo a la instrucción.

Nota:

Todos los ejemplos de aquí en adelante, pueden ser probados copiando hacia la ventana de código, correspondiente a un módulo. Si no hubiera ningún módulo, haga clic en el comando <Insertar>, luego en <Modulo>.

Nota:

Para ejecutar un procedimiento contenido en un módulo, haga que el cursor se encuentre al interior del procedimiento a ser ejecutado; luego haga clic en . Para detener la ejecución de un procedimiento que ha fallado, haga clic en .

Ejemplo 4

En este ejemplo se pide ingresar un número y que si no se digita, la variable Num recibirá el valor que se asume, 120. La ventana de diálogo tendrá por título "Ingreso de datos", se desplegará a partir de las coordenadas (4830, 2210) de la pantalla (en pixels). En la siguiente instrucción no se coloca un título, si no se digita una expresión, la variable texto contendrá "Hola Perú" y cambiará de posición.

Sub datos()

Num = InputBox("Ingresa un número", "Ingreso de datos", 120, 4830, 2210)

Texto = InputBox("Hola Perú",  , 5, 1200, 4800)

End Sub

Emisión de resultados: Función MsgBox(..)

Para poder emitir o imprimir en pantalla el contenido de una variable o el resultado de un cálculo, se usa la función MsgBox (…), el cual abre una ventana en cual se visualizará todos los resultados emitidos. La sintaxis de este método es el siguiente:

MsgBox (Prompt [,Botones] [,Title] [,HelpFile] [Context])

donde

Prompt            Cadena de caracteres de hasta 1024 bytes. Si ocupa más de una línea se puede separar usando el carácter de retorno de carro CHR(13), o un carácter de avance de línea CHR(10) o una combinación de los dos: CHR(13)+CHR(10).

Botones          Permite mostrar u determinado tipo d botón a través de un icono. La siguiente tabla muestra la lista de las variables internas usadas para mostrar el icono.

El siguiente procedimiento permite ingresar la cantidad y el precio de compra de un producto y luego calcular el monto neto, después de aplicar el impuesto del IGV.

Noviembre-2010
Pág. 3.9

Atrás  Inicio  Adelante





Página inicial  Cursos Informática Gratuitos

Síguenos en:   Facebook       Sobre aulaClic            Política de Cookies