Curso gratis de Visual Basic If Then y Else - programación en Visual Basic

Curso de Visual Basic facil Otros Curso guitarra Negocios en Internet Curso Biblia Curso de Access Curso de reparación en PC Curso de Linux Introducción a redes Seguime en	Curso gratis continuando If Then y Else Quizás no quedo claro lo siguiente: Las instrucciones If/Then se usan para comprobar si lo que se pone después del IF se cumple o no... En caso de que se cumpla, se ejecutará todo lo que haya después de THEN... la sintaxis sería así: IF <EXPRESIÓN> THEN <INSTRUCCIONES> No copie los ejemplos, escríbalos para practicar, si los copia para practicar fíjese que no halla ningún espacio de mas. Arte, cultura, educación y entretenimientos en www.estudiargratis.com.ar Entonces cuando pusimos por ejemplo:    If a = vbYes Then Show Estamos diciendo que si se elige el botón sí se ejecuta show (muestra lo que se habría ocultado). Se puede hacer también de  la siguiente forma: IF <EXPRESIóN> THEN     <INSTRUCCIONES>     [<MáS INSTRUCCIONES SI SE LAS PONE>] END IF En el primer método, se procesan las intrucciones que hay en la siguiente línea y se continúa a partir de ahí el programa. En el segundo caso, se busca END IF. Pero, (...), existe otra instrucción que PUEDE acompañar al IF... THEN... y es para los casos en los cuales el resultado de la expresión sea FALSO. Si, ya sé que dije que cuando es falso se pasa a la siguiente línea, pero eso es cuando no se usa la cláusula ELSE. Con ésta, la definición de la instrucción "tomadora de decisiones" quedaría así: IF <expresión> THEN <si se cumple> ELSE <si no se cumple>   Si le resulta mas cómodo: IF <expresión> THEN     <si se cumple> ELSE     <si no se cumple> END IF Ejemplo: Private Sub Command1_Click() Dim a, b f: a = InputBox("Escriba quien da los mejores cursos (en minuscula)", "Curso de programación") If a = "javier" Then b = MsgBox("muy bien, la respuesta es la correcta", vbOKOnly) Else b = MsgBox("no, no...", vbYesNo) GoTo f End If End Sub (No copie los ejemplos escríbalos en código para practicar -si los copia posiblemente no andarán poseen espacios en blanco de mas, esto es para que aprenda no para que copie y pegue como robot ;-) ) Otro ejemplo ahora usando un dato devuelto por un text box que lo rellena el usuario: Private Sub Command2_Click() Dim a, b a = Text1.Text If a = "oculta" Then b = MsgBox("muy bien, la respuesta es la correcta", vbOKOnly, "Hide") Else b = MsgBox("no, no...lo intenta de nuevo", vbYesonly) End If End Sub   Nota: Las instrucciones en Visual Basic no tienen porque estar cada una en una línea. Se pueden escribir varias instrucciones en la misma línea, pero separándolas con el signo : (dos puntos). Por ejemplo: Nombre = "Javier R. Cinacchi" : Print Nombre       [Educación arte cultura entretenimientos y cursos gratis] > [Curso de Visual Basic] Búsqueda personalizada
	Autor y Webmaster: Javier R. Cinacchi - Aclaraciones legales y política de privacidad (Prohibida la reproducción parcial o total  del contenido de esta Web sin el consentimiento escrito del autor. Puede poner un link a esta pagina.)