Sub Activity_Create(FirstTime As Boolean)
Dim telMgr As JavaObject = GetContext.RunMethod("getSystemService", Array("phone"))
Dim simState As Int = telMgr.RunMethod("getSimState", Null)
Log(simState)
End Sub
Sub GetContext As JavaObject
Return GetBA.GetField("context")
End Sub
Sub GetBA As JavaObject
Dim jo As JavaObject
Dim cls As String = Me
cls = cls.SubString("class ".Length)
jo.InitializeStatic(cls)
Return jo.GetFieldJO("processBA")
End Sub