اهلا بيك اخي العزيز abdelrahman193
عملك ممتاز لكن لي تعليق بامكانك كتابة الشفرة هكذا
كود:
Image1.Top = Image1.Top - 20
بدل من هكذا
كود:
Image1.Top = Val(Image1.Top - 20)
السبب ان قيمة Image1.Top هي رقمية و لا داعي لتحويلها لرقمية
و بالمثل الباقي
لم تكتمل الدورة انتظر تطبيقات الاعضاء الامور التالية ستكون مشوقة اكثر