abbreviate text in visual basic

The following Visual Basic project contains the source code and Visual Basic examples used for abbreviate text. A sample call to the fucntion: Abbreviate ("Microsoft Visual Basic"). This returns MVB.
The source code and files included in this project are listed in the project files section, please make sure whether the listed source code meet your needs there.

Project Files: 

File NameSize