'This is inside BiometricManager
Public Sub CanAuthenticate As String
Dim v As Int = Manager.RunMethod("canAuthenticate", Null)
Select v
Case 1
Return "UNAVAILABLE"
Case 11
Return "NONE_ENROLLED"
Case 12
Return "NO_HARDWARE"
Case 0
Return "SUCCESS"
Case Else
Return "UNKNOWN"
End Select
End Sub