tiger9991的专栏

0 申明变量  CMapX           m_ctrlMapX;  CMapXLayer    m_objLayer;//运动目标图层  CMapXLayer    m_traceLayer;//目标轨迹层  CMapXLayer    m_scaleBarLayer;//比例尺图层  CMapXFeature m_objFt;  double            m_l

Public Type EraseTargetFeatureInfo Count As Integer LayerName As String TargetKeys() As String End Type Option Explicit Dim x1 As Double, y1 As Double, x2 As Double, y2 As Double Dim eraseTar