WriteComment example for Visual Basic

   ' set the comment
   LEAD1.Comment(CMNT_SZARTIST) = "Me"
   
   ' write the comment into page 1 of TEST.TIF
   LEAD1.WriteComment "TEST.TIF", 1
   
   ' read the comment and display it
   MsgBox LEAD1.ReadComment("TEST.TIF", 1, CMNT_SZARTIST)