Added VB sample