FreeVBCode code snippet: Black Jack Game