Use this property to specify a percentage of an object's horizontal area to fill. Acceptable values for this property range from 0 (zero) to 100. This property works along with the HorizontalFillStyle property, which informs how this fill occurs. Default value of this property is 100. Example:

Sub Circle1_OnStartRunning()
  HorizontalPercentFill = 200
End Sub