הוסטס - פורום אחסון האתרים הגדול בישראל

הוסטס - פורום אחסון האתרים הגדול בישראל (https://hosts.co.il/forums/index.php)
-   פורום תיכנות (https://hosts.co.il/forums/forumdisplay.php?f=14)
-   -   שאלה לגבי VB (https://hosts.co.il/forums/showthread.php?t=81726)

Jacks 20-03-10 13:22

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

If TextBox1.Text = "blabla" Then
            MessageBox.Show("אסור להקליד")

איך אני מוסיף עוד מילים שאסור ?

תודה.

Michael Lifshitz 20-03-10 13:33

לא הנבתי אתה רוצה באשכול הודעה או משהוא שאסור לכיתוב וזה יזצנזר?
או לעשות הודעה קופצת אם המילים האסורות.
אם אתה רוצה אשכול או לא משנה מה שבמערכת יהיה חסום זה מובנה כבר.

Jacks 20-03-10 13:50

לא אני רוצה שהודעה תקפוץ...כרגע הקוד אומר אם רושמים ב-textbox BLABLA אז תקפוץ הודעה של "אסור להקליד"
כל מה שאני רוצה זה להוסיף עוד מילים חוץ מ-BLABLA...
למה אתה התכוונת יצונזר ?

MaorGetter 20-03-10 14:00

יש מובנה במערכת, שכשאר אתה מגדיר שאם כותבים
בלה בלה בלה
אז זה עושה
*** *** ***

Michael Lifshitz 20-03-10 14:18

מוזנר זאת אומרת כמו שמאור אמר.
יש לך אפשריות במערכת שאתה כותב מילים בן זונה וכו'... סורי אל המילה.
או בלה בלה בלה פשוט זה מזנזר לך לבד.
שהוא כותה אשכול או כותרת או כול דבר דומה זה חוסם כולל הודעות פרטיות.

Shay Ben Moshe 20-03-10 15:04

אני חושב שהוא התכוון לשפת התכנות Visual Basic ולא למערכת הפורומים.....
בכל אופן, תעשה פשוט Or:
קוד:

If TextBox1.Text = "blabla" Or TextBox1.Text = "blabla2" Or TextBox1.Text = "blabla3" Then

Jacks 20-03-10 16:17

ציטוט:

נכתב במקור על ידי Shay Falador (פרסם 758814)
אני חושב שהוא התכוון לשפת התכנות Visual Basic ולא למערכת הפורומים.....
בכל אופן, תעשה פשוט Or:
קוד:

If TextBox1.Text = "blabla" Or TextBox1.Text = "blabla2" Or TextBox1.Text = "blabla3" Then

נכון מאוד אני מתכוון לשפת התיכנות,
תודה רבה על העזרה, בידיוק לזה התכוונתי


כל הזמנים הם GMT +2. הזמן כעת הוא 14:53.

מופעל באמצעות VBulletin גרסה 3.8.6
כל הזכויות שמורות ©
כל הזכויות שמורות לסולל יבוא ורשתות (1997) בע"מ