دروس فيجوال بيسك 6

....................................................تابع الدرس الثالث........................................................

كائنات وأدوات فيجوال بيسك:

*الادوات التي تعرض الصور والرسوماتControls That Display Pictures and Graphics:

أداة الصورة Picture Box Control:

تستخدم أداة Picture Box لعرض رسم معين أو يمكن استخدامها كحاوية لعناصر أخرى، أو لعرض مخرجات العناصر بإستخدام الطريقة Print.

وفي الحقيقة إن Picture Box مشابه تقريبا لأداة image ، لكن تتميز الــ Picture Box بأنها قادرة على تمثيل نفسها كحاوية للعناصر الأخرى كذلك تدعم عدة طرق للتعامل مع الرسم أو الصورة.

وهذه هي أنواع الصور التي تدعمها هذه الأداة:

bitmap, cursor, icon, metafile, enhanced metafile, JPEG or GIF

ولوضع صورة معينة داخل أداة Picture Box في وقت التصميم ،ما عليك إلا استخدام الخاصية Picture ، حيث تساعدك على اختيار صورة ووضعها لتعرض داخل الأداة.

أما من خلال الشيفرة Code فاستخدم الوظيفة LoadPicture مع الخاصية Picture كما في المثال التالي:

Set Picture1.Picture = _
LoadPicture("c:\Windows\Winlogo.cur", vbLPLarge, vbLPColor)

بالنسبة لـ:

vbLPLarge: وهذه من الاعدادات الخاصة بالحجم وهي تعني رموز كبيرة.

vbLPColor: وهذه من الاعدادات الخاصة باللون وهي تعني 256 لون.

انظر المثال التالي:

Set Form1.Icon = LoadPicture("MYICON.ICO")

حيث يستخدم لوضع صورة كرمز Icon للنموذج.

ولمسح قيمة الخاصية Picture ، أي مسح الصورة من أداة Picture Box ، نستخدم الوظيفة LoadPicture دون تحديد صورة معينة.

ملاحظة: كذلك تستطيع إضافة صورة إلى Picture Box في وقت التصميم بإستخدام الامر Copy And Paste تأخذ الصورة مثلا من برنامج الرسام وتلصقها في الأداة Picture Box في الفيجوال بيسك.

ولجعل أداة الصورة تأخذ الحجم المناسب للصورة ضع الخاصية AutoSize على القيمة True.

ويمكن أن تعتبر الأداة Picture Box كالنموذج في بعض الحالات على سبيل المثال ، تستطيع أن تستخدم الـطريقة Circle لرسم دائرة داخل الـ Picture Box وذلك بضبط الخاصية AutoRedraw على القيمة True. لاحظ المثال التالي:

Picture1.AutoRedraw = True
Picture1.Circle (1200, 1000), 750

كما يمكنك استخدام الطريقة Print لوضع مخرجات نصية داخل Picture Box. لاحظ:

Picture1.Print "A text string"

إلى هنا أكتفي ، ،

نراكم لاحقا هذا اليوم بإذن الله

السلام عليكم ورحمة الله وبركاته، وبعد:

هذا الملف المرفق ، هو عبارة عن مثال فيجوال بيسك شامل جميع الأدوات التي وصلنا لها لغاية الأن وأكثر،

فقط للإطلاع والتدريب ،

إخواني الاعزاء حاولوا القيام بذلك،

كما لدي ملاحظة الان أنني أكتب الدروس واقوم بتحضيرها وما عرفت للأن ما هو رأيكم في الطريقة التي أتبعها، فأرجو منكم ان تخبروني بآرائكم ، حيث الفائدة كما أنني أتقبل جميع اقتراحاتكم ،

أخوكم عبد الرحيم أحمد

تدريبات لغاية الان.zip

ما شاء الله اخي Abdulraheem .. الموضوع روعة الى الآن و مفيد جداً ... و هذا ما نريده فعلاً ..

و اعتقد انه سوف يزدهر ... فقط عليك ان تصبر و ترى :)

