Skip to content

Instantly share code, notes, and snippets.

@codebeta
Created April 25, 2016 23:25
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save codebeta/438d5366423ae2bf31fe3763b132f201 to your computer and use it in GitHub Desktop.
Save codebeta/438d5366423ae2bf31fe3763b132f201 to your computer and use it in GitHub Desktop.
Public Sub New ()
InitializeComponent()
WebBrowser1.Navigate( "about:blank" )
Dim svd As SHDocVw.WebBrowser = DirectCast(WebBrowser1.ActiveXInstance, SHDocVw.WebBrowser )
AddHandler svd.NewWindow3, AddressOf NewWindow3
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment