VB project updated