קוד:

dim flag(0 to 15) as integer

for i=0 to 15 
	 flag(i)=0
next

i=0

While Not i = 16
	Randomize
	node = Int((16 - 0) * Rnd + 0)
	If flag(node) = 0 Then
		i = i + 1
		flag(node) = 1 
	End If
Wend

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

הבעיה שלי שאני לא מצליח להכניס למערך את הערך הרצוי

בס"ד

למה להרוג אותנו עם שאלות כאלה קשות?

החלטתי לעשות לך הגהה על הקודים שלך וזה התוצאה

ציטוט:

dim flag(0 to 15) as integer

מספיק אם תעשה
dim flag(15) as integer

ציטוט:

While Not i = 16 Randomize

אפשר להכניס את הגרעין לאדמה פעם אחת (כאשר התוכנה מופעלת)

ציטוט:

node = Int((16 - 0) * Rnd + 0)

את כל האפסים פה אתה יכול להוריד וגם להשתמש בפונקציה CInt ולא Int ולבסוף לעשות כך

קוד:

    
node=CInt(15*Rnd)

    

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

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

קוד:

dim ary(5) as integer,i%
Randomize
for i=0 to 5
   ary(i)=CInt((Rnd+1)*4) 'higher then 1 and lower then 5 (or 5)
next

לא כל דבר מקצועי צריך להיות מורכב

קודם כל, שתי ההצהרות הבאות אינן שקולות, למרות טענתך:

Dim arr(k) As type
Dim arr(0 to k) As type

שכן ב-VB האיבר הראשון הוא 1 ולא 0 בברירת המחדל, כלומר, ההצהרה הראשונה שקולה להצהרה הבאה:

Dim arr(1 tok) As type

ואני מניח שברור לך שההצהרות הבאות אינן שקולות:

Dim arr(k) As type
Dim arr(0 to k) As type

אם רוצים לקבוע שהאיבר הראשון יהיה 0, ניתן לכתוב בתחילת מודול:

Option Base 0

הבעיה השניה בקוד שלך היא הצהרה על משתנים בצורה ההזויה שנשארה מימי QB למען התאימות לאחור.
בימינו לא מצהירים על טיפוסי משתנים בעזרתם סימנים משונים כמו $%&#, אלא פשוט מציינים את שם הטיפוס...

בס"ד

אני לא בVB כבר יותר מחצי שנה - אז אין על מה להתווכח (פשוט לפעמים טועים-ובמיוחד במצב הזה)
אבל איך שאני זוכר - ברירת המחדל זה 0 תנסה לבדוק (אין לי כרגע את הVB במחשב -בCcollactions וכו' זה על בסיס 1)
בקשר לתחביר שבו שמים %!@#$%^^ וכו' זה מאד עוזר - במקום לכתוב INTEGER (או לחפש את זה בתפריט) אז פשוט לוחצים %
וכן - אני כמעט ולא יודע מה זה QB
זה פשוט עניין של נוחיות - חבל עליך

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

בס"ד

בכל שפה נורמלית אתה מצהיר פעם אחת על סוג הנתונים ואח"כ אתה יכול לתת הרבה שמות של משתנים
לדוגמא
int a,b,c,d,e,f,g,h;
אם תעשה את זה בVB זה יראה כך
dim a as integer,b as integer,c as integer, d as integer,e as integer,f as integer,g as integer,h as integer
ואם תעשה את זה עם הסימנים אז......
dim a%,b%,c%,d%,e%,f%,g%,h%

נו...........................תחליט אתה
--
ובמיוחד בגלל שהמשתנים זה הדבר הכי בסיסי בתכנות לכן מאד כדאי ללמוד את זה....

יעלה תריץ לימוד

שם הטיפוס צריך להיות מצויין ולא סימן משונה ונעדר משמעות.

נ.ב.
דבר יותר בסיסי ממשתנים הוא כתיבת קוד קריא...

קוד קריא שלא לוקח הרבה זמן לכתוב (תודות ל Copy & Paste) או קוד בלתי קריא שלא לוקח הרבה זמן לכתוב...

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

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://www.varon.co.il/signature.asp?type=.jpg]

"The reasonable man adapts himself to the world,

The unreasonable one persists in trying to adapt the world to himself,

Therefore all progress depends on the unreasonable man" --- George Bernard Shaw

בס"ד

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

זה דומה לטיעון שלכתוב integer ב-VB לוקח יותר זמן ולכתוב int ב-C.
טיעון חסר חסר משמעות בהתחשב בכך ש-VB פותחת לך תיבת drop-down,
ואתה ממילא מקליד רק את שלוש האותיות הראשונות של הטיפוס במקרה
הזה...

הקטע הנחמד הוא שקשה לטעות בין כתיבת Integer ל-Double, אבל
שגיאת הקלדה בין @ # $ % ^ & אינה דבר שקשה להעלות על הדעת...

ולהערתו של yytg למטה כאילו קיים תיעוד בנושא: פשוט לא.
לא בערך Dim Statement, לא ב-Data Types ולא ב-Data Type
Summary לא מוזכר הקשקוש הזה...
אולי זה קיים איפשהו ב-MSDN, אבל לא מוצאים את זה בחיפוש סביר.

כאשר ידיעה בסיסית של אנגלית טכנית מאפשר לך לקרוא אותו כמו סיפור...

לא כשאתה צריך ללכת ל MSDN בשביל הקטעים הכי בסיסיים של Syntax כמו הגדרת משתנים.

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://www.varon.co.il/signature.asp?type=.jpg]

"The reasonable man adapts himself to the world,

The unreasonable one persists in trying to adapt the world to himself,

Therefore all progress depends on the unreasonable man" --- George Bernard Shaw

[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://www.varon.co.il/signature.asp?type=.jpg]

"The reasonable man adapts himself to the world,

The unreasonable one persists in trying to adapt the world to himself,

Therefore all progress depends on the unreasonable man" --- George Bernard Shaw

בס"ד

בVB יש אפשרות לצרף להשתמש באנטר ובכל אופן זה יחשב לשורה אחת או ההפך
לדוגמא

קוד:

ab=1:cd=2
hello="ehat you say...." _
+ "nothing"

האם אתה מודע לשתי התווים האלא?
נגיד שענית כן
אבל זה לא טוב.......
זה לא קריא וכו'
-----
המסקנה שלי זה : מי שמישתמש כל הזמן במשתנים (כמוני למשל) מומלץ שיעבוד כך... אחרת שילחץ as רווח ואז יראה תפריט מוקפץ וילחץ שלש אותיות ראשונות וילחץ אנטר (עבודה קצת קשה)
----
תסתכל בתיעוד של integer ותראה את מקש הקיצור שם....

השימוש בנקודתיים קריא(או בלתי-קריא) בדיוק כמו השימוש בנקודה-פסיק בשפות מדויות C לכתיבת קוד כזה:

קוד:

int a = 5; int b = 31;

השימוש באנדר-סקור לשביר שורות קריא לחלוטין אלא אם כן יש לך מסך 27" וראיה של זבוב...
(אני נוהג לשים את האופרטור לפני השבירה)

קוד:

MyVeryLongString = "yada yada yada" & _
 		    "bla bla bla"

על כל מי שרוצה לכתוב קוד קריא ונכון להשתמש בשמות
המשתנים ולא בסימנים חסר המשמעות שקיימות ב-VB
רק לשם התאימות המפגרת לאחור ל-QB(ול-GW ול...).
לחפש את המידע הזה במעמקי ה-MSDN זה רעיון מגוחך.
מידע בסיסי אמורים למצוא בחיפוש בסיסי. אם לא מוצאים
אותו בחיפוש בסיסי, כנראה שאינו בסיסי. (ועוד אתה אומר
לי שהוא מפוזר בשלושים ערכים...מגוחך לחלוטין).

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