Disable webBrowser1 right-click.

[Bloodeye]

This is probably the easiest way to do it.
Be sure to make a reference to the MSHTML.lib (Microsoft HTML Object Library).

Option Explicit
Dim WithEvents hDoc As HTMLDocument
 
 
Private Sub Form_Load()
    WebBrowser1.Navigate "'http://www.yahoo.com"
End Sub
 
Private Function hDoc_oncontextmenu() As Boolean
    hDoc_oncontextmenu = False
End Function
 
Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
    Set hDoc = Nothing
End Sub
 
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Set hDoc = WebBrowser1.Document
End Sub