请教如何才能根据经纬度创建多个点呢？

<P>这段代码执行起来没有报错，但是没有显示。</P>
<P>小弟刚学，高手们指点一下啊。</P>
<P>Private Sub Command1_Click()<br>Dim oLayer As New MapXLib.Layer<br>Dim base As New MapXLib.Point<br>Dim FeatureRegion As New MapXLib.Feature<br>Dim x As Double<br>Dim y As Double<br>Dim a As Double<br>Dim b As Double<br>Dim e As Double<br>Dim f As Double<br>Set oLayer = Map1.Layers(1)<br>x = 118.22<br>y = 35.66<br>a = 118.33<br>b = 35.88<br>e = 119.01<br>f = 36.01<br>base.Set x, y<br>Set FeatureRegion = Map1.FeatureFactory.CreateSymbol(base)<br>FeatureRegion.Attach Map1<br>oLayer.AddFeature FeatureRegion<br>base.Set a, b<br>Set FeatureRegion = Map1.FeatureFactory.CreateSymbol(base)<br>FeatureRegion.Attach Map1<br>oLayer.AddFeature FeatureRegion<br>base.Set e, f<br>Set FeatureRegion = Map1.FeatureFactory.CreateSymbol(base)<br>FeatureRegion.Attach Map1<br>oLayer.AddFeature FeatureRegion<br>End Sub<br></P>

别光支持，指点一下啊。

<img src="images/post/smile/dvbbs/em01.gif" /><img src="images/post/smile/dvbbs/em02.gif" />