The link seems to be wrong (links to this thread)Yes. This is the expected parameter: http://www.b4x.com/android/forum/threads/setonclicklistener.36951/
Dim r As Reflector
r.Target = a_AB_btn
r.SetOnClickListener("AB_btn_Click")
Private Sub AB_btn_Click(ViewTag As Object)
If SubExists (Module, ViewTag) Then
CallSub(Module, ViewTag)
End If
End Sub