اقتباس المشاركة الأصلية كتبت بواسطة AMYM مشاهدة المشاركة
سؤال جديد

الان كنت ببرمج برنامج الساعه المؤقته ... ابرمجه بطريقه مبتداه المهم ...

لكن هناك شئ خاطئ ... فالبرنامج لا يعمل


لذا هذه هي الاكواد ... اخبروني اين الخطأ

هذا برمجه الــ Timer


كود:
 Label3.Text = Label3.Text + 1
        If Label3.Text = "60" Then
            Label2.Text = Label2.Text + 1
            Label3.Text = "00"
        Else
            If Label2.Text = "60" Then
                Label1.Text = Label1.Text + 1
                Label2.Text = "00"
            End If
        End If


وهذا برمجه زر Start

كود:
 Timer1.Interval = 1000
وهذا زر Stop
ويوجد خطا بالبرمجه الخاصه به
كود:
Timer1.Interval = 0
أهلا عزيزي أحمد موساااا...إإحم مسعد ...
سأتكلم فيما أعلم فقط:
هذا الجزء من الكود الخاص بالتايمر:
كود:
If Label2.Text = "60" Then
                Label1.Text = Label1.Text + 1
                Label2.Text = "00"
فيفترض جعلها بعد End If كاستثناء آخر له End If خاصة به...
لتصبح هكذا:
كود:
Label3.Text = Label3.Text + 1
        If Label3.Text = "60" Then
            Label2.Text = Label2.Text + 1
            Label3.Text = "00"
                            End If
If Label2.Text = "60" Then
                 Label1.Text = Label1.Text + 1
                 Label2.Text = "00"
        End If
..
أيضا تلميح....
لا تكتب else في سطر و If في سطر آخر فهي قاعدة مستقلة تضطر معها لكتابة End If أخرى كما فعلت واكتب Else If وأكمل بعدها ولن تضطر لكتابة End If لأكثر من مرة....

أما باقي الأكواد فلا أعرف عنها شيئا....

رحم الله أخونا إسلام لو يزور هذا الموضوع...أو حتى أخونا مازن...كان الله في عونهم...