It's a different process with B4j which uses change listeners which Andrew has exposed in his jReflection Library.
So on B4j it would be:
B4X:
Dim R As Reflector
R.Target = TextField1
R.AddChangeListener("TextField1Focus","focusedProperty")
End Sub
Sub TextField1Focus_Changed(old As Object,New As Object)
Log(New)
End Sub
This is good example of where there is confusion between B4A and B4J.
I still think it would be better to split this Forum in totally separate B4A and B4J sections.
B4J is cluttering the B4A forum, at least that is still my opinion.