The code is executed, but the keyboard remains open, why?
B4X:
Private Sub B4XPage_Disappear
B4XPages.GetNativeParent(Me).ResignFocus
End Sub