Dim no As NativeObject = B4XPages.GetManager.GetTopPage.B4XPage 'if you dont use B4XPages then use "Me"
no.RunMethod ("authenticateButtonTapped", Null)
Do While result < 0
Sleep (50)
Loop
Select Case result
Case 0
xui.MsgboxAsync ("Success: You are the device owner", "B4X")
Case 1
xui.MsgboxAsync ("Error: You are not the device owner", "B4X")
Case 2
xui.MsgboxAsync ("Error: There was a problem verifying your identity", "B4X")
Case 3
xui.MsgboxAsync ("Error: Your device cannot authenticate using TouchID", "B4X")
End Select