Posts

Showing posts with the label Visual Basic Programmers

VB 0.6 TreeView Control lesson Part5

Image
بسم الله الرحمن الرحيم توقفنا فى الجزء الرابع السابق   عند خواص الـ Node و موضوع اليوم ان شاء الله عن ربط الـ Tree-view بقاعدة بيانات MS Access 2003 " اذا لم تكن قد قمت بتحميل المشروع " TreeView & MS Access2003 Database  و المثال سيكون عباره عن : لدينا قاعدة بيانات Access 2003 سنقوم بعرض اسماء الجداول على شكل Root و اسماء الحقول على شكل Child و البيانات فى Text-boxes قابل للتعديل ( اضافة و حذف ) . أى أننا سنقوم بعمل برنامج يقوم باستدعاء أى قاعدة بيانات Access 2003 و تعديلها كما نحب , و سنبدأ بمشروع جديد . حيث سيكون شكل البرنامج النهائى كما بالشكل رقم (1) . شكل البرنامج النهائى 1) قاعدة البيانات : قم بتصميم أى قاعدة بيانات Access 2003 , فى المثال قاعدة البيانات باسم (Employees.mdb) تحتوى على جدولين (Info - Salary) حيث Info عبارة عن 4 حقول هى (ID P.Key Text 50 - Name Text 50 - Age Text 50 - Section Text 50) و Salary عبارة عن 5 حقول هى (ID P.Key Text 50 - Total Number Double - Cuts Number Double - Net Number Double - Month Date/Time) ...

VB 0.6 TreeView Control lesson Part3

بسم الله الرحمن الرحيم توقفنا فى الجزء الثانى السابق عند خاصية LabelEdit . و موضوع اليوم ان شاء الله عن خاصية SelectedItem " اذا لم تكن قد قمت بتحميل المشروع " SelectedItem Property - خاصية العنصر المختار و موضوع اليوم ان شاء الله عن خاصية SelectedItem أو العنصر المختار و هى خاصية من خصائص الـ ActiveX Control عموما و لكن فى TreeView تشير الى Nodes و هى العناصر التى يمكن اختيارها . الــــــــكود : Object.SelectedItem حيث Object تشير الى Node . - و عند تنفيذ SelectedItem فانه يعود بقيمة هى العنصر التى تم اختيارة من مجموعة العناصر . - مثال : حذف جميع الـ Nodes المختاره و التى ليست Root . اضف مفتاح Command للـ TreeView4 باسم Delete Child Nodes و الصق الكود التالى فى الحدث Click ' If the selected object is not the root, then remove the Node. If TreeView4.SelectedItem.Index <> 1 Then Treeview4.Nodes.Remove TreeView1.SelectedItem.Index End If   قم بتجريب المشروع و اختار اى Node من TreeView4 ثم اضغط على Command باسم De...

VB 0.6 TreeView Control Lesson Part2

Image
بسم الله الرحمن الرحيم Micr osoft Visual Basic 6.0 TreeView Control توقفنا فى الجزء الاول عند انشاء الـ Nodes   اليوم نتحدث عن الجزء الثانى من TreeView Control فى بيئة الـ Visual Basic 0.6 و هو : أولا : TreeView LineStyles Property أو خاصية أشكال رسمة الـخط - نعرف الان كل TreeView لها ImageList عباره عن الاشكال من الأيقونات و الخطوط التى تظهر فى أداة الـ TreeView و منها الخطوط التى تربط الـ Nodes ببععضها و تمثل شكل العلاقه بين الـ Nodes كما بالصورة رقم (1) . LineStyles - كود تحديد شكل الخط : Object.LineStyle = number - حيث : Object هو : عادة يكون الـ TreeView number هو : رقم أو ثابت يدل على نوع شكل الخط كما سيوضح فى الاعدادات Settings الاتيه - الاعدادات Settings : الثابت القيمة الوصف tvwTreeLines 0 الشكل الافتراضى. يظهر بشكل خطوط بين الـ Nodes فى نفس المستوى Siblings و ابائها فى مستوى أعلى tvwRootLines 1 رسم خطوط تمثل العلاقه بين الـ Nodes فى نفس المستوى و بين الـ Nodes فى مستوى أعلى و ايضا رسم خطوط تمثل العلاقه بين الـ Node...

VB 6.0 Marquee TitleBar Caption

بسم الله الرحمن الرحيم  vb6 Marquee Titlebar الموضوع : عمل عنوان للفورم متحرك من اليمين الى اليسار Marquee Title Bar Text From Right To Left مشروع جديد VB 0.6 اضافة فورم عليها Timer1 + Tetxt1 + Command1 + Command2 الاكواد : Form_Load : Command1.Caption = "Start" Command2.Caption = "Exit" Text1.Text = "الجملة التى تظهر فى العنوان" Command2_Click() مفتاح الخروج من البرنامج   Unload Me Command1_Click() Me.Caption = Text1.Text & Space(15) اضافة 15 مسافه بعد العنوان لكى نراه يتحرك و يمكن تغيير المسافه Timer1.Interval = 50 سرعة الحركة = 50 نبضه فى الثانيه مكن تقليلها لتزيد اكثر أو ويادتها لكى تقل السرعه If Command1.Caption = "Start" Then Command1.Caption = "Stop" Timer1.Enabled = True Else Command1.Caption = "Start" Timer1.Enabled = False End If Timer1_Timer()     Me.Caption = Right$(Me.Caption, Len(Me.Caption) - 1) & Left$(Me.Caption, 1) هذا يتكرر م...

VB 0.6 TreeView Control lesson Part1

Image
بسم الله الرحمن الرحيم الموضوع : دراسة اداة الـ TreeView من خلال Visual Basic 0.6 و مثال توضيحى عملى عليها و كيفية استخدامها مع قاعدة بيانات MS Access 2003 الشكل :  كما بالصورة رقم (1). شكل اداة الـ TreeView التعريف : هى اداه تستخدم لعرض قائمة تسلسل هرمى على شكل عقد Nodes و كل Node عباره عن Label و صورة Bitmap اختياريه (أى احيانا تستخدم و أحيانا لا) . تستخدم TreeView أصلا أو بالتحديد لعرض رؤوس مواضيع المستندات أو محتويات فهرس أو اسماء ملفات و مجلدات أو أى نوع بيانات يمكن أو يستحسن عرضها على شكل تسلسل هرمى Hierarchy . التعامل : بعد انشاء TreeView يمكنك العمل على اضافة أو ترتيب أو حذف أو تعديل الـ Nodes عن طريق الخصائص أو الاجراءات "الاكواد", يمكنك برمجيا باستخدام الكود توسيع Expand أو تضييق Collapse الـ Child Nodes أو العقد الفرعيه . يمكنك التعامل مع TreeView عن طريق الكود عند تحديد كيفية التعامل مع Node باستخدام كلا من : - Root - الاصل - Parent - الاباء - Child - الاطفال - FirstSibling - أقرب المقربين - Next ...

VB6 Popular Posts

Visual Basic Online Course - Excel 2003 Part 1

VB 6.0 - Save/Retrieve Images From Access Database

Visual Basic Online Course - ProgressBar Colors

Free download Visual Basic 6 Documentation MSDN

VB 6.0 with MS-Access 2003 Copy a record from table to another

Visual Basic Online Course - Run-time error '3021' : Either BOF or EOF is True, or the current record has been deleted.

VB6 Crystal Reports 4.6 Error : Method 'Action' of object 'CrystalCtrl' Failed

Visual Basic Online Course - Create a Phone Book

Visual Basic Online Course - Temperature convector