Android Question Check, if the user has set as device lock?

Private Sub IsKeyguardSecure As Boolean
    Dim ctxt As JavaObject
    ctxt.InitializeContext
    Return ctxt.RunMethodJO("getSystemService", Array("keyguard")).RunMethod("isKeyguardSecure", Null)
End Sub