כיצד להשתמש ב- Visual Basic כדי ליצור מבחן בחירה מרובה

תוֹכֶן

• הוראות

במבחן מרובה, כל שאלה מורכבת מן השאלה עצמה ותשובות שונות, שרק אחת מהן נכונה. ניתן ליצור מבחן בחירה מרובה ב- Visual Basic באמצעות תוויות כדי להציג את השאלות ולחצני האפשרויות עבור תשובות אפשריות, וכן פקדי לחצנים כדי לנווט בין הבעיות השונות. בקוד, השתמש במערכים כדי לשמור את השאלות והתשובות שנשלחו על ידי המשתמש ולשמור על משתנה נגד כך שתדע את השאלה שהמשתמש נמצא בה. בסוף הבדיקה, סמן את תגובות המשתמש והצג את התוצאה בטופס.

הוראות

השתמש ב- Visual Basic כדי ליצור משלך Q & A להראות (אוקי, לא אישור תמונה על ידי ipal מ Fotolia.com)

1. פתח פרוייקט Visual Basic חדש. הוסף שתי תוויות, שלושה לחצני בחירה ושני לחצני לחצן לטופס. גרור את שתי התוויות לחלק העליון, עם Label1 מעל Label2. גרור את RadioButton1, את RadioButton2 ואת RadioButton3 ויישר אותם אנכית מתחת לתוויות. גרור את שני הלחצנים מתחת ללחצני "רדיו" עם Button1 בצד שמאל וב Button2 בצד ימין.

2. הקש F7 כדי לפתוח את חלון הקוד. הזן את הקוד הבא ברמת הכיתה:

   עמום שאלות (2, 4) כמו תגובות עמום מחרוזת (2) כמו מחרוזת עמום NumPerg כמו מספר שלם

   השורה הראשונה יוצרת מערך דו מימדי. הממד הראשון משמש לכל שאלה והשני הוא לשאלה עצמה, שלוש אפשרויות של תשובה והתשובה הנכונה. השורה השנייה יוצרת מערך לאחסון תגובות משתמשים. השלישית יוצרת משתנה ספירה שמקנה את השאלה מה המשתמש נמצא.

   
   

3. הזן את הקוד הבא:

   (=) "5", "6", "7", "7" ("ג'וני דפ", "ג'ון מלקוביץ '", "ג'ון קוזאק", "ג'וני דפ" "מה היא בירת פלורידה?", "מיאמי", "טלהאסי", "ג'קסונוויל", "טלהאסי"} אנד סאב

   זה שגרת פשוט מוסיף את שלוש שאלות ותשובות במערך השאלה. תוכל להזין עוד שאלות או אפילו לייבא אותן מקובץ טקסט, אך הקפד לשנות את גודל השאלות ולענות על מערכים כדי להתאים את מספר השאלות.

4. הזן את הקוד הבא:

   (= 4) אם כן (= i = 4) = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = == = Label2.Text = "אתה מכה" & "& תשובות.Length & &" רשת & שאלות "! RadioButton1.Enabled = False RadioButton2.Enabled = False RadioButton3.Enabled = False Button1.Enabled = False Button2.Enabled = False End Sub

   השורה הראשונה מכריזה על השגרה המעריכה את הבדיקה. זה יוצר משתנה מקומי כדי לשמור על הציון ולאחר מכן סורק את השאלות במערך שלה ואת התגובות שנשלחו על ידי המשתמש. עבור כל תשובה הוא מעניק, הציון עולה על ידי 1. לבסוף, זה מראה את סימני הפיסוק ואת משבית את שאר הפקדים.

   
   

5. פתח את השגרה Form1_Load () והקלד את הקוד הבא:

   Me.Text = "מבחן הבחירה המרובה שלי!" (0, 0) Button1.Text = "קודם" Button2.Text = "הבא" RadioButton1.Text = שאלות (0, 1) RadioButton2.Text = שאלות (0, 2) RadioButton3.Text = שאלות (0, 3)

   השורה הראשונה קובעת את הטקסט בשורת הכותרת. הבא קורא את השגרה לקבל שאלות (). השלישי מאתחל את מונה השאלות. המופע הרביעי שבו השאלה המשתמש. החמישי מציג את השאלה הראשונה על התווית. השישית והשביעית לשנות את הטקסט עבור שני הכפתורים. שלושת השורות האחרונות נכנסות לשלוש האפשרויות כטקסט עבור שלושת לחצני הבחירה.

6. פתח את השגרת Button1_Click () והקלד את הקוד הבא

   אם numPerg> 1 אז numPerg - = 1 Label1.Text = "שאלה" & quesNum & "3" Label2.Text = שאלות (numPerg - 1, 0) RadioButton1.Text = שאלות (numPerg - 1, 1) RadioButton2.Text שאלות (numPerg - 1, 2) RadioButton3.Text = שאלות (numPerg - 1, 3) אם Button2.Text = "שלח" ואז Button2.Text = "הבא" אם סוף אם

   זהו הקוד עבור הלחצן "הקודם". זה הראשון בודק אם המשתמש לחץ על הכפתור במהלך השאלה הראשונה. אם לא, הוא מחסר את השאלה שאלה מ 1 ומשנה את הטקסט של תוויות וכפתורי רדיו כדי להציג את השאלה הקודמת. אם המשתמש היה בשאלה הסופית, הטקסט ב Button2 משתנה מ "שלח" ל "הבא".

7. פתח את השגרת Button2_Click () והקלד את הקוד הבא:

   אם RadioButton1.Checked = True לאחר מכן תגובות (numPerg - 1) = RadioButton1.Text ElseI אם RadioButton2.Checked = True אז תגובות (numPerg - 1) = RadioButton2.Text ElseIf RadioButton3.Checked = True אז תגובות (numPerg - 1) = RadioButton3. (אם כן) numPerg + = 1 Label1.Text = "Question" & quesNum & of of & Answers.Length Label2.Text = שאלות (numPerg - 1, 0) RadioButton1.Text = (numPerg - 1, 3) אם יש numPerg = 3 ולאחר מכן Button2.Text = "שלח" סוף אם אחרים להעריך סיום אם

   זהו הקוד עבור הלחצן "הבא". שבע השורות הראשונות לבדוק איזה כפתור רדיו המשתמש בחר ולשמור את התשובה במערך התגובה. השורה הבאה משנה את המיקוד של הבחירה ל- RadioButton1. השורה הבאה בודקת אם המשתמש אינו נמצא בשאלה האחרונה. אם זה לא, השגרה מגדילה את הערך של משתנה הדלפק לאחת ומאכלסת את תוויות הרדיו ואת הלחצנים עם המידע בשאלה הבאה. אם כן, הוא משנה את הטקסט מהלחצן "הבא" ל"שלח ". אם המשתמש כבר נמצא בשאלה האחרונה ולחץ על "שלח", התוכנית קוראת לשגרת הערכה הערכה כדי לקבל את הציון.

8. שמור את התוכנית VisualBasic. הקש על F5 כדי להפעיל אותו.