求 怎样把DataGridView中的数据导入到默认的.MXD地图中
用AE和VB做的一个系统 在SQL中查询数据 然后把在DataGridView中的数据(站名,区站号,经度,纬度,温度)导入到默认的 .MXD 地图中 然后能在地图上显示温度 然是按了Button3但是没有任何反应 以下是代码 求大侠指导Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim rows As Integer = DataGridView1.DataSource.rows.count
Dim I As Integer
For I = 0 To rows - 1
If DataGridView1.Rows(I).Selected = True Then
MapForm.zoomToFeature("江苏地面台站信息", "区站号=" & DataGridView1.Rows(I).Cells(0).Value.ToString)
End If
Next
End Sub
其中zoomToFeature是自定义的过程
Public Sub zoomToFeature(ByVal layerName As String, ByVal queryFilter As String)
Dim I As Integer
Dim pLayer As ILayer
I = GetFeaturelayerIndex(layerName)
pLayer = Me.AxMapControl1.get_Layer(I)
Dim pQueryfilter As IQueryFilter
pQueryfilter = New QueryFilterClass
pQueryfilter.WhereClause = queryFilter
Dim pSelctionFeatureclass As IFeatureSelection = pLayer
pSelctionFeatureclass.SelectFeatures(pQueryfilter, esriSelectionResultEnum.esriSelectionResultNew, False)
AxToolbarControl1.GetItem(15).Command.OnClick()
End Sub
--------------------编程问答-------------------- 你这个有点象.
VB.net
DataGridView添加数据很简答的.
有那个dataset用用这个吧.
代码还可以..回头我在帮你看一下吧
我做的webgis
不过大同小异的..
以后常交流吧. --------------------编程问答-------------------- 多谢阿哲-北京主席 是用vb.net做的 但是在03的vb中能用 到了05的vb就不能用了 也不知道什么原因
补充:企业软件 , 地理信息系统