[求助]IIdentify.flash问题

<P>我用ae做查询时,IIdentify.flash出错,提示"实时错误445,对象不支持该动作",代码如下</P>
<P>请高手分析一下</P>
<P>Dim ppoint As IPoint<BR>  <BR>  Set ppoint = MapControl1.ActiveView.ScreenDisplay.DisplayTransformation.ToMapPoint(x, y)<BR>  Dim ly As ILayer</P>
<P>  Set ly = MapControl1.ActiveView.FocusMap.Layer(0)<BR>  Dim pIdentify As IIdentify<BR>  Dim pIDArray As IArray<BR>  Dim pFeatIdObj As IFeatureIdentifyObj<BR>  Dim pIdObj As IIdentifyObj<BR>  <BR>  <BR>  Set pIdentify = ly<BR>  Set pIDArray = pIdentify.Identify(ppoint)<BR>  If Not pIDArray Is Nothing Then<BR>    Set pFeatIdObj = pIDArray.Element(0)<BR>    Set pIdObj = pFeatIdObj<BR>    pIdObj.Flash MapControl1.ActiveView.ScreenDisplay<BR>  End If</P><img src="images/post/smile/dvbbs/em12.gif" />