change to Call Old_Form_Open(CStr(varDirs(i)))