منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[vb6.0] كيف اجعل الصورة تتحرك تدريجياً الى منتصف الفورة من جهة اليمين ؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [vb6.0] كيف اجعل الصورة تتحرك تدريجياً الى منتصف الفورة من جهة اليمين ؟ (/showthread.php?tid=45883)



كيف اجعل الصورة تتحرك تدريجياً الى منتصف الفورة من جهة اليمين ؟ - Microformt - 13-04-23

الاخوة الكرام
السلام عليكم ورحمة وبركاته
كيف اجعل الصورة تتحرك تدريجياً الى منتصف الفورة  من جهة اليمين ؟
وجزكم الله خيراً


RE: كيف اجعل الصورة تتحرك تدريجياً الى منتصف الفورة من جهة اليمين ؟ - Taha Okla - 13-04-23

وعليكم السلام ورحمة الله وبركاته

كود :
Dim Li As Long
Li = (Me.Width - Image1.Width) / 2

For i = Image1.Left To Li Step -1
   Image1.Left = i
   DoEvents
Next i