Sisa Mijo

UTP – INGENIERIA INDUSTRIAL
MATERIAL TEORICO-PRACTICO MSGBOX, INPUTBOX, OPERADORES
La función "MsgBox"
Abra un nuevo libro en Excel, vaya al Editor de VB (Alt+F11), inserte un módulo (Menú Insertar, Opción Módulo), y escriba
allí el siguiente programa:
Sub prog01( )
Dim nom As String
Dim Respuesta As Integer
nom = "Pepito"
MsgBox ("Hola " & nom) ‘también puede usarse… MsgBox "Hola " &nom
MsgBox "Mira el título", , "Pongo el título que quiero"
MsgBox "Observa este" & vbCrLf & "texto que ocupa" & vbCrLf & "tres líneas", , "Titulo"
MsgBox "Mira el icono de" & vbCrLf & "pregunta", vbQuestion, "Icono Interrogación"
MsgBox "Otro icono", vbCritical, "Icono Critico"
MsgBox "otro", vbExclamation, "Icono Exclamación"
MsgBox "otro mas", vbInformation, "Icono Información"
Respuesta =MsgBox(“Observa que al i ncluir más" & vbCrLf & "de un botón, en el MsgBox" & vbCrLf & "pongo paréntesis y
utilizo" & vbCrLf & "una variable, que recogerá" & vbCrLf & "el botón que hemos pulsado", vbYesNo + vbQuestion, "Dos
botones")
ActiveCell.Value = "Dos botones = " & Respuesta
Respuesta = MsgBox("tres botones", vbYesNoCancel + vbInformation, "Con icono información")ActiveCell.Offset(1,0).Value = "tres botones " & Respuesta
Respuesta = MsgBox("tres botones pero" & vbCrLf & "el activo es el segundo", vbAbortRetryIgnore + vbCritical +
vbDefaultButton2, "Icono crítico")
ActiveCell.Offset(2, 0).Value = "Tres botones pero ..." & Respuesta
End Sub
Ejecute el programa para comprobar su funcionamiento, convendría ejecutarlo varias veces observando detenidamente
lo que va sucediendoa medida que se ejecuta cada instrucción.
La primera NUEVA instrucción es DIM (no es el Deportivo Independiente Medellín…), esta instrucción permite declarar una
variable. Las variables se utilizan para almacenar datos en memoria en forma temporal, estos datos pueden ser numéricos o
no numéricos. De ahí que existan tipos de datos para las variables, como Integer, String, y otros.
•
Tenga encuenta que en VB podemos escribir una línea de programa distribuyéndola en varios renglones, sin más
que escribir el símbolo de subrayado (tecla del "menos") precedido de un espacio en blanco.
•
vbCrLf es una constante simbólica de VB que "obliga a un retorno de carro o nueva línea", con su uso
conseguimos distribuir el texto en varias líneas.
MSGBOX. Instrucción que permite presentar unaventana de mensaje en pantalla. Estas ventanas son comúnmente
usadas para indicar o dar una instrucción al usuario o solicitar su respuesta a un interrogante de SI o NO.
•
El primer argumento de MsgBox es el texto que aparece en el cuadro. El tercer argumento es el texto que aparece
como título del cuadro.
• En el segundo argumento de "MsgBox" podemos i ncluir un icono determinado y/o variosbotones y/o activar por defecto
un botón determinado. Todo esto se consigue u tilizando constantes simbólicas de VB o su valor numérico equivalente
como aparece en las siguientes tablas:
Constantes para los iconos
vbCritical
vbQuestion
vbExclamation
Vblnformation

Valor Numérico
16
32
48
64

Adaptado por: Msc. ALVARO IGNACIO MORALES GONZALEZ

Significado
Icono crítico
Iconopregunta
Icono exclamación
Icono información

UTP – INGENIERIA INDUSTRIAL
MATERIAL TEORICO-PRACTICO MSGBOX, INPUTBOX, OPERADORES
Constantes para los botones

Valor Numérico

Significado

vbOKOnly (defecto)
vbOKCancel
vbAbortRetrylgnore
vbYesNoCancel
vbYesNo

0
1
2
3
4

[Aceptar]
[Aceptar] [Cancelar]
[Anula] [Reintentar] [Ignorar]
[Si] [No] [Cancelar]
[Si][No]

Constantespara activar botón
vbDefaultButton (defecto)
vbDefaultButton2
vbDefaultButton3

Valor Numérico
0
256
512

Significado
Activa el primer botón
Activa el segundo botón
Activa el tercer botón

El hecho de incluir botones no tiene sentido si no capturamos el botón pulsado en una variable (de aquí el uso de
la variable respuesta en el procedimiento). En este caso ha de escribirse el...