With this code you can change the bar color and the color of the active item:
B4X:
Dim no As NativeObject = TabController
no.GetField("tabBar").SetField("tintColor", no.ColorToUIColor(Colors.Red)) 'active item
no.GetField("tabBar").SetField("barTintColor", no.ColorToUIColor(Colors.Green)) 'bar color