Create CheckErun.vb