B4XTable1.mCurrentCount cuenta la cantidad de registros, no la cantidad de paginas.
Me pasaron este código para resolverlo (y funciona!):
B4X:
B4XTable1.SetData(aRegistros) 'Aquí cargo los datos en la tabla
Sleep(100)
'Para posesionarse en la ultima Pagina de la consulta
If B4XTable1.mCurrentCount > 0 Then
Dim NumberOfPages As Int = Ceil(B4XTable1.mCurrentCount / B4XTable1.VisibleRowIds.Size)
Log("Nro.De Paginas: "&NumberOfPages)
B4XTable1.CurrentPage = NumberOfPages - 0
End If
B4XTable1.Refresh