Selecting Among Duplicated Rows

I want to select one row of each duplicated SIDs in a field below, which is located within an attribute table of a shape file.

The priority is R > S = I > 0.

Therefore, amo开发者_运维知识库ng SID 87, FID1 will be selected.

(SID 88, STATUS will be S+I)

(SID 89, FID 6 will be chosen)

(SID 90, deleting FID 9 or 10)

FID    SID    STATUS 
 1     87       R
 2     87       O
 3     88       I
 4     88       S
 5     89       I
 6     89       R      
 7     89       I
 8     89       S
 9     90       S
10     90       S

How do I use VBA code to implement the selection?

---

You can use SQL in VBA.