SetHandPrintOptions Example for Visual Basic

Private Sub Command17_Click()
   RasterDoc.GetHandPrintOptions

   If RasterDoc.HandPrintModuleOptions.Style <> HANDSTYLE_US Then
      RasterDoc.HandPrintModuleOptions.Style = HANDSTYLE_US
   End If

   RasterDoc.HandPrintModuleOptions.EnableSpace = False
   RasterDoc.HandPrintModuleOptions.CharacterHeight = 6
   RasterDoc.HandPrintModuleOptions.CharacterWidth = 4
   RasterDoc.HandPrintModuleOptions.CharacterSpace = 1

   RasterDoc.SetHandPrintOptions
End Sub