Android Question B4xPages App crash in debug when Main contain IME

Sub IME_HeightChanged (NewHeight As Int, OldHeight As Int)
    Dim jo As JavaObject
    Dim vw As View
    jo.InitializeContext
    Dim window As JavaObject = jo.RunMethodJO("getWindow", Null)
    vw=window.RunMethod("getCurrentFocus",Null)            ' Get Edittext that has Focus
    Dim objs() As Object
    Dim mp As Map
    mp.Initialize
    mp.Put("OldHeight",OldHeight)
    mp.Put("NewHeight",NewHeight)
    mp.Put("Edt",vw)
    Dim needAdjust As Boolean
    needAdjust     = (NewHeight < OldHeight)
    objs             = Array (needAdjust, mp)
    B4XPages.GetManager.RaiseEvent(B4XPages.GetManager.GetTopPage, "IME_HeightChanged",objs)
End Sub