Sub Button1_Click
If EditText1.As(JavaObject).RunMethod("hasFocus", Null) = True Then
Log("EditText1 has focus")
Else If EditText2.As(JavaObject).RunMethod("hasFocus", Null) = True Then
Log("EditText2 has focus")
Else If EditText3.As(JavaObject).RunMethod("hasFocus", Null) = True Then
Log("EditText3 has focus")
End If
End Sub