La sintaxis con Visual es muy similar ya que se estudia en los cursos de algoritmia y pseudocódigo, con la sustitución del Si por If, del Entonces por Then, del SiNo por Else y del Finsi por End If.
Sintaxis en bloque:
If [condición] Then
Instrucción 1
Instrucción 2
·
·
·
Instrucción n
Instrucción 2
·
·
·
Instrucción n
Else
Instrucción A
Instrucción B
·
·
·
Instrucción Z
Instrucción B
·
·
·
Instrucción Z
End If
Sintaxis en una sola línea:
También es posible encadenar varias acciones derivadas de un Then o de un Else en una sola línea. Sin embargo, recomendamos usar la opción de sintaxis en una sola línea exclusivamente para desarrollos sencillos como puede ser una instrucción en caso de que se cumpla la condición y otra en caso de que no se cumpla. Si intervienen varias instrucciones, siempre resultará más legible usar el formato de bloque.
La instrucción If ... Then es anidable dentro de sí misma, siendo siempre preferible el formato de bloque cuando se vayan a generar anidamientos.
Ejemplo:
Ejemplo1
If A > 7 And B < 5 Then
MsgBox ("A es mayor que 7 y B menor que 5")
End If
Ejemplo 2
If A > 7 And B < 5 Then MsgBox ("A es mayor que 7 y B menor que 5")Else MsgBox ("A no es mayor que 7 ó B no es menor que 5")End If
EJEMPLO 3
Dim c As Integer = 7 If c = 5 Then MsgBox("C es igual a 5") Else MsgBox("C no es igual a 5") EndIf
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhCQvmt0mQH3kYzxgiIoqNdtrSnoigfWUuwufKZqaRsDnCv3Yom6XVihtgBMTnT3lBmLsct1FbzzEdSipCIOevaLCH4QPeOwFjkQzzbsUGXw8UJEKP5pbI86J-N_obByaUleLrxhxZr0RRh/s400/asd.png)
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhwIQMe1OVaGvY54mFssk0Izaw5gASKAs6pzGJqtexZVxwAoBC9blPGoF_EDGEwEyjwpcpAvGmTavRunFM8WxLIWa6Plie1YJEsja3Qsh5DILyNf_iNy7yc7GdckSQWcSSE_CGJdnD16spV/s400/Sin+t%25C3%25ADtulo.png)
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhw1fSxtWBwwRkCyv1giMUhvDMNpPj3uR5flBk3m1BU2QQwgnXzEpdipsIiotbBl2ud31Djx2ZO2FbzqU3H6JnMvrXYt5RCVcZfwXbNLgKSsV6whMVsxT82Zfi-qLqKHwmeKuHLBW92bZ64/s400/1.png)
![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEio_cZZZfUn8bBj-QaBx5PXqQ-NTU0osKYIq5yccQHqvm5y3S5gHtKCXZibKtWGh17_J_8GZ9_ipfe9i7dKyyT2XLb8zhhdBi67lXvIfJOynTZcdkufGyPHxdoZTRRDVLkF0zhcBWclH2jC/s400/asdasdsadsa5454asd.png)
No hay comentarios.:
Publicar un comentario