الدرس8 +الدرس 9: المتحولات وأنواع المعطيات في Visual Basic (على جزئين)

[_TheDevil_99]

عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

الدرس 8: المتحولات وأنواع المعطيات في Visual Basic ( القسم 1)

يوجد عدة أنواع للمتحولات في Visual Basic
وذلك اعتماداً على مجال رؤية المتحول وعمره.

عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]


عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]


الدرس 9: المتحولات وأنواع المعطيات في Visual Basic ( الجزء 2)

-المتحولات الخاصة:
ويصرح عنها ضمن الإجرائية (الحدث)، وعمر هذه المتحولات يساوي فترة استدعاء الإجرائية، أما مجال رؤيتها فهو داخل الإجرائية فقط، ويتم التصريح عن المتحولات بالشكل
Dimاسم متحول As نوع معطيات

أنواع المعطيات المتوفرة في VB5 :
إليك الجدول التالي الذي يبين أنواع المعطيات المتوفرة في Visual Basic:

عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

مثال1:
1- ابدأ بمشروع جديد.
2- ضع زر أوامر.
3- في الحدث Command1_Click اكتب الشفرة:
Dim x AS Integer
Dim y AS Integer
Dim z AS Integer
x = 3
y = 5
z = x + y
Print z
يقوم هذا البرنامج بالتصريح عن ثلاث متحولات خاصة في الحدث Click التابع لزر الأوامر، ومن ثم يقوم بعملية جمع عددين وإظهار النتيجة.

مثال 2:
1- استبدل الشفرة السابقة بما يلي:
Dim x AS Integer
x = x + 1
Print x

2- نفذ هذا البرنامج، واضغط على الزر عدة مرات ستجد أنه في كل مرة سيُطبع العدد واحد على الشاشة رغم أننا نزيد قيمة x، وذلك لأن x متحول خاص ينتهي عمره بمجرد انتهاء الضغط، ويتولد من جديد عند بداية الضغط.
3- ضع زر أوامر ثاني Command2 واكتب في الحدث Click :
Print x

2- المتحولات العامة على مستوى النافذة:
يتم التصريح عن هذه المتحولات في القسم General-Declarations على الشكل:
1- نظهر نافذة الشيفرة بأي طريقة كانت .
2- من القائمة اليسرى نختار القسم General.
3- من القائمة اليمنى نختار القسم Declarations .
وفي هذا القسم يتم التصريح عن المتحولات العامة على مستوى النافذة أي المتحولات التي ستُرى من قبل جميع الأدوات والإجراءات والدوال الموجودة على هذه النافذة ، وستحافظ هذه المتحولات على قيمتها ابتداء من لحظة تحميل النافذة إلى الذاكرة ولغاية إزالتها من الذاكرة .

عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]
مثال:
1- إدخل إلى قسم التصريحات العامة General-Declarations وصرح عن متحول من نوع عدد كسري:
Dim x AS Integer
المتحول x سيكون معروف لدى جميع الأدوات الموجودة على النافذة .
2- ضع زر أوامر Command1 واكتب في الحدث Command1_Click :
x = x + 1
Print x
3- ضع زر أوامر Command2 واكتب في الحدث Command2_Click :
Print x
4- نفذ البرنامج ثم اضغط على الزر الأول، ستجد أنه كلما ضغطت على الزر ستزداد قيمة x بمقدار واحد وستُطبع القيمة الجديدة، اضغط على الزر الثاني ستجد أنه سيطبع قيمة x، أي أنه يعرف المتحول x.

ملاحظة:
بالنسبة للمتحولات العامة على مستوى المشروع، والمتحولات الساكنة فسنأتي على شرحهما لاحقاً.

[CHeeToS]

تسلم ايدك