Imports System

Imports System.Threading 'Imports the System.Threading namespace.   

​

'run this in online gdb compiler to see exact output

​

'Command-line applications must have a Sub Main defined. Main must be declared as Public Shared if it is defined in a class, or as Public if defined in a module.

​

public class program  

    public shared Sub Main(ByVal args As String())  

        ' create a new thread  

        dim t as new program()

        t.dotest()

    End Sub  

    public Sub dotest() 

        Dim a As Thread = New Thread(New ThreadStart(AddressOf inc))

        Dim b As Thread = New Thread(New ThreadStart(AddressOf dec))  

        ' start the newly created thread  

        a.Start()

        b.Start()

    end sub

     sub inc()

        for i as integer = 1 to 5 step +1

            Console.WriteLine(" incrementing {0}"&i)

            Thread.Sleep(2000)

        next i

    end sub

    sub dec()

        for i as integer = 5 to 1 step -1

            Console.WriteLine(" decrementing {0}"&i)

            Thread.Sleep(2000)

        next i

    end sub

End class