مبتدئ وتعلمت القليل من صفحاتكم
فكره فورم فيه 5 تايمر مع الضعط علي المفتاح بيتفعل التايمر
timer1,enabled
وضبطت التايمر intervalعلي 5000 ل5 ثواني
وداخل التايمر عاوز اضهر الصوره بعد 5 ثوانى
picture.show
لكن مش متاح show
اعملها ازاى ولو 5 صور عاوزهم يتعرضوا بفرق 5 ثوانى الاولي تختفي والتانيه تعرض مكانها
ياريت الافاده وشكرا
لو عندك 5 صور اسم كل صورة على رقم محدد مثلا 1 - 2 3 4 5 مع الاحقة اللي هي jpg
فقط تحتاج :
زر واحد
صورة واحدة
تايمر واحد
بتحتاج تكتب الكود :
في قسم التصريحات العامة بتعرف عن متغير ليأخذ الرقم S من نوع Integer
في حدث إقلاع النافذة بتسند قيمة ابتدائية للمتغير لتكن 1
في حدث الأمر بتكتب كود تفعيل التايمر ..
في حدث التك لـ التايمر بتكتب كود تبديل الصور مع شرط يرجع يعد لما يصل لقيمة محدد
بالتاللي بيكون عندك الكود هو (ع أساس أن الصور موجودات في مجلد اسمه TA على سطح القرص C) :
كود :
Dim s As Integer
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Form_Load()
s = 1
End Sub
Private Sub Timer1_Timer()
Timer1.Interval = 5000
Picture1.Picture = LoadPicture("C:\TA\" & s & ".jpg")
s = s + 1
If s > 5 Then s = 1
End Sub
اذا لساك شباب وفي عندك وقت فراغ كويس، وعندك كمبيوتر مواصفاته فوق المتوسط
أتركك من هذه اللغة المنقرضة واذهب وتعلم شي أفضل لك ولوقتك
مثلا لغات الدوت نت ..
VB.Net
C#.net هذه أنصحك بها كثيرا - يوجد عشرات القنوات على اليوتيوب من كل اللغات متخصصة بشرح هذه اللغة بشكل موسع فوق كل ما تتصور
Python
أي شي لسا فيك تجد له تحديثات ومهتمين يقدروا يساعدوك لما توقف عند نقطة محددة