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