Solved! Go to Solution.
For i = 0 To pFBuffer.Fields.FieldCount - 1 Dim field as IField = pFBuffer.Fields.Field(i) Dim fieldName as String = field.Name If field.Editable Then Dim index as Int32 = pFeat.Fields.FindField(fieldName) If index <> -1 Then pFBuffer.Value(i) = pFeat.Value(index) End If Next i
For i = 0 To pFBuffer.Fields.FieldCount - 1 Dim field as IField = pFBuffer.Fields.Field(i) Dim fieldName as String = field.Name If field.Editable Then Dim index as Int32 = pFeat.Fields.FindField(fieldName) If index <> -1 Then pFBuffer.Value(i) = pFeat.Value(index) End If Next i