I've had a bit of a bash at this sort of thing for work. It sounds like you are having very similar problems with the incomprehensibly incomplete help files available. In truth I only got this going through trial and error!
My only hint, use Set lots!
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
'This sets the handle for the plane and gets back it's definition.
Set PlaneFeature = Part.FeatureByName("Insert your plane name here"

Set PlaneObject = PlaneFeature.GetSpecificFeature
Set Plane_DEF = PlaneFeature.GetDefinition
'This turns on the access to the feature (rolling back)
Plane_DEF.AccessSelections Part, Nothing
flip = Plane_DEF.ReverseDirection
'This finds out what flip is and changes it
If flip Then
flip = False
Else
flip = True
End If
'This re-enters the infor into the feature definition, updates the feature definition and then closes the access (rolls down).
Plane_DEF.ReverseDirection = flip
PlaneObject.ModifyDefinition Plane_DEF, Part, Nothing
Plane_DEF.ReleaseSelectionAccess
End Sub