I found some things but can't seem to wrap my head around this. I think it could be used as a sub like the example for changing color of the checkbox:
Sub SetColorTintList(CB As CheckBox,Checked As Int,Enabled As Int,Disabled As Int)
Dim States(3,1) As Int
States(0,0) = 16842912...