View Full Version : سوال: حرکت دادن نوشته نوار عنوان برنامه
morteza@z
چهارشنبه 07 دی 1390, 10:46 صبح
سلام من میخوام که عنوان(Title)را در نوار عنوان برنامه به حرکت در بیاورم که شروع به حرکت بکند و تا آخر برود و دوباره از اول شروع کن و این کار ادامه داشته باشدبا تشکر؟
Hybrid
چهارشنبه 07 دی 1390, 11:12 صبح
به ترتیب مراحل زیر رو برو تا به جوابتون برسید :
1)یه تایمر روی فرم قرار بدین و خصوصیت interval اونو برابر 1 و خاصیت Enabled اونو برابر True قرار بدین.
2)در رویداد Tick تایمر کد زیر رو قرار بدین..
Static i As Integer = 0
Me.Text = " " + Me.Text
i += 1
If i = 100 Then
Me.Text = Trim(Me.Text)
i = 0
End If
4)برنامه رو اجرا کنید.
پاورقی : البته Size فرم من برابر 300*300 بود و این کد رو براش نوشتم اگه سایز فرم شما بزرگتره میتونین مقدار i در شرط رو افزایش بدین و برعکس..
موفق باشین
morteza@z
چهارشنبه 07 دی 1390, 12:40 عصر
سلام دوست من من فرم (maximum)است و i را بیشتر می کنم ولی تا نصف فرم نمرود باید چه کار کنم؟
morteza@z
چهارشنبه 07 دی 1390, 12:51 عصر
کسی نیست کمک کنه منتظرم؟
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.