ورود

View Full Version : سوال: تکه کد


hossein93
یک شنبه 15 اردیبهشت 1392, 15:19 عصر
با سلام
میخواستم بدونم تکه کد زیر چیکار میکنه
البته هر خط برای یجای جداست

xPos = ((Int(Int(Me.ScaleWidth / 10) * Rnd)) * 10)

ReDim Preserve XPoint(1 To SLength)
Nabege
یک شنبه 15 اردیبهشت 1392, 21:40 عصر
کد اولی یه عدد رندوم از 0 تا طول فرم برات انتخاب می کنه و اونو تو متغیر xPos قرار میده.
دومی هم اندازه ی متغیر XPoint رو از 1 تا مقدار متغیر Slength تغییر میده.
:لبخندساده::لبخندساده::لبخن ساده:
Nabege
یک شنبه 15 اردیبهشت 1392, 23:01 عصر
مشکل رفع شد یا هنوزه؟؟؟
SlowCode
دوشنبه 16 اردیبهشت 1392, 09:02 صبح
مشکل رفع شد یا هنوزه؟؟؟
هنوزه:لبخند:
فقط یه نکته بگم، تو خط دوم محدوده آرایه xpoint رو از 1 تا SLength تنظیم میکنه و چون از Preserve استفاده شده مقادیر داخل آرایه حفظ میشن(اگه از این کلمه استفاده نکنی همه چی رو پاک میکنه)
hossein93
دوشنبه 16 اردیبهشت 1392, 09:47 صبح
نه رفع نشده. یه برنامست که بعضی کداشو نمیفهمم
چند روز دیگه هم باید برم ارائه بدم:گریه:
Nabege
دوشنبه 16 اردیبهشت 1392, 22:15 عصر
یه نگاهی به این مقاله بنداز شاید کمکت کنه !
لینک :http://www.kharaee.com/index.php?opt...=143&Itemid=62 (http://www.kharaee.com/index.php?option=com_content&view=article&id=143&Itemid=62)