Imports System

Imports Microsoft.VisualBasic

Public Module Module1

    Public Sub Main()

        Dim existing = 100

        Dim old = 101

        Dim n = existing + 1

        If (existing - old < 0) Then

            Console.WriteLine("do 1  existing < old")

        ElseIf (existing - old > 0) Then

            Console.WriteLine("do 2  existing > 0")

        End If

        Dim bar = Mid("Hello_World", InStr("Hello_World", "_") + 1)

        Console.WriteLine(bar)

    End Sub

End Module