VB.NET

This is the class that I use in VB Win Forms applications for user data

 Public Class AppUser
    Public Shared ReadOnly Property UserID() As String
        Get
            Dim strUser As String
            strUser = System.Security.Principal.WindowsIdentity.GetCurrent.ToString
            Return strUser
        End Get
    End Property
    Public Shared ReadOnly Property database() As String
        Get
            Return "dbName"
        End Get
    End Property
    Public Shared ReadOnly Property connectionString() As String
        Get
            Return "Data Source=myServer;User Id=username;Password=mypass;Initial Catalog=dbname"
        End Get
    End Property
End Class