Public Sub T_Repair(ByRef Ci As CiServer, ByRef Img As CiImage)
    ' Create CiRepair object
  Dim Rep As CiRepair
  Set Rep = Ci.CreateRepair
      '  Attach CiImage
  Rep.Image = Img
      '  Use CiRepair Object.  For example
  Rep.AutoInvertImage 60
  Rep.CleanBorders
  Rep.CleanNoise 3
  Rep.AutoInvertBlocks 100, 100
  Rep.AutoDeskew
  Rep.AutoRotate
  Rep.AutoRegister 100, 100
End Sub