Android Question Is my app open?

Sub fm_MessageArrived (Message As RemoteMessage)
    
    If(Message.GetData.Get("title") = Null) Then 'in app
        
        Dim objMap As Map
        objMap.Initialize
        objMap.Put("d_title", Message.GetData.Get("d_title"))
        objMap.Put("d_body", Message.GetData.Get("d_body")) 'also message body
        objMap.Put("d_threadId", Message.GetData.Get("d_threadId"))
        objMap.Put("d_newsId", Message.GetData.Get("d_newsId"))
            
        CallSub2(Main, "inAppAction", objMap)
        
            
    Else
    
        Dim n As Notification
        Dim myTitle As String = Message.GetData.Get("title")
        myTitle=myTitle.ToLowerCase()
        If(myTitle.contains("message")) Then
            n.Initialize
            n.Icon = "icon"
            n.SetInfo2(myTitle, Message.GetData.Get("body"), "",  Main)
            n.AutoCancel = True
            
            n.Notify(888)
            
            
        End If
        
        
    End If
End Sub

        Dim NOM As String
        Dim ActMan As JavaObject
        Dim r As Reflector
        r.Target=r.GetContext
        ActMan = r.RunMethod2("getSystemService","activity","java.lang.String")
        Dim TaskInfo As JavaObject = ActMan.RunMethod("getRunningTasks",Array As Object(1))
        Dim CompInfo As JavaObject = TaskInfo.RunMethodJO("get",Array As Object(0)).GetField("topActivity")
        NOM  = CompInfo.RunMethod("getPackageName",Null)
        Log(NOMBRE)
                       
        If NOM<>"PUT HERE YOUR PACKAGE NAME" Then
            n.SetInfo(Message.GetData.Get("title"),YOUR BODY MESAJE, Main)
            n.Notify(1)
        Else
            Main.NOTIFICACION='YOUR BODY MESAJE'
            StartActivity(PUT HERE YOUR ACTIVITY)
        End If

Sub IsVisible As Boolean
   For Each Act As Object In Array(Main, Activity2)
     If IsPaused(Act) = False Then Return True
   Next
   Return False
End Sub