Visual Basic .Net IDE Add-In that adds a Web Reference or Normal Reference to Current Project

[Bahige]

I already have a working Visual Basic .Net Add-in. It loads when the
IDE loads and there is a button to run it from the tools menu. It
also creates a tool window that can be docked anywhere on the screen.
It does a few things with web services, but my problem is that I need
the add-in to create a Web Reference to a project that is loaded in
the IDE. I found this code but I think it's only for Macros (I'm not
familiar with VB macros):

Imports EnvDTE
Imports System.Diagnost ics
Imports VSLangProj

Public Module AddWebRefernceM acro
Sub AddWebReference ()
Try
Dim applicationObje ctWeb As EnvDTE.DTE
' This example assumes that the first project in the
solution is
' either a Visual Basic or C# project.

Dim aVSProject As VSProject =
CType(applicati onObjectWeb.Sol ution.Projects. Item(0).Object,
VSProject)

If (aVSProject.Web ReferencesFolde r Is Nothing) Then
Dim newFolder As ProjectItem
newFolder = aVSProject.Crea teWebReferences Folder()
' The new project item is a folder.
newFolder =
aVSProject.AddW ebReference("ht tp://someserver/webref")
' The new name of the folder appears in Solution
Explorer.
newFolder.Name = "Web References"
' The ProjectItems collection for the folder is not
empty.
MsgBox(newFolde r.ProjectItems. Count.ToString( ))
End If

Catch ex As System.Exceptio n
MsgBox("error adding web reference, message: " &
ex.Message, MsgBoxStyle.Cri tical, "error with adding web reference")

End Try

End Sub

End Module

Can this code be used in my VB.Net add-in code or does it have to be a
macro? I have tried using this code just as a macro and just in the
Add-In and I always get the same error: Object reference not set to an
instance of an object.

Thanks in advance.