الجزء الثانى:كيف تصنع Real Anti-virusحقيقى بالفجيوال بايسك 2010 والشرح بالمعلومات

[tomjerry741]

بسم الله الرحمن الرحيم
اللهم لا سهل الا ما جعلته سهلا
وانت تجعل الحزن ان شئت سهلا
------------
نبدأ من حيث انتهينا فى الجزء الاول السابق
- لمتابعة الجزء الاول عليك بالرابط الاتى
http://www.thanwya.com/vb/showthread.php?t=405427

بعد ان قمنا ببرمجة الزر الاول والذى اسميناه سكان - scan
نقوم الان بالعودة مرة اخرى الى الفورم الرئيسى ونضغط على الزر الثانى الذى اسميناة full scan
نضغط عليه مرتين - دبل كليك - ونضع هذا الكود البرمجى فيه


FolderBrowserDialog1.SelectedPath = ("C:/")
Try
For Each strDir As String In
System.IO.Directory.GetDirectories(FolderBrowserDi alog1.SelectedPath)

For Each strFile As String In System.IO.Directory.GetFiles(strDir)

ListBox1.Items.Add(strFile)

Next

Next
Catch ex As Exception
End Try

Timer1.Start()
وانا انصحك ان تقوم بكتابته يدويا ولا تعتمد على النسخ بدون قراءة الكود جيدا حتى تفهم اكثر ---
وتكون مبرمجا محترفا فيما بعد




نعود مرة اخرى الى الفورم ونضغط على التبويب الثانى فى صندوق التاب كنترول tapcontrol 16-
والذى ادرجناة سابقا
نضغط مرة واحدة على التبويب Scanner كما ترى بالصورة
ثم نتجة الى ضندوق الادوات على ايدك الشمال ونقوم بسحب شريط تقدم واحد progresspar
ونضغط مرة واحدة على شريط التقدم ونغير خاصية maximum بدلا من 100 الى القيمة رقم زيرو يعنى تكتب صفر
كما ترى بالصورة -- اضغط الصورة للتكبير


-------------------------

17-
الخطوة التالية بعد ان اضفنا سابقا شريط تقدم
نقوم الان بأدراج تكست بوكس وسنجد سهما صغيرا جدا -- نضغط على السهم ونضع علامة صح امام كلمة مالتى لاين multiline
كما ترى بالصورة ولا داعى كل مرة اقول لك اضغط الصورة للكتبير


نغير الان خاصية التكست بوكس الذى اضفناة الان
بعد ان نقوم بتمديدة وتكبيرة ليتناسب مع مكانته التى سوف نعرف قيمتها فيما
نغير خلفية لونه الى اى لون يعجبنا
نغير خاصية للقرءاة فقط ونجعلها true
كما بالصورة التالية


-------------------------------------


18-
نقوم الان بادراج بانيل جديد Panel من صندوق الادوات
ونغير خاصية بوردر الى fixedsingle كما سترى فى الصورة التالية ولا تنسى ان تضيف ثلاثى lable الى البانيل كما بالشكل


نضغط على كل ليبل على حدة ونقوم بتغيير اسم كل ليبل الى الاتى

الييبل الاول نغير خاصية التكست فيه الى files scanned يعنى الملفات التى تم فحصها
الييبل الثانى نغير خاصية التكست فيه الى total Files يعنى عدد جميع الملفات الموجودة
الييبل الثالث نغير خاصية التكست فيه الى infected files
--------------------
19-
نحن الان داخل الفورم
وعملنا كلة يدور ايضا داخل التاب بانيل
بعد ان اضقنا الى التبويب سكان ما اضفناة
وبعدما اصفنا الى التبويب الرئيسى main ما اضفناة
نتعامل الان مع التبويب الرابع والذى اسميناة file detected
نضغط على التبويب فايل ديتيكت ونقوم بادراج لست بوكس يعنى Listbox من صندوق الادوات
بعد ان اضفنا لست بوكس وقمنا بتحجيمة وتكبيرة داخل التبويب
نقوم بسحب زرين يعنى 2 button ونقوم بتغيير خاصية التكست لكل زر الى الاتى
الزر رقم ثلاثة نكتب بدلا من delete all
والزر رقم اربعة نكتب بدلا منه delete
اضغط الصورة للتكبير

---------------------------------------

سوف نكمل بقية التصميم لاحقا
عشان انا عندى صداع الان
20----