[عبدالله الدوسري]

بهذة الطريقة , فقط قم بحفظ النص الموجود داخل الملف bat في إعدادات المشروع أو حتى في متغير نصي .
وعندما تريد تنفيذة . 
استخدم هذا الكود :

كود :

       Dim BatString As String = My.Settings.BatString
       Dim BatPath As String = IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.Temp ,"MobArLang.bat")
       IO.File.WriteAllText(BatPath, BatString)
       ' نفذ الكود
       ' بعد الإنتهاء يمكنك حذف الملف
       IO.File.Delete(BatPath)

الأفكار كثيرة , فكر أنت وابدع في الموضوع

---

أو أرفق الملف ظمن ملفات المشروع