Visual Basic 6.0 translation

Showing posts with label Add controls at runtime. Show all posts
Showing posts with label Add controls at runtime. Show all posts

Monday, April 4, 2011

VB 6.0 Add Controls To The Form at Run-time

بسم الله الرحمن الرحيم
كيف نضيف اداة تحكم الى الفورم ؟


الاجابه بسيطة ... كل ما علينا فعله هو الذهاب بالماوس على قائمة الادوات يسار الفورم أو يسار الفيجوال بيزك و اختيار اى أداه و الضغط عليها ثم رسمها على الفورم أو الضغط عليها مرتين حتى تظهر على الفـــــــــــــورم .............. و لكن ما الجديد ؟؟؟!!! 

الجديد هو أننا سنتعلم كيف نضيف اداة تحكم على الفورم بدون استخدام الماوس ( أى بدون استخدام واجهة التصميم أو كما يسمونها بيئة الــــــــــ GUI و هى اختصار لــــ Graphical User Interface أو الواجهة الرسومية باللغه العربية الفصحه أو IDE وهى اختصار برمجى بمعنى Integrated Design Enviroment أى بيئة الرسم المتكامل ) و بالتالى ستكون الاضافة فى بيئة RunTime أو بيئة زمن الحدوث أى بعد عمل البرنامج نفسه .

تخيل أن الفورم فارغه و عندما تقوم بعمل Run تمتلأ بالازرار و مربعات الكتابه فالمكان الذى تريدة .. أو يكون بالفورم عدد معين من الازار و تقوم و انت تعمل بالبرنامج بعملية اضافة زر جديد يؤدى وظيفة جديده .

  1. الطريقة الأولــى :
نفتح الفيجوال بيزك الاصدار السادس طبعا و نبدأ باذن الله باختيار
 Standard Exe
ثم نضيف زر تحكم جديد و نغير الاسم عن طريق خاصية Name الى CMD1
و نضيف واحد أخر و نسمية CMD2 و نأتى على الخاصية Index و نضع بالخانة المقابله 0 و سنعرف معناها .
الأن الاكواد ....... اضغط بالماوس مرتين على CMD1 .......... و اكتب الاتى

سنجد الاتى :
كل مرة نضغط على CM1 ينشأ CM2 جديد
كل مرة نضغط على CM2 تظهر رساله مختلفه
و يمكنك :
تغيير عدد الرسائل بعدد الازرار عن طريق Next ....... For و هذا يرجع لمجهودك .
أو تغيير الازرار بمربعات كتابه أو أى اداة أخرى

2.  الطريقة الثانيـــــــــــــة :

ننزيل الازرار تماما من على الفورم و نضغط على الفورم مرتين لتظهر شاشة الكود و نقوم بمسح محتوياتها حتى تكون فارغه تماما .......... و نضيف الكود الاتى :


سنجد الاتى :

بمجرد عمل Run للبرنامج نجد أن الفورم بها عدد 5 ازرار
لكن عند الضغط على أى منهم لا نجد شيئا و هذا هو الفرق بين الطريقتين

 اذا اردت الاستفسار عن معنى أى كود أو أى فكرة أنا فى الخدمه 24 ساعه فقط ضع ردا على الموضوع ........ و لكن :
أنا لا أقوم بالبرمجة لأحد .. فقط سأعطيك أفكار و دلائل و أماكن للبحث مفيدة

Visual Basic Online Course

vb6 (63) Application Development (45) Visual Basic Online Course (45) Online Visual Basic Course (44) Visual Basic Help (44) Visual Basic Programming (42) IT Jobs (39) VB6 developer (38) Visual Basic Course (38) Visual Basic 6.0 (26) Microsoft Visual Basic 6.0 (25) VB6.0 (24) Visual Basic Programmers (24) vb 6.0 (24) visual basic programming tutorial (19) Third lesson (16) Source code download for Visual Basic 6.0 (14) Source code for Visual Basic 6.0 (10) visual basic tutorial (9) Visual Basic 6 (5) Visual Basic Courses (5) Lesson 3 (4) VB 0.6 - TreeView control (4) VB 0.6 With TreeView Control (4) VB6 Course (3) Create ActiveX (2) How to automate MS-Access from Visual Basic 6.0 (2) Add controls at runtime (1) Back up your Database (1) Change ActiveX icon (1) Change screen resolution (1) Create FTP (1) Crystal Reports 4.6 (1) Crystl32.ocx could not be loaded (1) DataGrid Columns re-size (1) Date Calculation (1) DateAdd Function (1) DateDiff function (1) FTP (1) Marquee Title Bar (1) Marquee VB 6.0 TitleBar (1) Method 'Action' of object 'CrystalCtrl' Failed (1) Microsoft Access with Visual Basic 6.0 (1) OpenSchema method (1) Save File Using CommonDilog (1) Track Database path (1) VB 0.6 - Registry (1) VB 0.6 With Registry Editor (1) VB 6.0 Access (1) VB 6.0 OOP (1) VB6 Access2003 ADO Like % (1) VB6 Add Date (1) VB6 Add Time (1) VB6 Date calculation (1) VB6 Subtract Date (1) Visual Basic Remote (1) Win7 (1) Windows7 (1) ms access networking details (1) remote Visual Basic DB (1) rounded and transparent forms (1) vb 0.6 style (1) vb 6.0 Remote Database (1)