تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] مشكله في استخدام التايمر
#1
مبتدئ وتعلمت القليل من صفحاتكم
فكره فورم فيه 5 تايمر مع الضعط علي المفتاح بيتفعل التايمر
timer1,enabled
وضبطت التايمر  intervalعلي 5000 ل5 ثواني
وداخل التايمر عاوز اضهر الصوره بعد 5 ثوانى
picture.show
لكن مش متاح show
اعملها ازاى ولو 5 صور عاوزهم يتعرضوا بفرق 5 ثوانى الاولي تختفي والتانيه تعرض مكانها
ياريت الافاده وشكرا
الرد }}}
تم الشكر بواسطة:
#2
لو عندك 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
أي شي لسا فيك تجد له تحديثات  ومهتمين يقدروا يساعدوك لما توقف عند نقطة محددة
قال صلى الله عليه وسلم: 
«كلمتان خفيفتان على اللسان 
ثقيلتان في الميزان،حبيبتان إلى الرحمن: 
سبحان الله وبحمده، سبحان الله العظيم».
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخدام متغير لحساب اجمالى السجلات haitham Muhammed 1 242 23-07-24, 11:16 AM
آخر رد: تركي الحلواني
  كيف يمكن استخدام الtimer لملء الكمبوبوكس haitham Muhammed 0 393 27-05-24, 09:55 PM
آخر رد: haitham Muhammed
  استخدام keyup event لعرض نموذج haitham Muhammed 3 421 09-04-24, 02:29 AM
آخر رد: Taha Okla
  عدد مرات استخدام البرنامج اسلام الكبابى 4 1,115 22-06-23, 10:02 PM
آخر رد: اسلام الكبابى
Photo [vb6.0] هناك مشكله اكتيف ريبورت يحث يظهر الخط عند عرض التقرير بشكل مكبر ومد في الحرف ؟؟ Microformt 7 1,142 03-02-23, 01:55 PM
آخر رد: Taha Okla
  مشكله في كود اتصال بجهاز البصمه ahmed1900 0 630 18-01-23, 11:54 AM
آخر رد: ahmed1900
  كيف نحل هذه المشكلة مع التايمر؟ Alhootti1 11 2,079 27-06-22, 02:19 AM
آخر رد: Ahmed_Mansoor
  مشكله في تقرير المبيعات ahmed201 2 1,958 21-02-21, 09:47 PM
آخر رد: ahmed201
  مشكله في كواد بحث في قاعدة بيانات اكسس ahmed250 2 1,875 07-08-20, 09:50 AM
آخر رد: ahmed250
  مشكله في كود اضافه ملف pdf في قاعدة بيانات اكسس وإستدعاءه ahmed250 1 1,769 03-07-20, 11:23 AM
آخر رد: Ahmed_Mansoor

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم