شـريـط الاهـداءات | |
قسم الاسئلة و الاستفسارات الخاصه بلغات البرمجة قسم خاص بأسئله وإستفسارات للغات البرمجة |
|
أدوات الموضوع | انواع عرض الموضوع |
01-03-2014, 03:07 AM | #1 | ||||||||||||
The Professional
|
انا دلوقتي حاطط في الـ 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 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 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 ; 01-03-2014 الساعة 03:50 AM
|
01-03-2014, 04:05 AM | #2 | ||||||||||||
testing
|
System.Threading.Thread.Sleep(40) //sleeps for 40millisecond غير الرقم بس دا بالمللي..يعني ثانية = 1000 |
||||||||||||
|
01-03-2014, 05:33 AM | #3 | ||||||||||||
|
بالنسبة لكود الإنتظار فزي ما Midget قالك ولو عايزه ما يهنجش الفورم أستخدم ده كود:
Public Sub Sleep(ByVal millisecondsTimeout As Integer) For i As Integer = 0 To millisecondsTimeout / 10 Application.DoEvents() Threading.Thread.Sleep(10) Next End Sub أما بالنسبة لإختصار الكود فالكود مختصر اهو كود:
Dim Fields() As TextBox = { PW_1, PW_2, PW_3, PW_4, PW_5, PW_6, PW_7, PW_8, PW1PT2, PW2PT2, PW3PT2, PW4PT2, PW5PT2, PW6PT2, PW7PT2, PW8PT2 } If SamePass.Checked = True Then For Each Field As TextBox In Fields Field.Text = SamePassVal.Text Field.Enabled = False Next ElseIf SamePass.Checked = False Then For Each Field As TextBox In Fields Field.Enabled = True Next End If |
||||||||||||
التعديل الأخير تم بواسطة smsm20062009 ; 01-03-2014 الساعة 03:30 PM
|
01-03-2014, 05:02 PM | #4 | ||||||||||||
The Professional
|
تمام ،،، بس الفورم بيهنج برضه بالطريقتين واختصار الكود تمام التمام |
||||||||||||
|
02-03-2014, 01:15 AM | #5 | ||||||||||||
|
انت بتستعمل vb.net ليه ؟ ده رخم اوي و اكواده كتييييييييييير
|
||||||||||||
|
02-03-2014, 04:15 AM | #6 | ||||||||||||
The Professional
|
اللي اتعلمته في المدرسة بقي لو ممكن تعمل دورة #C من البداية خـــــــالص انا معاكـ |
||||||||||||
|
04-03-2014, 12:55 AM | #7 | ||||||||||||
|
دورات السي شارب على افا من يشيل على اليوتيوب وفي دورة لسا بادئة يوم الثلاثاء اللي فات ومبتدي من الاول لو عايز قولي وابعتلك الرابط
|
||||||||||||
|
يتصفح الموضوع حالياً : 1 (0 عضو و 1 زائر) | |
|
|