سؤالا جديدا يعترض طريق طلابنا الاعزاء طلاب الصف الاول الثانوي من الوحدة السادسة: “البرمجة بلغة (فيجول بيسك ستوديو)” من كتاب الحاسب الالي للصف الأول الثانوي الفصل الدراسي الثاني حيث يقول:
اكتب برنامجاً باستخدام (فيجول بيسك) لإدخال وقت بصيغة (24) وتحويلها الى صيغة (12) ساعة وإلحاقها بعبارة “صباحاً” أو “مساء”، وذلك عن طريق:
-تصميم نموذج واجهة البرنامج.
-تحديد الخصائص لكل أداة وضعتها على النموذج.
-كتابة أوامر البرنامج.
-تنفيذ البرنامج.
وبعد بذل جهود كبيرة نتشرف نحن فريق عمل موقع المكتبة التعليمية بتقديم الاجابة النموذجية لهذا السؤال متمثلة في التالي:
اسم الأداة | الخاصية | القيمة |
Button1 | Text | اضغط لإدخال الاعداد |
Label1 | Text | “فارغ” |
أوامر البرنامج
Dim a As Long
a = TextBox1.Text
If a <12 Then
Label1.Text = a.tostring + “:00صباحا”
Else
a = a – 12
Label1.Text = a.tostring + “: مساء”
EndIf
التنفيذ: