'Declaration
Public Shared Sub Shear( _
ByVal As ImGearRasterPage, _
ByVal () As Double, _
ByVal As ImGearShearFillStyle, _
ByVal As Boolean, _
ByVal As Boolean, _
ByVal As ImGearPixel _
)
'Usage
Dim page As ImGearRasterPage
Dim curvePoints() As Double
Dim fillStyle As ImGearShearFillStyle
Dim interpolate As Boolean
Dim vertical As Boolean
Dim color As ImGearPixel
ImGearEffects.Shear(page, curvePoints, fillStyle, interpolate, vertical, color)