Sample tests for Quasi97 in VB6