تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
شرح الكود و الادوات المستخدمة
#1
لو تكرمت ان تشرح لي هذا الكود و الادوات المستخدمة 


Private Shared Sub __ENCAddToList(ByVal value As Object)

   Dim list As List(Of WeakReference) = Form18.__ENCList

   SyncLock list

       If (Form18.__ENCList.Count = Form18.__ENCList.CapacityThen

           Dim index As Integer = 0

           Dim num3 As Integer = (Form18.__ENCList.Count - 1)

           Dim i As Integer = 0

           Do While (i <= num3)

               Dim reference As WeakReference = Form18.__ENCList.Item(i)

               If reference.IsAlive Then

                   If (i <> index) Then

                       Form18.__ENCList.Item(index) = Form18.__ENCList.Item(i)

                   End If

                   index += 1

               End If

               i += 1

           Loop

           Form18.__ENCList.RemoveRange(index, (Form18.__ENCList.Count - index))

           Form18.__ENCList.Capacity = Form18.__ENCList.Count

       End If

       Form18.__ENCList.Add(New WeakReference(RuntimeHelpers.GetObjectValue(value)))

   End SyncLock

End Sub
الرد
تم الشكر بواسطة:
#2
هذا ليس الكود الأصلي و لكنه وعلي ما أظن ناتج من Compiler الخاص بلغة الفيجوال بيسك
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عندي مشكلة بخصوص الكود هدا The program '[13020] MainProj.exe' has exited with code 0 ٍOfelas 1 38 , 12:27 AM
آخر رد: Anas Mahmoud
  التعديل على الكود للتخلص من مشكلة البطىء حيث عدد السجلات كبير momani33 0 104 09-09-20, 01:33 PM
آخر رد: momani33
  ماهو الخطاء في هذا الكود عمور2016 1 91 06-09-20, 06:33 PM
آخر رد: حريف برمجة
  [سؤال] طرب الويندوز ومحتاج اجداد الكود سحاب روابط قائيمة تشغيل من اليتيوب Ali Edal 11 921 05-09-20, 03:36 PM
آخر رد: معاند الحظ
  المحافظة على مكان الادوات عمور2016 6 302 21-08-20, 09:30 PM
آخر رد: اسامه الهرماوي
  [سؤال] خطأ في التنفيذ الكود بعد فلترة dataGridView محمد العامر 2 213 20-08-20, 01:38 PM
آخر رد: محمد العامر
  [مشروع] هلا ساعدتموني في اكتشاف الخطأ في الكود gharib 6 291 18-08-20, 03:45 PM
آخر رد: gharib
  [كود] اريد التعديل على الكود وهو عدم التكرار عمور2016 3 255 23-07-20, 01:03 AM
آخر رد: عبد العزيز البسكري
  هذا الكود غلبني المهنا 2 279 19-07-20, 12:12 AM
آخر رد: المهنا
  [سؤال] منين او ازاى اجيب الكود الخاص بالصورة دى mostafa nada 1 214 13-07-20, 10:16 PM
آخر رد: DR.YASER

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


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