Visual Basic Online Course - Enum
بسم الله الرحمن الرحيم
و Enum هى اختصار لـ Enumeration أو اللوائح أو القوائم و يتم كتابة كود الـ Enum فى موديول Module أو General Declaration كالتالى :
Enum MyEnum
-
-
-
-
End Enum
أو
Public Enum MyEnum
-
-
-
End Enum
باستخدام Access Modifiers أو بدون .
- يقدم الفيجوال بيزك 6 قوائم جاهزة مثل vbDayOfWeek و يمثل أسماء أيام الأسبوع و يمكنك تجربة ذلك فى مشروع جديد فى الفورم Form_Load اكتب vbDayOfWeek ثم (.) ستجد قائمة بها اسماء أيام الأسبوع .
- اذا يستخدم الـ Enum فى عمل قائمة عرض بثوابت أسميه و ثوابت اسميه مثل أسماء أيام الأسبوع و نوعها String و يمكنك عمل Enum لثوابت Long و Integer و أى نوع من أنواع البيانات DataType .
- و فى الـ Enum يتم ترتيب الثوابت بحسب ترتيب كتابتها فى الكود حيث اذا اردت عرض أسماء ايام الأسبوع بالترتيب فى برنامجك فيجب عليك عمل كود الـ Enum بالترتيب الذى تود العرض به .... كالتالى :
- يعامل الفيجوال بيزك جميع عناصر الـ Enum على أنها Long Integer و اذا قمت بتخصيص علامع عشريه لثابت من ثوابت الـ Enum فان الفيجوال بيزك يقوم بتقريبها الى أقرب رقم صحيح .
- و لتفادى رسالة الخطأ Reference Ambiguous Name يمكنك كتابة رقم الثابت الاسمى Constant كما فى المثال السابق .
- ثم يمكنك تخزين قيمة الثوابت فى متغيرات لاستخدامها فى البرنامج كالتالى :
مصادر :
1) MSDN - Enum
مصادر :
1) MSDN - Enum
مع تحياتى Evry1falls
♥ Visual Basic 6.0 Course Online :
- Automate MS-Access Database in Visual Basic 6.0 though a network
- Visual Basic 6.0 Analog Clock
- Visual Basic 6.0 Temperature Convertor
- Visual Basic 6.0, MS-Access 2003 and Crystal Reports - Phone book
- Visual Basic 6.0, MS-Access 2003 Database and DataGridView
- Visual Basic 6.0 FTP full application source code
- Visual Basic 6.0 Color Picker tool source code
- Visual Basic 6.0 TreeView Control lesson (Part1 - Part 2 - Part3 - Part4 - Part5) Arabic.
- Visual Basic 6.0 - Introduction to Graphics (Part1 - Part2 - Part3)
- Visual Basic 6.0 and MS-Excel 2003 tutorials (Part1 - Part2 - Part3 - Part4 - Part5 - Part6)
