Se fai una cosa del genere?

codice:
.DrawText 5, 16, Mid(Rs.Fields("Notes").Value, 1, 80), "Fnt", 8
.DrawText 5, 15, Mid(Rs.Fields("Notes").Value, 80, 80), "Fnt", 8
.DrawText 5, 14, Mid(Rs.Fields("Notes").Value, 160, 80), "Fnt", 8
.DrawText 5, 13, Mid(Rs.Fields("Notes").Value, 240, 80), "Fnt", 8
.DrawText 5, 12, Mid(Rs.Fields("Notes").Value, 320, 80), "Fnt", 8