Public Sub SetAnalyticsContext
Dim r As Reflector
r.Target = r.RunStaticMethod("com.google.analytics.tracking.android.EasyTracker", "getInstance", Null, Null)
r.Target = r.RunMethod4("setContext", Array As Object(r.GetContext), Array As String("android.content.Context"))
End Sub