Компонент WebBrowser: запретить перетаскивание текста и картинок - VB

Формулировка задачи:

Доброго времени суток! В компоненте Webbrowser можно выделить текст и перетащить его например в открытый блокнот, либо также можно перетащить картинку на рабочий стол.

Можно ли как нибудь заблокировать это действие?

Все спасибо - сам разобрался...

Решение задачи: «Компонент WebBrowser: запретить перетаскивание текста и картинок»

textual
                            Листинг программы 
                        

                            Private WithEvents Document As MSHTML.HTMLDocument
Private Sub Form_Load()
WebBrowser1.Navigate "ya.ru"
End Sub
Private Function Document_ondragstart() As Boolean
Me.ZOrder
End Function
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Set Document = WebBrowser1.Document
End Sub
                        