Sentencia If en Visual Basic

Programación En .NET Add comments

Este post va dedicado a la comprensión a fondo de la sentencia de control IF, espero que les ayude ya que con esta simple sentencia se pueden crear muchas utilidades en programación.

Para su fácil lectura la líneas de código donde utilizo la sentencia if irán de color verde, este código pueden copiarlo y pegarlo todo en una aplicación de consola en Visual Basic .Net 2003, 2005 o 2008.

Una sugerencia para que puedan entender el código seria copiarlo de aquí a Visual Basic para que tengan los espacios adecuados y así comprenderlo mejor.

El if Sencillo se utiliza así:

Module modPrueba
 
Sub Main()
 
Dim Num1 As Integer = 9
 
Dim num2 As Integer = 0
 
Dim resultado As String
 
If Num1 > num2 Then resultado = "Numero 1 es mayor que Num 2"
 
System.Console.WriteLine("{0}", resultado)
 
Console.ReadLine()
 
End Sub
 
End Module

————————————————————————————————————————-

La siguiente forma de utilizarlo es:

Module modPrueba
 
Sub Main()
 
Dim Num1 As Integer = 9
 
Dim num2 As Integer = 0
 
Dim resultado As String
 
If Num1 > num2 Then
 
resultado = "Numero 1 es mayor que Numero 2"
 
resultado &= " y la operacion ha salido perfecta"
 
End If
 
System.Console.WriteLine("{0}", resultado)
 
Console.ReadLine()
 
End Sub
 
End Module

————————————————————————————————————————-

Aquí utilizamos el Else en la sentencia IF:

Module modPrueba
 
Sub Main()
 
Dim Num1 As Integer = 9
 
Dim num2 As Integer = 0
 
Dim resultado As String
 
If Num1 > num2 Then
 
resultado = "El numero 1 es mayor que el numero 2"
 
Else
 
resultado = "El numero no es mayor que el numero 2"
 
End If
 
System.Console.WriteLine("{0}", resultado)
 
Console.ReadLine()
 
End Sub
 
End Module
 

————————————————————————————————————————-

Sentencias If anidadas:

Module modPrueba
 
Sub Main()
 
Dim Num1 As Integer = 9
 
Dim Num2 As Integer = 0
 
Dim Resultado As String
 
If Num1 > 0 Then
 
If Num1 > Num2 Then
 
Resultado = "Numero 1 es mayor que el Numero 2"
 
Else
 
Resultado = "Numero 1 no es mayor que el Numero 2"
 
End If
 
End If
 
End Sub
 
End Module

————————————————————————————————————————-

La estructura ElseIf es la siguiente:

Module modPrueba
 
Sub Main()
 
Dim Num1 As Integer = 9
 
If Num1 > 0 Then
 
Console.WriteLine("El numero 1 es mayor que 0")
 
ElseIf Num1 = 0 Then
 
Console.WriteLine("El numero 1 es igual a 0")
 
ElseIf Num1 < 0 Then
 
Console.WriteLine("El numero 1 es menor que 0")
 
End If
 
Console.ReadLine()
 
End Sub
 
End Module
 

Artículos Relacionados:

Deja Un Comentario


WP Theme & Icons by N.Design Studio
Entries RSS Comments RSS Log in