حل کردن این برنامه

سلام دوتان عزیز یک خواسهشی داشتم می خواستم کد این برنامه رو بهم بگید متشکر

سوال 1: با زدن دکمه start خط در جهت عقربه ساعت هر یک ثانیه جهتش عوض شود بچرخد ( فقط 4 جهت )؟

فرم طراحی شده : شامل دکمه استارت .... frame view ...... linview.........timer است !!



سوال 2:5 عکس داخل image list قرار دهیم
در عرض 5 ثانیه 5تا عکس در image list ظاهر شود یکی یکی ؟

فرم طراحی شده : image view .......timer........lblview..........image list

فقط مثلآ بگید توی هر کدوم از این دکمه ها کدرو بزنم مثلآ بگید این کد برا کدوم دکمه است ممنون متشکر

یا علی

کسی نیست یه کمکی کنه

آقا تورو خدا یکی کمک ما کنه

هنوزم منتظرم کمک کمک کمک

سلام.
منظور از سوال اولتون اینه که خط فقط به چهار جهت (بالا راست پایین و چپ) حرکت کنه؟
سوال دومتونو اصلاً متوجه نشدم واضع تر بگین لطفاً.
موفق باشید.

سلام سوال 1 بله همون اگر شما لطف کنید کد نویسیشو محبت کنید یک دنیا ممنون سوال 2 هم که 5 عکس داخل ایمج لیست قرار می دهیم و بقیه سوال ؟
منتظرم
ممنون

سلام منتظرما ممنون

سلام برای جواب سوال اولت یک لاین به فرم اضافه کن و یک تایمر هم اضافه کن.
کد زیر رو پیس کن.اگه Interval تایمر رو 1000 کنی لاین مثل غقربه ثانیه شمار ساعت برات میچره برای اینکه اونطور که میخوای بشه فقط پارامتر 40 رو تغییر بده:

کد:

---

Private Sub Timer1_Timer()
'40
If Line1.Y1 < Line1.Y2 And Line1.X1 >= Line1.X2 Then
    Line1.X1 = Line1.X1 + 40
    Line1.Y1 = Line1.Y1 + 40
ElseIf Line1.Y1 >= Line1.Y2 And Line1.X1 > Line1.X2 Then
    Line1.X1 = Line1.X1 - 40
    Line1.Y1 = Line1.Y1 + 40
ElseIf Line1.Y1 > Line1.Y2 And Line1.X1 <= Line1.X2 Then
    Line1.X1 = Line1.X1 - 40
    Line1.Y1 = Line1.Y1 - 40
ElseIf Line1.Y1 <= Line1.Y2 And Line1.X1 <= Line1.X2 Then
    Line1.X1 = Line1.X1 + 40
    Line1.Y1 = Line1.Y1 - 40
End If
End Sub

---

سوالات دیگتو یا متوجه نشدم یا بلد نبودم!
موفق باشید.

ممنون متشکر از زحمات شما دوست عزیز
یا علی