[3asfa~mdmra]

(02-03-17, 09:14 AM)مساعدة كتب : السلام عليكم

البرنامج لم أستطع تشغيلة لعدم وجود المكتبة


تفضل اخي المكتبة في الممرفقات




أضف هذا الكود

كود :

Private Delegate Sub method_4_Delegate(ByVal power_0 As Object, ByVal msg As Message)

وهذا التعديل

كود :

Me.Invoke(New method_4_Delegate(AddressOf method_4), New Object() {RuntimeHelpers.GetObjectValue(power_0), msg}) 'المشكلة هنا

اخي بارك الله لجهودك ولكن طبقت ماذكرته ونتيجة هي كالتالي