Bagaimana menampilkan Identitas (Username,PCName, dll) PC anda ?

Kadang-kadang kita sering membuat program untuk menampilkan identitas komputer kita, seperti Username, Fullname,Computer Name, DomainName....

Terus pertanyaannya BAGAIMANA CARA MEMBUAT ITU SEMUA ????

Jangan khawatir, kita hanya membutuhkan sedikit listing untuk itu semua...Untuk menampilkan Username :

System.Environment.UserName

Untuk menampilkan computer name :

System.Environment.MachineName

Sedangkan untuk menampilkan Domain :

Dim strDomain As StringstrDomain = System.Security.Principal.WindowsIdentity.GetCurrent.Name
strDomain = Mid(strDomain, 1, InStr(strDomain, "") - 1)
Return strDomain

Mudah-mudahan bermanfaat...
Wassalam