Sub HasPermanentMenuKey As Boolean
Dim r As Reflector
If r.GetStaticField("android.os.Build$VERSION", "SDK_INT") >= 14 Then
r.Target = r.RunStaticMethod("android.view.ViewConfiguration", "get", _
Array As Object(r.GetContext), Array As String("android.content.Context"))
Return r.RunMethod("hasPermanentMenuKey")
End If
Return True
End Sub