لي سنة من خلصت دورة MCSD وما جربت ابدا استخدم الثريد لعدم الحاجة
لكن بكتبلك مثال بسيط جدا ويحبه قلبك
سولك Form وحط فيها Button
ضيف للبرنامج هالمكتبة :
كود PHP:
Imports System.Threading
كذا راح تظيف المكتبة الخاصة بلثريدنق
داخل البوتن حط هالكود:
كود PHP:
Dim Thread1 As ThreadStart = New ThreadStart(AddressOf TheFun)
Dim ThreadOne As Thread = New Thread(Thread1)
ThreadOne.Name = "First"
Dim ThreadTwo As Thread = New Thread(Thread1)
ThreadTwo.Name = "Second"
ThreadOne.Start()
ThreadTwo.Start()
السطر الاول :عرفتلي (امر الثريد) الي راح ينفذ الكود الموجود في السوب TheFun واسمه Thread1
السطر الثاني :عرفتلي الثريد الاول الي راح ينفذ (امر الثريد) واسمه ThreadOne
السطر الثالث :عطيت الثريد الاول اسم ظاهري اقدر منه اعرف اي ثريد يشتغل عندي حاليا
السطر الرابع :عرفت الثريد الثاني الي كذلك ينفذ (امر الثريد) واسمه ThreadTwo
السطر الخامس :عطيت اسم ظاهري مثل السابق
السطر السادس و السابع :طلبت بتشغيل الثردين
حط هالـ Sub داخل البرنامج:
كود PHP:
PrivateSub TheFun()
For AutoNum AsInteger = 0 To 10
MessageBox.Show(Thread.CurrentThread.Name & "-" & AutoNum)
Next
EndSub
هالسوب عرفتلي فاريبل من نوع انتيجر وحطيته في لوب يمشي من صفر الين عشرة
وكل مرة يدور راح يطلعلي اسم الثريد الظاهري الي يشتغل و الرقم المخزن في الفاريبل
==============
راح تشوف انك اول ماتشغله بيطلعلك مسجين بوكس بنفس الوقت وهذا شي مامر عليك من قبل
المسج بوكس الاول فيه اسم الثريد الاول مع الرقم المخزن بافاريبل
المسج بوكس الثاني فيه اسم الثريد الثاني مع الرقم المخزن بافاريبل
وموفق
