ImageEffects Example for Visual Basic

Dim RasterTwain As New LEADRasterTwain_U

RasterTwain.InitSession hWnd
RasterTwain.SelectSource

RasterTwain.GetProperties
RasterTwain.ImageEffects.PixelFlavor = L_TWPF_VANILLA
RasterTwain.ImageEffects.ColorScheme = L_TWPT_BW
RasterTwain.ImageEffects.HighLight = 50#
RasterTwain.ImageEffects.Shadow = 50#
RasterTwain.ImageEffects.Brightness = 500#
RasterTwain.ImageEffects.Contrast = 100#

MsgBox "Current used Halftone = " + RasterTwain.ImageEffects.HalfTone
RasterTwain.SetProperties
RasterTwain.EndSession