بنت اليمن ،،

....................................................تابع الدرس الثالث........................................................

كائنات وأدوات فيجوال بيسك:

*الادوات التي تعرض الصور والرسوماتControls That Display Pictures and Graphics:

يبدو أن الدرس الثالث طويل ، ، ، لم ينتهي إلى اليوم -:)

ادوات الرسم Graphical Controls:

إن الأدوات التالية image, shape and line تعبر أدوات رسومية خفيفة lightweight controls حيث أنها تدعم مجموعة بسيطة من الخصائص والطرق والأحداث الموجودة في الأداة Picture Box. لذا فهي تعتبر أسرع في التحميل وأقل حجما من الأداة Picture Box.

أما بالنسبة لوضع صورة في الأداة Image فهي نفس الطريقة المتبعة في الأداة Picture Box كما وضحنا في الدرس السابق.

هذا الدرس مرفق معه تمرين أتمنى أن تقومو بهذا التمرين المرفق، وبهذا أكون قد أنهيت بإذن الله الدرس الثالث، كائنات وأدوات فيجوال بيسك، لأقوم بتحضير الدرس الرابع .

نراكم،

Image App.zip

السلام عليكم

ولو ان شاء الله ربنا يوفق و نقوم باللازم :)

اتمني ان اكون من اوائل الذين يجمعون غير ان الوقت خلص

فانا ادخل من مقهي انترنت الان

اخ بس ليش علي هيئة PDF?و تحياتي للجميع بالتوفيق:)

.................................................الدرس الرابع..................................................

أدوات إضافية Additional Controls:

يحتوي Visual Basic على العديد من الأدوات الموجودة في Tool Box صندوق الأدوات والغير موجودة فيه. ومنها الأدوات التي تتعامل مع كميات كبيرة من البيانات وتسمى Data Access Controls ومنها ما يتعامل مع ملفات النظام أو ملفات ويندوز وتسمى File System Controls ومنها ما يعرض مربعات حوار للمستخدم وتسمى common dialog control.

ADO Data control : تستخدم للإتصال بقاعدة البيانات ، وتستطيع التفكير بهذه الأداة على أنها أنبوب يوصل ما بين قاعدة البيانات والأداة الموجودة على النموذج Form في تطبيقك أو مشروعك. وإن خصائص هذه الأداة وطرقها Methods وأحداثها تسمح لك بالتعامل مع البيانات الخارجية في مشروعك.

DataList control : وهو يشبه إلى حد ما List Box Control ، حيث تستخدم هذه الأداة مع ADO Control.

DataCombo control : حيث تشبه هذه الأداة في عملها DataList control و Text Box.

DataGrid control : حيث تقوم هذه الأداة بعرض البيانات في جدول Table أو هيئة grid، وتعمل هذه الأداة مع ADO Control.

FlexGrid control : أداة فريدة تستطيع من خلالها عرض البيانات بعدة طرق مختلفة، حيث يستطيع المستخدم أثناء التنفيذ بالتغير في حجم الاعمدة والصفوق وبذلك تغير طريقة العرض.

DriveListBox control : حيث تشبه هذه الأداة الـ Combo Box , وتعطيك في عملها قائمة منسدل Drop-Down List من المشغلات drives من المكان الذي يحدده المستخدم.

DirListBox: ويشبه نوعا ما الـ List Box حيث يمكنك من عرض قائمة من ال directories للمشغل Drive الذي تختاره.

FileListBox: يستخدم لعرض قائمة بأسماء الملفات وذلك حسب الdirectories الذي قمت بإختياره.

timer control : يستخدم لإنشاء حدث في تطبيقك دون الحاجة لأي عمل من المستخدم.

OLE container control : باستخدام هذه الأداة تستطع الوصول لـ وظائف أي OLE-enabled application مثل مايكروسوفت إكسل , وورد ...

common dialog control : ومن خلال هذه الأداة تستطيع إضافة أي من مربعات الحوار الشائعة لتطبيقك، كـ الحفظ Save ، الخط Font ، الطباعة Printing وهكذا..

إلى هنا أنتهى الدرس الرابع ، ألقاكم في الدرس الخامس

..............................................الدرس الخامس..........................................

التركيز Understanding Focus:

بؤرة التركيز Focus أو الأدة النشطة هي المقدرة على استقبال إدخالات المستخدم من خلال الفأرة أو لوحة المفاتيح. وعندما يكون أداة معينة نشطة Have the focus فإن هذا العنصر يستقبل أي إدخال من قبل المستخدم، في بيئة نظام التشغيل Windows فإنه من الممكن أن يكون هناك العديد من البرامج المفتوحة للعمل عليها، لكن هناك برنامج وحيد يستقبل من المستخدم الإدخالات وهو البرنامج الذي عليه الـ Focus.

ومن الاحداث المهمة التي نتعامل معها في Visual Basic هي:

GotFocus: ويدخل هذا الحدث طور التنفيذ ، عندما يحصل العنصر او الاداة على التركيز Focus.

LostFocus: ويدخل هذا الحدث طور التنفيذ، عندما يفقد العنصر أو الاداة التركيز Focus، ويمكن استخدام هذا الحدث في شيفرة للتحديث أو الحفظ، ..

ومتى أستطيع إعطاء عنصر معين التركيز Focus؟

-عندما أختار هذا العنصر أثناء تنفيذ البرنامج .

-استخدام مفاتيح الوصول Access Key لتحديد هذا العنصر.

-استخدام الطريقة SetFocus في شيفرة البرنامج.

ملاحظة: ويستطيع العنصر الحصول على التركيز Focus في حالة كانت الخاصية Enabled واخاصية Visible ، مضبوطتين على القيمة True.

وهذه هي بعض العناصر التي تستطيع أستقبال التركيز Focus:

Frame control

Image control

Label control

Line control

Shape control

وهذا مثال على الحدث GotFocus:

Private Sub Form_Load ()
   Label1.AutoSize = True
End Sub

Private Sub OptionGroup_GotFocus (Index As Integer)
   Select Case Index
      Case 0
         Label1.Caption = "Option 1 has the focus."
      Case 1
         Label1.Caption = "Option 2 has the focus."
   End Select
End Sub

Private Sub OptionGroup_LostFocus (Index As Integer)
   Label1.Caption = ""
End Sub

هذا المثال يقوم بعرض رسالة في شريط الحالة Status bar عندما يحصل زر معين في مجموعة ال OptionButton على التركيز Focus.

وهذا مثال أخر على الحدث LostFocus:

Private Sub Text1_GotFocus ()
   ' Show focus with red.
   Text1.BackColor = RGB(255, 0, 0)
   Label1.Caption = "Text1 has the focus."
End Sub

Private Sub Text1_LostFocus ()
   ' Show loss of focus with blue.
   Text1.BackColor = RGB(0, 0, 255)
   Label1.Caption = "Text1 doesn't have the focus."
End Sub

هذا المثال يغير اللون لمربع النص Text Box عندما يحصل على أو يفقد التركيز Focus.

إلى هنا أنتهي اليوم ، ، شاكر لكم تقديركم

....................................................الدرس السادس................................................

*Setting the Tab Order:

Tab Order: وهي ترتيب الأدوات على Form عندما يتنقل المستخدم عبر هذه الاداوات باستخدام المفتاح TAB في لوحة المفاتيح، أثناء تشغيل البرنامج.

ولكل نموذج Form ترتيب معين Tab order وعادة يكون حسب إنشاء الأداة Controls، على سبيل المثال، لنفترض أن لدينا From، وقم بإنشاء التالي عليها وبالترتيب:

1. Textbox1.

2. Textbox2.

3. Command1.

عندما تقوم بتنفيذ البرنامج Text1 له التركيز Focus وعندما نقوم بالضغط على المفتاح Tab ينتقل التركيز إلى text2 وعند الضغط مرة أخرى على tab ينتقل التركيز إلى Command1. وبشكل افتراضي تأخذ الخاصية TabIndex القمية (0) للأداة الأولى، و(1) للثانية و (2) للثالثة وهكذا.

ولتغير ترتيب الادوات Tab orders في المثال السابق، نقوم بتغير قيمة الخاصية TabIndex، ولو أردنا حذف أداة معينة من الترتيب Tab Orders أي أنك لا تستطيع الوصول لهذا العنصر عن طريق الضغط على المفتاح Tab ، نقوم بوضع قيمة الخاصية TabStop على القيمة (0) أو False.

وهذا المثال يوضح استخدام خاصية TabIndex:

Private Sub Form_Click ()
   Dim I, X   ' Declare variables.
   ' Reverse tab order by setting start value of X.
   If CommandX(0).TabIndex = 0 Then X = 4 Else X = 1
      For I = 0 To 3
         CommandX(I).Caption = X   ' Set caption.
         CommandX(I).TabIndex = X - 1   ' Set tab order.
         If CommandX(0).TabIndex = 3 Then
            X = X - 1   ' Decrement X.
         Else
            X = X + 1   ' Increment X.
         End If
      Next I
End Sub

ولأستخدام هذا المثال، قم بإنشاء مشروع يحتوي على Form وزر أمر Command Button اسمه CommandX.

إلى هنا أنتهي من هذا الدرس.

....................................................الدرس السابع................................................

تحت التحضير..

.................................................................الدرس السابع.................................................................

القوائم Menu:

لا بد أنك استخدمت القائمة ملف في برنامج مايكروسوفت وورد، وقتمت باختيار الامر حفظ ، أو طباعة.

إذا أردت أن يقوم مشروعك بإعطاء المستخدم مجموعة من الأوامر، فإن القوائم Menus توفر لك طريقة بتجميع الأوامر كذلك سهولة في الوصول لهذه الاوامر.

ويظهر شريط الاوامر عادة أسفل شريط العنوان Title Bar مباشرة, ويحتوي على قائمة أو أكثر، حيث تحتوي هذه القائمة على قائمة فرعية Sub Menu أو أمر معين وتسمى Menu Item. وهذه هي بالطبع القوائم الكلاسيكة الموجودة في جميع البرامج تقريبا.

وهناك نوع أخر من القوائم يسمى Pop-up Menu أو القائمة المختصرة، حيث تظهر هذه القائمة عند الضغط بالزر الايمن ، وإن معظم مستخدمي نظام التشغيل ويندوز يعرفون هذه القائمة.

ولإنشاء القائمة نقوم بما يلي:

1. من القائمة Tools اختار الأمر Menu Editor

2. يظهر لك نافذة بإسم Menu Editor.

3. بأستخدام هذه النافذة نقوم بإنشاء القوائم حيث تظهر على النموذج From.

وهنا لا بد لنا من شرح معظم الخصائص الموجودة في نافذة Menu Editor. حسب الآتي:

اقتباس

Name : هذا هو اسم القائمة والذي يعتبر المرجع في شيفرة البرنامج. وعلى سبيل المثال، لإنشاء قائمة File نقوم بكتابة اسم القائمة في الخاصية Name بهذا الشكل mnuFile ولإدخال عنصر تحت هذه القائمة ، على سبيل المثال Open فيكون اسم العنصر هذا mnuFileOpen وذلك للتوضيح.

Caption : وهو اسم القائمة كما يظهر للمستخد File.

Index: وهي خاصية الفهرسة تستخدم في حالة عمل مصفوفة من الاوامر تحت بند معين من بنود  القائمة.

Short Cut: مفتاح الاختصار وتستخدم للوصول إلى بند من القائمة بطريقة سريعة.

Helpcotext ID: تستخدم للإشارة إلى رقم العنصر داخل ملف التعليمات حيث يتم عرض التعليمات الخاصة بالعنصر.

Checked: تستخدم لوضع علامة أمام بند القائمة حيث تستخدم للدلالة على أن هذا البند هو النشط.

Enabeld: تستخدم للتحكم في حالة ظهور البند أو العنصر داخل القائمة هل هو متاح أم لا؟ إذا كان غير متاح يكون بلون باهت.

Visible: التحكم في ظهور البند أو عدم ظهوره، داخل القائمة.

Windows List: تستخدم لعرض قائمة بالنوافذ المفتوحة في حالة استخدام تطبيقاتMDI.

مفاتيح الاسهم الافقية: تستخدم في زيادة مستوى القائمة أو تقليله. أتمنى أن تكون واضحة، حيث لا يمكنني تزويدكم بالصور.

مفاتيح الاسهم العامودية: تستخدم في تحريك البند أو عنصر القائمة لأعلى أو لأسفل.

Next: وضع بند جديد في نفس مستوى البند السابق.

Insert: إدخال بند قائمة في مكان معين.

Delete: مسح عنصر من القائمة.

ولوضع فاصل-خط وهمي يفصل بين الاوامر- في القائمة ،نضع أي اسم في الخاصية Name ومن ثم نقوم بوضع الأشارة (-) في الخاصية Caption.

وبعد إنشاء القوائم فإنه بالنقر على عنصر القائمة ، بهذا تقوم بفتح إطار أو نافذة الشيفرة لكتابة الاوامر التي تنفذ عند النقر على هذه العنصر.

ملاحظة : يمكنك إنشاء قائمة من خلال الشيفرة. أي وقت التنفيذ.

إلى هنا أنتهي بهذا الدرس على أن نلتقي بالدروس الأخرى.

...................................................الدرس الثامن...................................................

Dialog Boxes مربعات الحوار:

تستخدم عادة مربعات الحوار لإشعار المستخدم بما هو مطلوب أو ما يجب عمله ، ويمكن تقسيم مربعات الحوار إلى أنواع:

1. مربعات الرسائل Message Boxes.

2. مربعات الحوار الشائعة Common Dialog Boxes.

3. مربعات الحوار الخاصة Custom Dialog Boxes.

أولا: استخدام مربعات الرسائل:

يوفر لنا Visual Basic دالة مهمة هي MsgBox ، وهذه الدالة تعرض لنا رسالة معينة على هيئة نافذة بها زر أو أكثر. لاحظ الصيغة التالية:

MsgBox Message, Type, Title

حيث:

Message: الرسالة المطلوب عرضها.

Type: الرمز Icon المطلوب عرضه في الرسالة. (تحذير ، تنبيه ، استفهام، عملية غير شرعية)

Title: عنوان الرسالة.

MsgBox "Do u want exit",vbokcancel+vbquestion,"Close"

نفذ الكود السابق في الحدث Form_Load. ولاحظ الرسالة.

ثانيا: مربعات الحوار الشائعة:

بشكل افتراضي فإن أداة مربعات الحوار غير موجودة في صندوق الادوات في Visual Basic ، فكيف يتم إظهار هذه الاداة في صندوق الادوات؟

1. من القائمة Project.

2. نختار أمر Component.

3. تظهر قائمة بأسماء مجموعة من الأدوات ، نختار منها Microsoft Common Dialog 6.0 .

4. النقر على الزر Ok

بهذا تكون أقد اضفت أداة مربعات الحوار الشائعة إلى صندوق الادوات.

ولأداة التحكم Common Dialog كما لغيرها من الأدوات خصائص يجب ضبطها، فبعد وضع الأداة Common Dialog Boxes على النموذج نجد أن هناك خاصية جديدة أضيفت إلى نافذة الخصائص وهي الخاصية Custom.

ولضبط خصائص هذه الأداة ننقر بالزر الأيمن للفأرة على الأداة الموجودة على النموذج فتظهر نافذة الخصائص الخاصة بها.

وتستخدم نافذة الخصائص لضبط بعض الخصائص في وقت التصميم ، ويتم ضبط الخصائص بعض الخصائص عن طريق الشيفرة أو وقت التشغيل.

وعلى سبيل المثال، لنفرض أن هناك مربع حوار يقوم بفتح الملفات التي لها الامتداد Mdb، ولتنفيذ ذلك نقوم بضبط الخاصية Filter في نافذة الخصائص Custom إلى *.mdb ، وعند التشغيل نجد أن مربع الحوار OpenFile يعرض فقط الملفات التي لها الامتداد الذي سبق تحديده وبالتالي يكون للمستخدم عدد أقل من الملفات ليختار منها.

وكمثال أخر ، فإذا أردنا مثلا أن نعرض النصوص بالخط Arial فإنه يجب ضبط الخاصية FontName في صفحة Font الموجودة في نافذة الخصائص.

ومن أشهر مربعات الحوار الشائعة، مربع الحوار فتح Open، ومربع الحوار حفظ Save، وهما متماثلان تقريبا.

ولعرض مربع الحوار Open نحتاج إلى كتابة الشيفرة بعد إضافة الأداة Common Dialog إلى النموذج التالية:

CommonDialog1.DialogTitle = "Open File"
 CommonDialog1.FileName = "*.txt" 'Default file name
CommonDialog1.ShowOpen
End Sub

ملاحظة: نقوم بضبط الخاصية Filter للأداة على *.txt.

إلى هنا أكتفي اليوم

وللدرس بقية

نراكم

..........................................................الدرس الثامن.........................................................

تابع>>>>>>>>>>>>>

ولعرض مربع الحوار Save:

فقط قم بتغير السطر التالي في الكود السابق

CommonDialog1.ShowOpen

إلى:

CommonDialog1.ShowٍSave

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته، وبعد

أعتذر عن عدم متابعة الدروس وذلك لأنني سأنقطع فترة عنكم لفترة، ريثما أنتهي من إنجاز مهمة خارجية لدي في العمل، قد تدوم لشهر أو ما يقاربه. لذا أرجو من الاخوة الأعضاء او المشرفين ممن يجدو الوقت أن يتابعوا الدروس عني خلال هذه الفترة بمعدل درس أو درسين كل يوم، وحيث سأعطيكم التكملة سيكون موضوع الدروس القادمة بإذن الله هي عبارة عن مقدمة للمتغيرات والثوابت وأنواع البيانات Introduction to Variables, Constants and Data Types ، وستأخذ الخطوط أو العناوين التالية:

Variables المتغيرات

Understanding the Scope of Variables مدى المتغيرات

Constants الثوابت

Data Types أنواع البيانات

Arrays المصفوفات

Dynamic Arrays

ولكم مني جزيل الشكر ، وفقنا الله وإياكم لمن يحبه ويرضاه

السلام عليكم

أخي الكريم يسعدني أن أكمل الدروس

و سأبدأ من اليوم بإذن الله في تحضير درس المتغيرات

السلام عليكم

المتغيرات

======

يمكن إعتبار المتغيرات كوعاء يتم حفظ البيانات به. و عند التصريح عن متغير يتم حجز مساحه من الذاكره لهذا المتغير.و هذه المساحه تعتمد على نوع المتغيير بالطبع.

تخيل مثلا أن المتغيير كالكوب. إذا ملأته حتى أخره إمتلأ و لكن إذا أضفت عليه ماء بعد الإمتلاء ماذا سيحدث؟؟؟؟....كذلك نفس الشيء مع المتغييرات يجب تحديد نوع متغيير مناسب في برامجنا.و لو رجعنا لمثال الكوب لو إستخدمنا كوب بلاستيك ووضعنا به شاي ساخن ممكن الكوب ينصهر أما لو وضعنا به ice tea فستتحمله الكوب.

كانت هذه مقدمه نظريه ممله و مهمه للمتغيرات.

أنواع المتغيرات الاساسيه في فيجوال بيسيك

المتغيرات العدديه

Integer

long

double

Currency

متغيرات أخرى

String

Date

Byte

Variant

و سأقوم إن شاء الله بتفصيل الانواع كلها

شكرا لك عزيز ، لكن أرجو منك أن تقوم بوضع رقم الدرس كما في الدروس السابقة ..........الدرس الثامن................. وهكذا

شكرا لك Khabini مرة أخرى

إن شاء الله المره القادمه مش حنسى رقم الدرس

للاسف لم أجد تجاوب من الاعضاء يبدوا أنني ليس جيد بالشرح

جزاء الله كل خير يا اخى

انا مش عارف كنت من غيرك

ومرة تانية الف الف شكر

السلام عليكم

مشكور اخي على الدروس الرائعة

وأرجو منك اكمال الدروس بأقصى سرعة

ويعطيك الف عافية

تحياتي

*************************الدرس العاشر**********************

مدى المتغيرات the Scope of Variables

مدى المتغير هي المنطقه المسموح فيها بإستخدام متغيير.كلام مبهم .!!!!!!!!

عند تعريف متغير في حدث أو إجراء يمكننا إستخدام هذا المتغيير من أي مكان داخل الإجراء. تمام كده؟؟

و لكن لو إستخدمناه من إجراء أخر فماذا سيحدث؟؟. لن يتم إستخدام قيمة المتغيير السابق لان مداه أنتهى. و لو أنك إخترت من خيارات فيجوال بيسيك أن يجبرك على التعرييف. سوف يظهر لك خطأ عند طلب الإستخدام من إجراء أخر. ده أيه الصداع ده كله.....؟؟ طيب نشوف توضيح بالكود

Sub Declare
dim var1 as integer
for Var1=1 to 1000
print "لاإله إلا الله"
next var1
End Sub

Sub TryToUse
print Var1 'النتيجه صفر أو خطأ لو كنت مشغل الإجبار على التعرييف
End Sub

و لكن يمكننا تعرييف المتغير في بداية الفورم و هي تسمى بDeclaration Areaو هي المنطقه ليست داخل إجراءات و في هذه الحاله يمكن التعريف بطرق مختلفه مثل Private و public

فلو قمنا بالتعرييف كPrivate مسموح بإستخدام هذا المتغيير من داخل هذه الفورم أو الموديول فقط. أما Public فتسمح بإستخدام المتغيير من أي فورم. و لكن ينصح عند إستخدام متغيرات Public تعرييفها في Module و ليس مع الفورم.

يتبقى أخر نوع من المدى و هو مدى المتغيرات في البلوكات. يعني مثل الحلقات و الجمل الشرطيه. لو أن المتغير معرف داخل البلوك يكون مداه في البلوك فقط و لا يمكن إستخدامه من خارج البلوك.

Sub DeclareBlocks
Dim I as integer
for I = 1 to 100
    Dim x as string
    x="سبحان الله"
    Print x    
    print I
Next I
print x 'للاسف تم مسح قيمة المتغيير x لأنه خارج مداه
End Sub

السلام عليكم

تشكر اخينا العزيز khabini.com

جعله الله في ميزان حسناتك

وبالتوفيق

العفو يا أخي

لكن أريد من الأعضاء التجاوب بالأسأله حتى أشعر أنهم بيقروا

السلام عليكم

اخينا العزيز khabini.com :)

لدي اقتراح لك

قد بدء الاخ عبد الرحيم جزاه الله خيرا

بعض الدروس المتعلقة بقواعد البيانات في قسم الاكسس

و كان في نيته ان ينقلها الي قسم الفجول بيسك ,

و اكيد قواعد البيانات لها رواجها و شعبيتها اكبر من غيرها

فاتمني ان تواصل ما انقطع من حديث في قواعد البيانات

بشي من التجديد .

اتمني ان تنظر في الامــر

وفقك الله

والله يااخ دروسك في غاية الروعة والجمال

وإن شاء الله الله يوفقك في المزيد والمزيد

وشكرا مرة اخري