ntvdm -r:. -c -p QB.EXE /RUN %1.BAS