Environment.UserDomainName Property gets the network domain name associated with the current user.
Imports System
Class Sample
Public Shared Sub Main()
Console.WriteLine("UserDomainName: {0}", Environment.UserDomainName)
End Sub 'Main
End Class 'Sample