Private Sub DisconnectUser() 'The following Visual Basic example disconnects a user. Dim sReply As String On Error GoTo err sReply = m_SAClient.DisconnectUser("alex_td") MsgBox sReply Exit Sub err: MsgBox "Program failed:" + err.Description End Sub