rp.Check(rp.PERMISSION_ACCESS_FINE_LOCATION)
Wait For Activity_CheckResult (Permission As String, Result As Boolean)
If (Permission = rp.PERMISSION_ACCESS_FINE_LOCATION) And (Result = False) Then
'explain the reason and request permission
.......
end if