|
![]() |
|
أدوات الموضوع | انواع عرض الموضوع |
|
#1
|
|||
|
|||
![]()
نقوم بادراج تاب كونترول ونضع له خلفية صورة واضف عدد 2 تاب
من السهم الصغير كما ترى اضغط على الصورة للتكبير ![]() -------------------------------------------- ![]() ----------------------------------------- ![]() -------------------------------------- 10- ![]() ---------------------------------. 11- ![]() -------------------------------------------- --------------------------------------------------- . 12- ![]() -------------------------------------------- 13- ![]() ------------------------------------ 14- والان دعونا نضع كود برمجى مثلا نضغط مرتين على الفورم -- حتى نجد انفسنا فى خانة الاكواد ستجد اول سطر مكتوب هو Public Class Form1 كل ما عليك الان هو ان تنسخ هذا الكود وتضعه اعلى السطر السابق Imports System.ComponentModel Imports System.Diagnostics Imports System.Drawing Imports System.IO Imports System.Runtime.CompilerServices Imports System.Security.Cryptography Imports System.Text Imports Microsoft.VisualBasic Imports Microsoft.VisualBasic.CompilerServices Imports System.Windows.Forms كما سترى بالصورة التالية ولكننى افضل ان تقوم انت بكتابه الكود يدويا بالكيبورد حتى لا تحدث الاخطاء كما سترى الان بالصورة التالية Imports System اضغط للتكبير ![]() ساقوم بشرح الكود لاحقا كل شئ سأقوم بشرحه بأذن الله ولكننى الان فى عجلة من امرى والوقت متأخر واريد النوم عقب كل تغيير فى البرمجة == عليك بحفظ المشورع او الضغط على زر اف 5 التالى F5 من لوحة المفاتيح ------------------------------------------------- 15- نعود الى نافذة التصميم "gui" الاسااسية بالتصميم ونضغط على الزر الاول والذى غيرنا اسمه الى كلمة سكان ونضغط علية دبل كليك بالماوس ثم فى نافذة البرمجة نضيف هذا الكود ListBox1.Items.Clear() ListBox2.Items.Clear() TabControl1.SelectTab(1) Try For Each strDir As String In System.IO.Directory.GetDirectories(FolderBrowserDi alog1.SelectedPath) FolderBrowserDialog1.ShowDialog() 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() كما سترى -- اضغط الصورة للتكبير واكتب الكود يدويا ![]() سلام مؤقت الان سوف انام الان -- ونكمل فى وقت لاحق ----------------------- 16- |
![]() |
العلامات المرجعية |
|
|