how can I open a new window in webbrowser control?

Private sub webbrpwser_newwindow2()
'''''''''''''''''''''''
''''''' code ''''''''''
'''''''''''''''''''''''
End sub

code = HELP
what do I have to include in the sub?
Thank you