Rich TextBox

I am writing a Notepad style program in VB, using the RichTextBox control. However I need to dissable OLE dropping in the box. I can dissable the drag-drop of OLE objects by setting that property to false during design-time, however, it still allows me to paste OLE objects into the box at runtime. For example, if i would right click a file and click copy, then go to the rich textbox and press Ctrl-V(for paste), an icon for the copied file will appear in the textbox. How can I prevent this from happening?

I was able to somewhat avoid the problem by reasigning [richtext.text = richtext.text] in the change event which gets rid of any embedded OLE. However, then, my cursor gets thrown to the beginning of the text. I know if i think about it, I can probably get around that too, but Im still looking for a way to prevent the object from being dropped at all. Any help would be greatly appreciated. Thanx a ton.