Get Current Computer Name

    Public Function GetComputerName() As String

        'Returns the name of the computer 
        Return System.Environment.MachineName

    End Function