|
阅读：1596回复：4
ＧＩＳ VB代码的问题
<P>兰体字部分有错，我开始学习ＶＢ，但是在第一个程序就遇到问题，它应该是找不到ＩＦｅａｔｕｒｅＬａｙｅｒ，但是我又不知道怎么告诉它。又不是ＶＣ可以用ｉｎｃｌｕｄｅ，谢谢指点。</P>
<P>Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = vbKeyReturn Then Dim i As Integer <FONT color=#0000ff><b>Dim pFeatLyr As IFeatureLayer</b></FONT> For i = 0 To MapControl1.LayerCount - 1 Set pFeatLyr = MapControl1.Layer(i) If pFeatLyr.Name = "states" Then Exit For End If Next i。。。</P><img src="images/post/smile/dvbbs/em15.gif" /> |
|
|
1楼#
发布于：2004-07-08 14:57
知道了。Reference 这个Olb文件，esricore.olb
|
|
|
2楼#
发布于：2004-07-17 20:33
<img src="images/post/smile/dvbbs/em02.gif" />
|
|
|
3楼#
发布于：2004-07-18 19:26
是的，vb是在Reference引用库就行
|
|
|
4楼#
发布于：2004-07-19 09:24
<P>呵呵!谢谢GIS。</P>
|
|
