VB6: Acting on a recordset

I have a table of physicians that I need to assign a two character suffix. I will be exporting this data to a UNIX application that only allows for 2 characters in that field. The primary field is the tax-id and the suffix is to identify that physician. This way they can all share the same TIN. I had programmed this in Paradox 3.x and did SCAN after a sort. I went through comparing each record to see if the TIN matched the previous TIN or not. Here’s a sample of how it should look:
123456789-01
123456789-02
123456789-03
234567890-01
234567890-02
345678901-01
456789012-01

How do I program this in VB? The data is in Access97 currently. Thank you!!!!
Patrick