Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted AddHandler WebBrowser1.Document.ContextMenuShowing, AddressOf contextMenuSub End Sub Private Sub contextMenuSub(ByVal sender As Object, ByVal e As System.Windows.Forms.HtmlElementEventArgs) ContextMenuStrip1.Show(Control.MousePosition) e.ReturnValue = False End Sub