Actually there are loads of sites with VB code. For example,

http://vbnet.mvps.org/index.html?cod.../qscompare.htm

The last subroutine at the bottom is for Shell sort.