Dim jo As JavaObject = TabStrip1
Dim event As Object = jo.CreateEventFromUI("android.support.v4.view.ViewPager.OnPageChangeListener", "PageChangeListener", Null)
jo.GetFieldJO("tabStrip").RunMethod("setOnPageChangeListener", Array(event))
Sub PageChangeListener_Event (MethodName As String, Args() As Object) As Object
'Log("Method: " & MethodName)
If MethodName = "onPageSelected" Then
Log("Method: " & MethodName)
Dim ArgsList As List = Args
Log ("Index: "&ArgsList.Get(0))
'Log("Args: " & ArgsList)
End If
'Log("Current Position: "¤tPosition)
Return Null
End Sub