Dim subdivisionTable As ITable = GetTable(tableName, pMap) Dim queryFilter As ESRI.ArcGIS.Geodatabase.IQueryFilter = New ESRI.ArcGIS.Geodatabase.QueryFilterClass() queryFilter.WhereClause = "PID = '163922'" Dim cursor As ESRI.ArcGIS.Geodatabase.ICursor = subdivisionTable.Search(queryFilter, False) Dim panField As Integer = subdivisionTable.FindField("PAN") If panField = -1 Then MsgBox("field doesn't exists") Return Else MsgBox(subdivisionTable.Value(panField)) End If
Solved! Go to Solution.
Dim row As IRow Dim subdivisionTable As ITable = GetTable(tableName, pMap) Dim queryFilter As ESRI.ArcGIS.Geodatabase.IQueryFilter = New ESRI.ArcGIS.Geodatabase.QueryFilterClass() queryFilter.WhereClause = "PID = '163922'" Dim cursor As ESRI.ArcGIS.Geodatabase.ICursor = subdivisionTable.Search(queryFilter, False) Dim panField As Integer = subdivisionTable.FindField("PAN") row = cursor.NextRow If panField = -1 Then MsgBox("field doesn't exists") Return Else MsgBox(row.Value(panField)) End If