can anyone check the error and tell me why I am getting this error?
1819
5
11-20-2016 02:07 PM
by
by
by
First of all a screen shot of your code will not get you much help.... it is hard to see for some of us older folks..... formatted code will allow us to cut paste and see if we get similiar errors as yours.... 
In any event .... I put together some pseudo code taken from some of my applications that perform something like you want.... hopefully this will point you in the right path
Sub CalculateField()
'Set the pFeatureClass to be the feature class of the top layer in the active map -- if yours is different
'need to set the Layer index for your layer -- much help on finding the layer on the esri development site
Dim pMxDoc as IMxDocument
Dim pFeatLayer as IFeatureLayer
Dim pFeatureClass as IFeatureClass
Dim pFields as IFields
Set pMxDoc = My.ArcMap.Document
Set pFeatLayer = pMxDoc.FocusMap.Layer(0)
Set pFeatureClass = pFeatLayer.FeatureClass
'Calculate the field values
Dim pCursor As ICursor
Dim pCalculator as ICalculator
'Prepare a cursor with all records from your layer
Set pCursor = pFeatureClass.Update(Nothing, True)
'Define a calculator
Set pCalculator = New Calculator
'--------------
'NOTE: Male_Pop, Female_Pop, and GenderStr MUST Exist within the Cursor so you may want to test for 'existence prior to the calculation with FindFields!
Dim fields as IFields = pFeatureClass.Fields
Dim fieldIndex as Integer
if fields.FindField("Male_Pop") = -1 then
msgbox("Male_Pop not found in layer")
'do something to fix this ...
end if
'... do the same for Female_Pop and for GenderStr
'--------------
'Be sure Female_Pop is not Zero or null
With pCalculator
Set .Cursor = pCursor
Expression = "(([MALE_POP]/[FEMALE_POP]))*100"
.Field = "GenderStr"
End With
'Calculate the field values
pCalculator.Calculate
End sub
by
