واقعا دستور من شبیه دستور شماست ؟

Ad.RecordSource = "delete * from box1
Delete FROM TblName

معمولا هر چیزی رو برای کاری می سازن
می تونید براحتی توسط ADODB.Command دستورات خودتونو در قالب SQL Command و یا Store Procedure اجرا کنید و کمتر در حین کار با خطاهای مختلف برخورد کنید