Tecnología

Inicio

Cómo codificar una sentencia else Si en VB6

Cómo codificar una sentencia else Si en VB6


Visual Basic 6 (VB6) es un lenguaje de programación orientado a eventos. En respuesta a un evento como un clic de botón, VB6 normalmente se ejecuta una serie de comandos, uno tras otro. Sin embargo, es posible que desee que el equipo funcione diferentes conjuntos de comandos dependiendo de si una condición es verdadera o no. Para ello, lo mejor es utilizar una sentencia "If ... Else".

Instrucciones

1 Tipo "Si [condición] Entonces", donde "[estado]" es la condición que desea probar. Por ejemplo, este código podría probar si algún texto introducido por el usuario es menor de tres caracteres de longitud:

Si Len (txtUsername.Text) <3 A continuación,

2 Introduzca los comandos que desee ejecutar si la condición es verdadera. Se puede introducir un solo comando o varios, cada uno en su propia línea. Estos comandos se refieren a veces como un "bloque". Por ejemplo, este comando se utiliza para informar al usuario de que el texto que entró es demasiado corto:

MsgBox "Los nombres de usuario deben tener al menos tres caracteres de longitud."

3 Introduzca la palabra "Else" en su propia línea. Esto marca el final del bloque de comandos que se ejecuta si la condición es verdadera, y el comienzo del bloque de comandos para ejecutar si la condición no es cierto. Por ejemplo:

Más

4 Introduzca los comandos que desee ejecutar si la condición no es cierto. Al igual que con el bloque anterior, se puede introducir uno o varios comandos. En este ejemplo se guarda el texto introducido por el usuario y le dice que se salvó:

Nombre de usuario = txtUsername.Text

MsgBox "Su nuevo nombre de usuario es" & nombre de usuario y "".

5 Tipo "End If" en su propia línea para marcar el final de la sentencia "If ... Else". Para referencia, aquí está el código para el ejemplo completo:

Si Len (txtUsername.Text) <3 A continuación,

MsgBox "Los nombres de usuario deben tener al menos tres caracteres de longitud."

Más

Nombre de usuario = txtUsername.Text

MsgBox "Su nuevo nombre de usuario es" & nombre de usuario y "".

Terminara si

Consejos y advertencias

  • Puede nido "Si" declaraciones dentro de unos a otros para tomar decisiones más complicadas.
  • Si desea probar para muchas posibilidades diferentes, puede ser mejor usar una declaración "Select Case".