يعلمك هذا المقال كيفية استخدام Visual Basic 6.0 من Microsoft لإنشاء آلة حاسبة بسيطة يمكنها الجمع والطرح والضرب والقسمة. ضع في اعتبارك أن Visual Basic 6.0 لم يعد مستخدماً بواسطة أجهزة الكمبيوتر الحديثة ، لذلك ستحتاج إلى تثبيته وتشغيله على جهاز الكمبيوتر الخاص بك حتى تتمكن من استخدامه.
خطوات
جزء 1 من 5: إنشاء مشروع جديد
الخطوة 1. قم بإنشاء مجلد جديد للآلة الحاسبة الخاصة بك
لإيواء جميع الملفات الضرورية للآلة الحاسبة ، قم بما يلي:
- انتقل إلى المكان الذي تريد حفظ آلة حاسبة VB6 فيه.
- انقر بزر الماوس الأيمن فوق مساحة فارغة.
- يختار جديد في القائمة المنسدلة.
- انقر مجلد.
- اكتب الآلة الحاسبة واضغط على زر الإدخال Enter.
الخطوة 2. افتح Visual Basic 6
سيؤدي هذا إلى إظهار صفحة اختيار المشروع.
الخطوة 3. انقر فوق Standard EXE
إنه في مجال اختيار المشروع.
الخطوة 4. انقر فوق فتح
ستجده أسفل يمين النافذة. يؤدي القيام بذلك إلى إنشاء مشروع جديد.
جزء 2 من 5: إنشاء حقول إدخال الآلة الحاسبة
الخطوة 1. افتح أداة "Text Box"
انقر على أب على الجانب الأيسر من النافذة.
الخطوة 2. إنشاء مربع نص
انقر واسحب الماوس لأسفل ولليمين لرسم مخطط تفصيلي لمربع النص ، ثم حرر زر الماوس عندما يكون مربع النص بالحجم المناسب.
من الناحية المثالية ، سيكون مربع النص أطول بكثير من طوله
الخطوة 3. انسخ مربع النص
انقر مرة واحدة على مربع النص لتحديده ، ثم اضغط على Ctrl + C لنسخه.
الخطوة 4. الصق في مربع النص مرتين
اضغط على Ctrl + V مرتين للقيام بذلك. يجب أن ترى مربعات النص الملصقة تظهر في الجانب الأيمن العلوي من الصفحة.
إذا طُلب منك إنشاء صفيف تحكم جديد بعد اللصق في مربع نص ، فانقر فوق لا.
الخطوة 5. ترتيب مربعات النص في مكدس
انقر واسحب مربع النص في الجانب العلوي الأيسر من الصفحة لأسفل إلى الفتحة السفلية ، ثم انقل مربع النص الثاني من الجانب العلوي الأيسر من الصفحة إلى الفتحة الوسطى. يجب أن يكون لديك الآن كومة من ثلاثة مربعات نصية.
الترتيب الذي تفعل به هذا مهم ؛ إذا قمت بوضع مربع النص الذي لصقته ثانيًا في المنتصف ، فسيؤدي ذلك إلى تعطل الترميز لاحقًا
الخطوة 6. قم بإزالة النص الافتراضي لمربعات النص
لنفعل ذلك:
- انقر فوق مربع نص.
- انقر فوق حقل النص الموجود على يمين عنوان "النص" في جزء "الخصائص" على الجانب الأيمن من النافذة.
- اضغط على حذف.
- كرر مع مربعي النص الآخرين.
الخطوة 7. إنشاء ثلاثة مربعات التسمية
انقر على أ زر في شريط الأدوات الأيسر ، ثم قم بما يلي:
- قم بتغيير حجم مربع الملصق إلى الحجم المفضل لديك.
- حدد مربع التسمية ، ثم انسخه.
- لصق مرتين مربع التسمية.
الخطوة 8. ضع مربعات التسمية على يسار مربعات النص
انقر واسحب كل مربع تسمية للجلوس على يسار كل مربع نص.
الخطوة 9. قم بتحرير التسمية التوضيحية لمربع التسمية العلوي
لنفعل ذلك:
- انقر فوق مربع التسمية العلوي.
- انقر فوق مربع النص الموجود على يمين عنوان "التسمية التوضيحية" في جزء "الخصائص" على الجانب الأيمن من النافذة.
- اكتب رقم 1.
الخطوة العاشرة. قم بتحرير التسميتين التوضيحية الأخرى لمربعات التسمية
ستصنفهم على هذا النحو:
- انقر فوق مربع التسمية الأوسط ، ثم قم بتغيير التسمية التوضيحية الخاصة به إلى رقم 2.
- انقر فوق مربع التسمية السفلي ، ثم قم بتغيير التسمية التوضيحية الخاصة به إلى النتيجة.
الخطوة 11. اجعل مربعات الملصقات شفافة
هذا ليس ضروريًا ، ولكنه سيجعل الآلة الحاسبة أكثر جاذبية من الناحية المرئية:
- حدد مربع التسمية.
- انقر فوق المربع المنسدل "BackStyle" في جزء "الخصائص".
- انقر شفاف في القائمة المنسدلة.
الخطوة 12. ضع عنوانًا للآلة الحاسبة
لتغيير النص الذي يظهر أعلى نافذة الآلة الحاسبة عند تشغيلها ، قم بما يلي:
- انقر فوق مساحة فارغة في النموذج.
- انقر فوق مربع نص العنوان "تسمية توضيحية" في جزء "خصائص".
- اكتب الآلة الحاسبة البسيطة (أو أي شيء تريد تسمية الآلة الحاسبة).
جزء 3 من 5: إنشاء أزرار الحاسبة
الخطوة 1. انقر فوق رمز أداة "Button"
تكون أيقونة المربع الرمادي أسفل ملف أب الخيار في شريط الأدوات الأيسر.
الخطوة 2. إنشاء زر مربع
انقر واسحب في اتجاه قطري حتى ترى مخططًا مربعًا صغيرًا يظهر ، ثم حرر زر الماوس. يجب أن ترى زرًا رماديًا معروضًا في النموذج.
الخطوة 3. انسخ الزر
حدد الزر الذي أنشأته للتو ، ثم اضغط على Ctrl + C.
الخطوة 4. الصق الزر ثلاث مرات
اضغط على Ctrl + V ثلاث مرات للقيام بذلك. سيؤدي ذلك إلى إنشاء ما مجموعه أربعة أزرار في مشروعك.
قد تضطر إلى النقر فوق لا عند المطالبة في كل مرة بعد الضغط على Ctrl + V.
الخطوة 5. رتب الأزرار أسفل حقول إدخال الآلة الحاسبة
انقر واسحب كل زر بحيث يكون لديك صف منها أسفل مربع النص "النتيجة".
الخطوة 6. قم بتحرير تسميات الأزرار
يمكنك القيام بذلك عن طريق تغيير النص الخاص بعنوان "التسمية التوضيحية" لكل زر في جزء "الخصائص" على الجانب الأيمن من النافذة:
- انقر فوق الزر الموجود في أقصى اليسار ، ثم قم بتغيير نص "التسمية التوضيحية" إلى +.
- انقر فوق الزر التالي على اليمين ، ثم قم بتغيير نص "التسمية التوضيحية" إلى -.
- انقر فوق الزر التالي على اليمين ، ثم قم بتغيير نص "التسمية التوضيحية" إلى x (أو *).
- انقر فوق الزر الموجود في أقصى اليمين ، ثم قم بتغيير نص "التسمية التوضيحية" إلى /.
جزء 4 من 5: إضافة رمز الآلة الحاسبة
الخطوة 1. انقر نقرًا مزدوجًا فوق الزر +
يؤدي القيام بذلك إلى فتح وحدة تحكم التعليمات البرمجية.
الخطوة 2. أدخل رمز الإضافة
اكتب الكود التالي في وحدة التحكم ، أسفل نص "Private Sub" مباشرةً وفوق نص "End Sub" مباشرةً.
Text3. Text = val (Text1) + val (Text2)
الخطوة 3. العودة إلى نموذج الآلة الحاسبة
انقر نقرًا مزدوجًا فوق ملف Form1 الخيار تحت عنوان "مشروع 1" على الجانب الأيمن من الصفحة للقيام بذلك.
الخطوة 4. انقر نقرًا مزدوجًا فوق الزر -
سيؤدي هذا إلى إعادة فتح وحدة التحكم.
الخطوة 5. أدخل رمز الطرح
اكتب ما يلي في وحدة التحكم:
Text3. Text = val (Text1) -val (Text2)
الخطوة 6. انقر نقرًا مزدوجًا فوق x أو * زر.
سيؤدي هذا إلى إعادة فتح وحدة التحكم.
الخطوة 7. أدخل رمز الضرب
اكتب ما يلي في وحدة التحكم:
Text3. Text = val (Text1) * val (Text2)
الخطوة 8. انقر نقرًا مزدوجًا فوق الزر /
سيؤدي هذا إلى إعادة فتح وحدة التحكم.
الخطوة 9. أدخل رمز التقسيم
اكتب ما يلي في وحدة التحكم:
Text3. Text = val (Text1) / val (Text2)
جزء 5 من 5: حفظ الآلة الحاسبة
الخطوة 1. احفظ مشروعك
قم بما يلي:
- اضغط على Ctrl + S.
- حدد مجلد "الآلة الحاسبة" كموقع الحفظ.
- انقر يحفظ.
الخطوة 2. انقر فوق ملف
إنه في الجانب الأيسر العلوي من النافذة. سوف تظهر القائمة المنسدلة.
الخطوة الثالثة. انقر فوق Make [name] exe…
هذا الخيار موجود في القائمة المنسدلة. يؤدي القيام بذلك إلى إعادة فتح نافذة "حفظ باسم".
الخطوة 4. أدخل اسم الملف
اكتب "آلة حاسبة" أو شيئًا مشابهًا في مربع النص "اسم الملف".
الخطوة 5. حدد مجلد "الآلة الحاسبة"
اذهب إلى المجلد الذي حفظت فيه مجلد "الآلة الحاسبة" ، ثم انقر على مجلد "الآلة الحاسبة" لتحديده.
الخطوة 6. انقر فوق "موافق"
يوجد هذا الزر أسفل الجهة اليمنى من النافذة. سيؤدي هذا إلى حفظ الآلة الحاسبة كملف قابل للتنفيذ (EXE) في مجلد "الآلة الحاسبة".
الخطوة 7. قم بإنشاء اختصار لملف EXE الخاص بالآلة الحاسبة
يمكنك إنشاء اختصار على سطح المكتب لملف EXE الخاص بالآلة الحاسبة عن طريق القيام بما يلي:
- افتح مجلد "الآلة الحاسبة".
- انقر بزر الماوس الأيمن فوق ملف EXE.
- يختار ارسل إلى في القائمة المنسدلة.
- انقر سطح المكتب (إنشاء اختصار).