VB.Net/Language Basics/If
Содержание
If ElseIf Else End If Demo
Imports System
Public Class MainClass
    Shared Sub Main()
        "Declare and set a variable
        Dim intNumber As Integer = 27
        If intNumber = 1000 Then
            System.Console.WriteLine(""intNumber" is, indeed, 1000!")
        ElseIf intNumber = 27 Then
            System.Console.WriteLine(""intNumber" is 27!")
        Else
            System.Console.WriteLine(""intNumber" is not 1000!")
        End If
    End Sub
End Class
If Then Else Demo
Imports System
Public Class MainClass
    Shared Sub Main()
        "Declare variables
        Dim strName1 As String, strName2 As String
        "Get the names
        strName1 = "Sydney"
        strName2 = "Vancouver"
        "Is one of the names Sydney?
        If strName1 = "Sydney" Or strName2 = "Sydney" Then
            System.Console.WriteLine("One of the names is Sydney.")
        Else
            System.Console.WriteLine("Neither of the names is Sydney.")
        End If
    End Sub
End Class
If then else if
Imports System
public class MainClass
    Shared Sub Main()
       Dim valueOne As Integer = 10
       Dim valueTwo As Integer = 20
       Dim valueThree As Integer = 30
       If valueOne > valueTwo Then
          Console.WriteLine( _
              "ValueOne: {0} larger than ValueTwo: {1}", valueOne, valueTwo)
       Else
          Console.WriteLine( _
             "Nope, ValueOne: {0} is NOT larger than valueTwo: {1}", _
              valueOne, valueTwo)
       End If
    End Sub
End Class
If with Else
Imports System
Public Class MainClass
    Shared Sub Main(ByVal args As String())
       Dim valueOne As Integer = 10
       Dim valueTwo As Integer = 20
       Dim valueThree As Integer = 30
       If valueOne > valueTwo Then
          Console.WriteLine("ValueOne: {0} larger than ValueTwo: {1}", valueOne, valueTwo)
       Else
          Console.WriteLine("Nope, ValueOne: {0} is NOT larger than valueTwo: {1}", valueOne, valueTwo)
       End If
    End Sub
End Class
Nested If
Imports System
public class MainClass
    Shared Sub Main()
       Dim temp As Integer = 32
       If temp <= 32 Then
          Console.WriteLine("temp <= 32")
          If temp = 32 Then
             Console.WriteLine("temp = 32")
          Else
             Console.WriteLine("Temp: {0}", temp)
          End If
       End If
    End Sub
End Class
Simple If Then
Imports System
Public Class MainClass
    Shared Sub Main()
        Dim intNumber As Integer = 27
        If intNumber = 27 Then
            System.Console.WriteLine(""intNumber" is, indeed, 27!")
        End If
    End Sub
End Class
Use function in if statement
Imports System
public class MainClass
    Shared Sub Main()
         Dim x As Integer = 7
         If IsSmaller(x, 8) OrElse IsBigger(x, 12) Then
             Console.WriteLine("x < 8 OrElse x > 12")
         Else
             Console.WriteLine("Not True that x < 8 OrElse x > 12")
         End If
    End Sub
    Shared Function IsBigger(ByVal firstVal As Integer,ByVal secondVal As Integer) _
         As Boolean
         If firstVal > secondVal Then
             Return True
         Else
             Return False
         End If
     End Function
    Shared Function IsSmaller(ByVal firstVal As Integer,ByVal secondVal As Integer) _
         As Boolean
         If firstVal < secondVal Then
             Return True
         Else
             Return False
         End If
     End Function
End Class