a vb6 program or SQL scripts

I need a vb6 program or SQL statement to generate the account# the account# must 1. the first character of each word (max 4) 2. if the account# is deplicate then follow by a digits (increase by 1) such as name: my buyer verifications a/c# : mbv Name: my buyer reqiests a/c# : mbr Name: my buyer recycle a/c# : mbr1 ## Deliverables 1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done. 2) Installation package that will install the software (in ready-to-run condition) on the platform(s) specified in this bid request. 3) Complete ownership and distribution copyrights to all work purchased. ## Platform vb6 or sql2000