Added sourcecode for online viewing

the .vb format is not yet able to be highlighted by GitHub