VBA that can edit a link?

Hello Everyone,

                         I am working with a VBA that will add a link to an element, but I would like to have the option to edit the link once I have added it to an element.  For instance, I would like to be able to select an element, run my VBA, and then have the Edit Link window appear (see following picture).

Here is my VBA so far: 

Sub Macro1()
    Dim startPoint As Point3d
    Dim point As Point3d, point2 As Point3d
    Dim lngTemp As Long

'   Start a command
    CadInputQueue.SendKeyin "ELEMENT CREATE LINK URL http://www.google.com"

    CommandState.StartDefaultCommand
End Sub