تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عداد دقائق بالثانية
#1
بسم الله الرحمن الرحيم
والصلاة والسلام على أشرف المرسلين سيدنا محمد وعلى آله وصحبه أجمعين

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

كيف يمكنني عمل عداد بالثانية باستخدام الدالة TimeSpan
يعني على شكل زر لما اضغط عليه يبتدي العداد يعد مثلا
00:00:00
وبعد كده
00:00:01
لما يصل إلى
00:00:59
يصبح الرقم
00:01:00
لما يصل إلى
00:59:00
يصبح الرقم
01:00:00
وهكذا
شكرا

حاولت وقد توصلت للنتيجة الحمد لله
قلت أرفق المثال للأستفادة
ملحوظة قيمة interval للتيمر 1000
كود :
Public Class Form1
    Dim s As Integer = 0
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Not Timer1.Enabled = True Then
            Timer1.Enabled = True
        Else
            Timer1.Enabled = False
            s = 0
        End If
      
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        s += 1
        Dim span As TimeSpan = New TimeSpan(0, 0, 0)
        Dim span1 As TimeSpan = New TimeSpan(0, 0, s)
        span = span.Add(span1)
        Application.DoEvents()
        TextBox1.Text = span.Duration.ToString

    End Sub
End Class
الرد }}}}
#2
السلام عليكم ورحمة الله وبركاته


أنت من القلة الذين إذا حل سؤاله بنفسه يضعه للإستفادة

بارك الله فيك، وأرجو أن يقتدوا الآخرين بك.


السلام عليكم ورحمة الله وبركاته
 
 
@@@ سامحوني، منقطع نهائياً @@@

 
الرد }}}}
تم الشكر بواسطة: ismail2012 , kslawy , mohammed moh , سعود
#3
بارك الله بكم جميعا
الرد }}}}
تم الشكر بواسطة:
#4
إقتباس :بارك الله فيك، وأرجو أن يقتدي بك الاخرون.
اي والله مثل ماقلت ياخوي مااجمل ان يكتب السائل جواب سؤاله ان وجده لانه بهذا يثبت حسن ظنه باخوانه..والاجمل لو كتب موضوع جديد بقسم المقالات او مثال بقسم المشاريع.
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] مطلوب كود يقوم بعمل عداد count naden 5 186 13-10-16, 03:43 AM
آخر رد: الماجيك مسعد
  [سؤال] عداد زمني وفيه زر ايقاف saadhod 8 471 22-02-16, 08:29 AM
آخر رد: mrnooo2000
Information [سؤال] يرجى المساعدة ضروري عداد وترقيم تلقائي بدر إشتية 2 552 16-02-15, 09:25 PM
آخر رد: الكاتب
  [VB.NET] إدراج عداد تناظري و عدادات أخرى firas 1 228 18-09-14, 09:59 PM
آخر رد: aladein
  كيف اسوي عداد hassan 2 452 23-07-14, 04:46 AM
آخر رد: hassan
  [VB.NET] كيف اقدر اوجد مجموع الاعداد و عدد الا عداد فيListBox مبرمج مبتدأ 3 824 11-02-14, 07:46 AM
آخر رد: Genius Live
  كيف اضيف عداد وقت للجريد فيو maaw 1 297 13-12-12, 07:46 AM
آخر رد: amgadtamer

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


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