怎么解决选择颜色的问题？

<P>本来未对加载的图层符号定义过的，选择图形还能高亮的。</P>
<P>后来加了定义之后，选择后不变化了。这是怎么回事？</P><img src="images/post/smile/dvbbs/em02.gif" />

<P>一开始在mapcontrol里加载图层，然后定义图层的颜色代码如下：
 afeaturelayer = New FeatureLayer
                afeaturelayer.FeatureClass = pPlylinefeatureClass
                Dim pSym As ISymbol</P><P>                Dim pLineSymbol As ISimpleLineSymbol</P><P>                pLineSymbol = New SimpleLineSymbol</P><P>                Dim myColor As IRgbColor
                myColor = New RgbColor
                myColor.Red = 0
                myColor.Blue = 255
                myColor.Green = 0</P><P>
                With pLineSymbol
                    .Width = 1.5
                    .Color = myColor
                    .Style = esriSimpleLineStyle.esriSLSSolid
                End With
                pSym = pLineSymbol</P><P>                Dim pRend As IFeatureRenderer</P><P>                pRend = New CustomSimpleRenderer.CustomSimpleRend</P><P>                ' set symbol.  we must use ISimpleRenderer interface
                Dim pSimpleRend As ISimpleRenderer
                pSimpleRend = pRend
                pSimpleRend.Symbol = pSym</P><P>                Dim pGeoFL As IGeoFeatureLayer
                pGeoFL = afeaturelayer
                pGeoFL.Renderer = pRend </P><P>选择时加了，加了选择环境设置：</P><P>           Dim pMap As IMap</P><P>            pMap = GetMap()
            pActiveView = pMap</P><P>
            Dim pSelEnv As ISelectionEnvironment</P><P>
            Dim myColor As IRgbColor
            myColor = New RgbColor
            myColor.Red = 255
            myColor.Blue = 255
            myColor.Green = 255
            pSelEnv = New SelectionEnvironment</P><P>            pSelEnv.DefaultColor = myColor</P><P>
            pMap.SelectByShape(pGeom, pSelEnv, True)</P><P>可是不会变。</P><P>如果没有第一段会变的，请问有没有人解决过？</P>