Public Sub SignOut As ResumableSub
Dim context As JavaObject
context.InitializeContext
Dim identity As JavaObject
identity.InitializeStatic("com.google.android.gms.auth.api.identity.Identity")
Dim signInClient As JavaObject = identity.RunMethod("getSignInClient", Array(context))
Dim task As JavaObject = signInClient.RunMethod("signOut", Null)
Do While Not(task.RunMethod("isComplete", Null).As(Boolean))
Sleep(50)
Loop
Dim success As Boolean = task.RunMethod("isSuccessful", Null).As(Boolean)
' If xui.SubExists(mTarget, mEventName & "_SignOutGoogle", 1) Then
'CallSubDelayed2(mTarget, mEventName & "_SignOutGoogle", success)
' End If
Return success
End Sub