عرض مشاركة واحدة
قديم 01-03-2014, 03:07 AM   #1

youssef13
كبار الشخصيات


The Professional

الصورة الرمزية youssef13


• الانـتـسـاب » Nov 2011
• رقـم العـضـويـة » 94480
• المشـــاركـات » 10,614
• الـدولـة »
• الـهـوايـة » VB.NET Programmer
• اسـم الـسـيـرفـر » Taurus
• الـجـنـس » Male
• نقـاط التقييم » 2180
youssef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدودyoussef13 مميز بلا حدود

youssef13 غير متواجد حالياً

13763  



افتراضي كود يوقف التنفيذ لمدة دقيقة



انا دلوقتي حاطط في الـ Form_Load الكود دة
كود:
If Auto1.Checked = True Then
            Login1.PerformClick()
        End If
        If Auto2.Checked = True Then
            Login2.PerformClick()
        End If
        If Auto3.Checked = True Then
            Login3.PerformClick()
        End If
        If Auto4.Checked = True Then
            Login4.PerformClick()
        End If
دلوقتي انا عايزه يستني دقيقة قبل ما يدخل علي الـ If التانية
يعني عايز منظر الكود يبقي كدة
كود:
 If Auto1.Checked = True Then
            Login1.PerformClick()
        End If
        'حاجة هنا توقف تنفيذ لمدة ديقيقة
        If Auto2.Checked = True Then
            Login2.PerformClick()
        End If
        'حاجة هنا توقف تنفيذ لمدة ديقيقة
        If Auto3.Checked = True Then
            Login3.PerformClick()
        End If
        'حاجة هنا توقف تنفيذ لمدة ديقيقة
        If Auto4.Checked = True Then
            Login4.PerformClick()
        End If
        'حاجة هنا توقف تنفيذ لمدة ديقيقة
( مش عايز Timer )
انا شفت الكود مرة ع النت بيتحط مكان ما انت عايز توقف التنفيذ بس مش فاكره


طلب كمان :.:.:
عايز طريقة أصغير بيها الكود دة :
If SamePass.Checked = True Then
كود:
            PW_1.Text = SamePassVal.Text
            PW_2.Text = SamePassVal.Text
            PW_3.Text = SamePassVal.Text
            PW_4.Text = SamePassVal.Text
            PW_5.Text = SamePassVal.Text
            PW_6.Text = SamePassVal.Text
            PW_7.Text = SamePassVal.Text
            PW_8.Text = SamePassVal.Text
            PW1PT2.Text = SamePassVal.Text
            PW2PT2.Text = SamePassVal.Text
            PW3PT2.Text = SamePassVal.Text
            PW4PT2.Text = SamePassVal.Text
            PW5PT2.Text = SamePassVal.Text
            PW6PT2.Text = SamePassVal.Text
            PW7PT2.Text = SamePassVal.Text
            PW8PT2.Text = SamePassVal.Text
            PW_1.Enabled = False
            PW_2.Enabled = False
            PW_3.Enabled = False
            PW_4.Enabled = False
            PW_5.Enabled = False
            PW_6.Enabled = False
            PW_7.Enabled = False
            PW_8.Enabled = False
            PW1PT2.Enabled = False
            PW2PT2.Enabled = False
            PW3PT2.Enabled = False
            PW4PT2.Enabled = False
            PW5PT2.Enabled = False
            PW6PT2.Enabled = False
            PW7PT2.Enabled = False
            PW8PT2.Enabled = False
        End If
        If SamePass.Checked = False Then
            PW_1.Enabled = True
            PW_2.Enabled = True
            PW_3.Enabled = True
            PW_4.Enabled = True
            PW_5.Enabled = True
            PW_6.Enabled = True
            PW_7.Enabled = True
            PW_8.Enabled = True
            PW1PT2.Enabled = True
            PW2PT2.Enabled = True
            PW3PT2.Enabled = True
            PW4PT2.Enabled = True
            PW5PT2.Enabled = True
            PW6PT2.Enabled = True
            PW7PT2.Enabled = True
            PW8PT2.Enabled = True
        End If
لو ينفع مثلًا أعمل حاجة زي اسم مشترك للأدوات
حاولت بالـ Tag معرفتش
لو ينفع بيها ياريت تقولولي ازاي
ولو مينفعش
يبقي ايه فايد الـ Tag
لو فيه طريقة تانية يبقي كويس
معلش طلباتي كتير


توقيع youssef13 :
يــرجــي اختيــار افــضــل اجــابــة والـرد بـ"تــم حـل الـمشـكلـة" عندمــا تـنتـهـي مـشكـلـتكـ فـي احـد اقســام الاسئلــة والاستفسـاراتـ ..

التعديل الأخير تم بواسطة youssef13 ; 01-03-2014 الساعة 03:50 AM

رد مع اقتباس
إعلانات google