Dim jo As JavaObject = User
Dim ProviderData As List = jo.RunMethod("getProviderData", Null)
For Each UserInfo As JavaObject In ProviderData
Log(UserInfo.RunMethod("getEmail", Null))
Log(UserInfo.RunMethod("getProviderId", Null))
Log(UserInfo.RunMethod("getUid", Null))
Next