To delete text from a document, specify a starting point and a length. For example:
ActiveDocument.Text.Delete(10, 3) ' deletes 3 characters, starting at position 10
i = ActiveDocument.Text.Count
ActiveDocument.Text.Delete(0, i) ' deletes the entire document contents