miércoles, 6 de agosto de 2008

Sistemas de numeración, comentarios, opciones de ambiente, msgbox, inputbox, argumentos

Sistemas de Numeración

Normalmente los números son decimales base 10, aunque es posible expresarlos en hexadecimales base 16 u octales base 8.

Visual Basic representa los números hexadecimales con el prefijo &H, los octales con &O:

DecimalOctalHexadecimal
9&O11&H9
16&O20&H10
255&O377&HFF

Comentarios

Visual Basic ofrece 2 métodos para comentar código:

  1. Cualquier código escrito después del caracter (') single quote es ignorado.

    edadPersona = 33 'Esto es un comentario

  2. Para comentar una línea completa se escribe la palabra REM (remark).

    REM puestoPersona = 'PA'

Opciones del Ambiente

Para cambiar los valores de las opciones del Ambiente, seleccione:

Seleccione del menú Tools » Options » Environment

Automatic Code Completion : Completación Automática de Código

Visual Basic permite escribir código de manera fácil y automática completando sentencias, propiedades y argumentos, cuando el código está siendo escrito el editor despliega la lista de propiedades, sentencias, prototipos de funciones o valores a seleccionar. El editor de eventos despliega la sintaxis de sentencias y funciones.

Para cambiar los valores de las opciones de Edición, seleccione:

Seleccione del menú Tools » Options » Editor

Función MsgBox

La función MsgBox además de desplegar mensajes de texto, provee botones utilizados para obtener una respuesta del usuario

Sintaxis:

MsgBox prompt [,buttons] [,title] [,helpFile, context]

Argumentos:

  • prompt, texto que contiene el mensaje para el usuario.
  • buttons, determina el número y tipo de botones a presentar (Constantes predefinidas Visual Basic).
  • title, el texto que aparece en la barra de título de la ventana del mensaje.
  • helpFile, string que identifica el archivo de ayuda a utilizar.
  • context, expresión numérica que identifica el tópico especifico a presentar del archivo de ayuda.

Función MsgBox y Valores de Regreso

A través de la función MsgBox es posible obtener una respuesta por parte del usuario, por lo que es posible asignar el valor que regresa la función MsgBox a una variable:

   Private Sub Enter_Click()
Dim respuestaUsuario
respuestaUsuario = MsgBox("mensajeUsuario", vbYesNo, "tituloVentana")
If respuestaUsuario = vbYes Then
MsgBox "El usuario contesto afirmativamente (" + CStr(respuestaUsuario) + ")"
End If
If respuestaUsuario = vbNo Then
MsgBox "El usuario contesto negativamente (" + CStr(respuestaUsuario) + ")"
End If
End Sub

Función InputBox

La función InputBox genera una caja de dialogo que permite al usuario introducir texto.

Sintaxis:

InputBox prompt [,title] [,default] [,xPos] [,yPos] [,helpFile, context]

Ejemplo:

   Private Sub Datos_Click()
Dim data
data = InputBox("Proporcione cualquier dato:")
MsgBox "El dato proporcionado fué: " + data
End Sub

Nombres de Argumentos

Los argumentos ocupan una posición o nombre, los nombres de argumentos tienen varias ventajas sobre los argumentos de posición, los argumentos por posición son enviados en un orden predefinido, en cambio cuando se utiliza el nombre de los argumentos estos pueden enviarse en cualquier orden simplemente se escriben bajo la siguiente sintaxis:

nombre_Argumento := valor

Ejemplo:

   respuestaUsuario = MsgBox(Title:="tituloVentana",Buttons:=vbQuestion+vbYesNo,Prompt:="mensajeUsuario:")

0 comentarios: