Imports System

​

Public Module Module1

​

    Public Sub Main()

        Dim num1 as Integer

        Dim num2 as Integer

        Dim answer as Integer

        num1 = 7

        num2 = 9

        answer = "<"(num1)

        Console.WriteLine("{0} is the biggest number out of {1}, and {2}", answer, num1, num2)

    End Sub

​

    Function Max(n1 as Integer, n2 as Integer) as Integer

        return n1

    End Function

End Module

​