سؤالا جديدا يعترض طريق طلابنا الاعزاء طلاب الصف الاول الثانوي من الوحدة السادسة: “البرمجة بلغة (فيجول بيسك ستوديو)” من كتاب الحاسب الالي للصف الأول الثانوي الفصل الدراسي الثاني حيث يقول:

اكتب برنامجاً باستخدام (فيجول بيسك) لإدخال وقت بصيغة (24) وتحويلها الى صيغة (12) ساعة وإلحاقها بعبارة “صباحاً” أو “مساء”، وذلك عن طريق:

-تصميم نموذج واجهة البرنامج.

-تحديد الخصائص لكل أداة وضعتها على النموذج.

-كتابة أوامر البرنامج.

-تنفيذ البرنامج.

وبعد بذل جهود كبيرة نتشرف نحن فريق عمل موقع المكتبة التعليمية بتقديم الاجابة النموذجية لهذا السؤال متمثلة في التالي:

اكتب برنامجاً باستخدام (فيجول بيسك) لإدخال وقت بصيغة (24) وتحويلها

اسم الأداة الخاصية القيمة
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

التنفيذ: