[Visual Basic]
 
'Create a new MCUser
 Public MCUser As New IMSDK.User
 
 
Private Sub MC_OnLoggedin(ByVal UserObject As IMSDK.User) Handles MC.OnLoggedin
        MCUser = New IMSDK.User
        MCUser = UserObject
        Msgbox("user Password is " & MCUser.Password)
End Sub
 
 
  Private Function GetFT(ByVal Index as integer) as IMSDK.FileTransfer
        return MCUser.FileTransfers.Item(Index)
  End Function