تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
هياكل البيانات Data Structures الصف Queue : الجزء الاول
#1
[COLOR="#000080"]
بسم الله الرحمن الرحيم

ساتكلم هنا عن الصف QUEUE وهو احد بنى المعطيات وذلك لما له من فائدة في الاستخدام البرمجي
وايضا لان اغلب الاخوة لا يعرفون عنه شيئاً

اولا:
ما هو الصف QUEUE ؟
هو عبارة عن مصفوفة تحوي اي نوع من البيانات تقوم انت بتحديده ولكنها تتميز بأنها تتبع اسلوب ال FIFO والذي يعني First In First Out او الداخل اولا خارج اولا
اي انه لا يمكنك اخد الا العنصر الاول منها وبعدما تاخذه رح ينحذف من المصفوفة او الصف بالاحرى

هي تشبه طابور السينما الى حد كبير او اي طاور اخر
حيث يوجد ناس واقفين بالدور واللي يجي اول شي راح يدخل اول شي وهكذا

ثانياً:
كيف اعرف الـصف Queue ؟
من زمان كنا نقوم نحن ببرمجته
لكن الان هو جاهز ما عليك سوى ان تصرح عنه بهذه الطريقة
كود :
Dim Q As New Queue(Of String)

وطبعا تستطيع ان تحدد نوع بيانات اخر مكان String
المهم الان اصبح عندك صف جاهز للاستخدام

ثالثا:
كيف اضيف البيانات الى الصف Queue؟
كما قلت لك اصبح الصف جاهزاً ولا داعي لتشغل بالك باموره البرمجية لذا ما عليك الا ان تستخدم الدالة Enqueue ويتم ذلك بهذا الشكل
كود :
Q.Enqueue("Any String")

وبهذا الكود يتم ادخال النص Any String الى الصف ليأخذ دوره

رابعاً:
كيف استخرج البيانات من الصف Queue ؟
ايضا لا داعي للقلق فهذا اسهل مما تتصور
استخدم الدالة Dequeue وهي ستقوم بالمطلوب
ستعيد لك العنصر الاول من الصف ثم ستقوم بحذفه من الصف ومن ثم تقريب جميع القيم ليصبح الثاني هو الاول والثالث هو الثاني و هكذا
ويتم استخامها بهذا الشكل
كود :
Dim S As String = Q.Dequeue

هنا وضعنا العنصر الاول بالمتغير S وطبعا تستطيع استعماله كما تريد

خامساً:
بماذا يفيدني الصف Queue برمجياً؟
ممم هذا اهم سؤال
حسنا يفيدك كثيرا عند تصميم برنامج يقوم بمعالجة طلبات متعددة مثل ارسال ملفات او معالجة صور او صوت او اي برنامج يقوم بتنفيذ مهام
حيث انك تضع المهام في الصف ثم تستخرج منه مهمة تلو الاخرى و تنفذها

في النهاية اعذروني على طريقتي بالشرح فبالنهاية انا لست محترفاً

وهنا اريد ان اورد مثال صغير عن الصف
كود :
Public Class Form1
    Dim Q As New Queue(Of String)

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For i = 0 To 5
            Q.Enqueue(i)
        Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For i = 1 To Q.Count
            MsgBox(Q.Dequeue)
        Next
    End Sub
End Class

فقط قم باضافة button واحد
ولاحظ سهولة استخدام الصف في ادخال البيانات و استعادتعا ومعالجتها
[/COLOR]


الملفات المرفقة
.rar   Queue.rar (الحجم : 61.41 ك ب / التحميلات : 48)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مقدمة إلي إخفاء المعلومات - الجزء الأول silverlight 5 376 07-01-17, 10:44 PM
آخر رد: Basil Abdallah
  مقدمة إلي إخفاء المعلومات - الجزء الثاني silverlight 1 233 06-01-17, 11:52 AM
آخر رد: silverlight
  [شرح] اتصال بقاعدة بيانات اكسيس , اضافة بيان , تعديل بيان , حذف بيان , عرض البيانات . ahmed salam 20 11,097 26-09-16, 08:12 AM
آخر رد: abumuhannadzym
  [كود] استرجاع البيانات من ConnectionString silverlight 1 433 25-01-16, 05:08 PM
آخر رد: khodor1985
  [درس فيديو] حل مشكلة صلاحيات قواعد البيانات عند تغيير مسارها على الجهاز Operating System Error 5 أحمد النجار 1 598 31-12-15, 02:52 AM
آخر رد: WAEL ABED
  فيديو بالعربي تبادل البيانات بين Excel و VB.net أحمد النجار 0 678 03-06-15, 10:53 PM
آخر رد: أحمد النجار
  تحويل الفيديو في برامجك-الجزء الثاني( إصلاح للمشاكل + تعديل للروابط + توضيح للأمر ) RaggiTech 1 850 10-12-14, 06:37 PM
آخر رد: abulayth
  الجزء الثالث من:كيف تجعل الـ Text Box ذكي!يترجم العمليات الحسابية ويخرج الناتج (الأقواس المتعددة) !! أنس محمود 9 2,427 06-12-14, 10:11 PM
آخر رد: RFEE3 ALSHAN
  برمجة قواعد البيانات sql server + vb.net ابوهديل 1 6,155 13-02-14, 08:26 PM
آخر رد: Omar Mekkawy
  برمجة قواعد البيانات SQL Server + vb.net مع ابو عبد الرحمن مبرمج أوتار 3 2,919 07-06-13, 06:09 AM
آخر رد: مبرمج أوتار

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


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