Private Sub SetUserProperty() 'The following Visual Basic example sets the value of ' an existing user's full name. Dim sReply As String On Error GoTo err sReply = m_SAClient.SetUserProperty("alex_td", _ SA_USER_FULL_NAME, "Alex Dashevsky") MsgBox sReply Exit Sub err: MsgBox "Program failed:" + err.Description End Sub