16-09-13, 03:49 AM
03-09-17, 08:23 PM
ههههههههههههههههههههههههههههه
والله وقعتني بمشكلة بس الحمدلله اني مو جديد على هالحركات
اللي يحب يجرب الكود بس بشرط مايكون فيه اي نافذة تعمل الا نافذة الملقلب هذا
حتى تنهي المشكلة بالنقر على زر 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()