ههههههههههههههههههههههههههههه
والله وقعتني بمشكلة بس الحمدلله اني مو جديد على هالحركات
اللي يحب يجرب الكود بس بشرط مايكون فيه اي نافذة تعمل الا نافذة الملقلب هذا
حتى تنهي المشكلة بالنقر على زر ALt+F4
صرح متغير عمومي على مستوى الفروم
اضف تايمر وضع به
وضمن حدث النقر لزر الامر اكتب
اجعل قيمة الانترفال كثيرة شوي يعني 250 الى 1000
والله وقعتني بمشكلة بس الحمدلله اني مو جديد على هالحركات

اللي يحب يجرب الكود بس بشرط مايكون فيه اي نافذة تعمل الا نافذة الملقلب هذا

حتى تنهي المشكلة بالنقر على زر ALt+F4
صرح متغير عمومي على مستوى الفروم
كود :
Dim ax, ay As Integerكود :
ax = Int(Rnd() * Me.Width)
ay = Int(Rnd() * Me.Height)
Cursor.Position = New Point(ax, ay)كود :
Timer1.Enabled = True
Timer1.Start()اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير

