''' ''' Element的方式闪烁图元 ''' ''' 选中图元的geometry ''' 选中图元的geometry类型 ''' 该方式就是先加一个element，然后再将之删除，这种方法经过扩展 ，还可以用于三维闪烁 Sub FlashGeoByElement(ByVal pActiveView As IActiveView, ByVal pGeo As IGeometry, ByVal pGeoType As esriGeometryType) Dim pElement As
Imports System.ComponentModel _ Public Class DSButton Private _ButtonColor As Color = Color.White Private SF As New System.Drawing.StringFormat Private _Text As String Public Property ButtonColor As Color Get Return _ButtonColor End Get Set(ByVal
