Add Graphic (point) to mouse click location

NeedHelp — Wed, 27 Feb 2013 14:13:15 GMT

Should be a simple task, so I assume I'm just overlooking 1 simple thing.
Just trying to add a dot to the map at the location of mouse click.
My layer gets added into the map fine, and my X&Y values seem fine...but no point gets drawn dispite my attempts to draw the point 2 different ways

My code is:

       GetMxDocument(m_application)
        GetActiveView(m_application)
        Dim pMap As IMap
        pMap = theActiveView.FocusMap
        AddLayerToActiveView(theActiveView, "C:\theLayer.lyr")
        MsgBox(pMap.LayerCount)

        m_pPoint = theActiveView.ScreenDisplay.DisplayTransformation.ToMapPoint(X, Y)
        msgbox (m_pPoint.X & m_pPoint.Y)

        Dim thePoint As ESRI.ArcGIS.Geometry.Point
        DrawPoint(theActiveView, m_pPoint.X, m_pPoint.Y)
        DrawPoint(theActiveView, thePoint.X, thePoint.Y)

        Dim aCol As RgbColor
        aCol.Red = 1
        aCol.Blue = 101
        aCol.Green = 201

        Dim bCol As RgbColor
        aCol.Red = 201
        aCol.Blue = 101
        aCol.Green = 1

        AddGraphicToMap(pMap, m_pPoint, aCol, bCol)
        AddGraphicToMap(pMap, thePoint, aCol, bCol)

        theActiveView.Refresh()

topic Add Graphic (point) to mouse click location in ArcObjects SDK Questions

Add Graphic (point) to mouse click location