[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 Status is " & Cstr(MCUser.Status))
End Sub