VBA question

LoringTupper — Fri, 11 Jun 2010 20:18:20 GMT

I know, VBA is history, but some of use are still using it on 9.2.
My question is: how do you load an SDE annotation layer using VBA code? We're now using SDE 9 and the way SDE stores annotation appears to be different than when we were using older version of SDE. My old code, that worked prior to going to SDE 9n was as follows:

            Set pFeatureClass = pFeatureWorkspace.OpenFeatureClass("CALGIS.CNTST_LANDUSE_1P2007_LL")
            Set pFeatureLayer = New CoverageAnnotationLayer

            pFeatureLayer.Name = "Landuse Annotation Leadlines - 1P2007" 'set Layername
            pFeatureLayer.MinimumScale = 4000
            pFeatureLayer.ShowTips = True

            pMap.AddLayer pFeatureLayer   'Add Layer to Map
            pMxDoc.ActiveView.ContentsChanged

I get and error message indicating that an "Object Variable or With Block not set", how would I change the code to work with the new SDE annotation? What ArcObject should I now be using?

Re: VBA question

RuchiraWelikala — Sun, 12 Dec 2021 04:28:48 GMT

I know, VBA is history, but some of use are still using it on 9.2.
My question is: how do you load an SDE annotation layer using VBA code? We're now using SDE 9 and the way SDE stores annotation appears to be different than when we were using older version of SDE. My old code, that worked prior to going to SDE 9n was as follows:

            Set pFeatureClass = pFeatureWorkspace.OpenFeatureClass("CALGIS.CNTST_LANDUSE_1P2007_LL")
            Set pFeatureLayer = New CoverageAnnotationLayer

            pFeatureLayer.Name = "Landuse Annotation Leadlines - 1P2007" 'set Layername
            pFeatureLayer.MinimumScale = 4000
            pFeatureLayer.ShowTips = True

            pMap.AddLayer pFeatureLayer   'Add Layer to Map
            pMxDoc.ActiveView.ContentsChanged

I get and error message indicating that an "Object Variable or With Block not set", how would I change the code to work with the new SDE annotation? What ArcObject should I now be using?

Try setting the DataSourceType of the FeatureLayer
Also see:
IFeatureLayer

pFeatureLayer.DataSourceType = "SDE Feature Class"

topic Re: VBA question in ArcObjects SDK Questions

VBA question

Re: VBA question