MessageBox.Show("Machine name : " & Environment.MachineName) > MessageBox.Show("User Domain Name : " & Environment.UserDomainName) > MessageBox.Show("User Name : " & Environment.UserName)