Problem Getting Feature Error Code

I'm trying to loop through the feature manager and put all feature errors in an array. No matter what type of error the feature has, it always returns "1" as the error code. Anyone have any ideas? I'm using VB.Net by the way.

Here's my code -

Dim

arErrorCode As New ArrayList

Dim intError As Integer

feat = swModel.FirstFeature

Do While Not feat Is Nothing

intError = feat.GetErrorCode

strError = feat.Name

If intError <> 0 Then

arErrorCode.Add(strError)

arErrorCode.Add(intError)

End If

feat = feat.GetNextFeature

Loop

SolidworksApi macros