VB
==
Dim curUser As String = _
    System.Security.Principal.WindowsIdentity.GetCurrent().Name 
C# 
==
String curUser = 
    System.Security.Principal.WindowsIdentity.GetCurrent().Name;
www.codecollege.NET