public void SetProperty(
	ConnectionId connectionId,
	SessionId sessionId,
	string identifier,
	TrusteeUserIdentifiers idType,
	Dictionary<string, string> properties
)

Public Sub SetProperty ( 
	connectionId As ConnectionId,
	sessionId As SessionId,
	identifier As String,
	idType As TrusteeUserIdentifiers,
	properties As Dictionary(Of String, String)
)

try
{
    //Add the properties in the a custom application called MyApp
    Dictionary<string, string> dic = new Dictionary<string, string>();
    dic.Add("MyApp.Data1", "Value 1"); 
    dic.Add("MyApp.Data2", "Value 2");
    UserProperties upo = new UserProperties();
    upo.SetProperty(CS_ConnectionId, CS_UserSessionId, "", Trustee.UserIdentifiers.None, dic);
}
catch (Exception ex)
{
    Response.Write(Server.HtmlEncode(ex.Message));
}

Try
    'Add the properties in the a custom application called MyApp
    Dim dic As New Dictionary(Of String,String)()
    dic.Add("MyApp.Data1", "Value 1")
    dic.Add("MyApp.Data2", "Value 2")
    Dim upo As New UserProperties()
    upo.SetProperty(CS_ConnectionId, CS_UserSessionId, "", Trustee.UserIdentifiers.None, dic)

Catch ex As Exception
    Response.Write(Server.HtmlEncode(ex.Message))
End Try