Change test for VB6