Class CSelection
  Public selStart As Long
  Public selLength As Long
  Public wasBold As Long
  Public orgSelColor As Long
  Public wasUnderline As Long
  Public selWord As String
  Public Function LoadSel(rtf As RichTextBox)
  Public Function Undo(rtf As RichTextBox)
End Class
