non usare il format e togli pure il #, metti CDate(DTPDal.Value) e prova così...