כיצד ליצור סרגל לטעון חזותית מושך ב- Visual Basic

תוֹכֶן

• הוראות
• הוסף פקדים לטופס
• הוסף לוגיקת תכנות
• איך

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

הוראות

סרגלי התקדמות צבעוניים יכולים להרשים את משתמשי האפליקציה שלך (Polka Dot Images / פולקה דוט / Getty תמונות)

הוסף פקדים לטופס

1. פתח את Visual Studio וטען את אחד הפרויקטים של Visual Basic .NET. פתח את "Explorer Explorer" עם רשימת קבצי הפרויקט אם זה לא כבר פתוח.

2. אתר ב- "Explorer Explorer" את הסמל של טופס ההתחלה של הפרויקט ולחץ עליו פעמיים. Visual Studio יפתח את חלון העיצוב ויציג את הטופס.

3. פתח את ארגז הכלים וגרור בו פקודת "GroupBox" כדי להוסיף אותו. חזור אל ארגז הכלים והוסף בקרת "ProgressBar" באותו אופן.

4. גרור שליטה "תווית" על גבי הטופס. לחץ עליו וגרור אותו מעל שורת ההתקדמות שנוספה. הניחו את התווית ואת העמודה מיושרים עם הקצה השמאלי.

5. חזור אל ארגז הכלים וגרור את בקרת הזמן באמצעות אותה טכניקה. סגור את ארגז הכלים.

   
   

הוסף לוגיקת תכנות

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

2. לחץ פעמיים על האירוע "Tick". Visual Studio תפתח את חלון הקוד ותראה את תת "Timer1_Tick", אשר יפעל עם סמן שעון.

3. הדבק את הקוד הבא בגוף של תת:

   loadingBarValue + תוספת

   אם טועןבארוול 100> לאחר מכן loadingBarValue = 100 Timer1.Stop () GroupBox1.Visible = False End אם

   ProgressBar1.Value = loadingBarValue

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

   
   

4. לחץ על "F7" כדי לחזור לתצוגת התבנית ולחץ לחיצה כפולה על פס הכותרת של הטופס. Visual Studio יפתח שוב את חלון הקוד ויציג את תת "Load" של הטופס. הדבק את הקוד הבא בתת-קבוצה זו:

   loadingBarValue = 0 Timer1.Interval = 200 תוספת = 1

   GroupBox1.Text = "" Label1.Text = "טוען" Label1.BackColor = Color.Transparent Label1.ForeColor = Color.Green

   Timer1.Start ()

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

5. עבור לחלק העליון של חלון הקוד ולאתר את הצהרת "מחלקה". הדבק את שני המשפטים שמתחתיו:

   עומס עומסמספר עומס מוגדל

   זה יגדיר את המשתנים "loadingBarValue" ו "תוספת", שתוארו לעיל.

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

איך

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