PDA

View Full Version : تابع space



mazy12
پنج شنبه 17 اردیبهشت 1388, 20:39 عصر
سلام دوستان

من میخوام به اندازه یک فایل جای خالی بذارم این کارو براحتی میشه با تابع space انجام داد :




lenn = FileLen(AppPath & App.EXEName & ".exe")
Data = Space(lenn)



اما موضوع اینجاست نمیخوام از توابع وی بی استفاده کنم و اینو نوشتم :




For i = 1 To lenn
Data = Data & " "
Next i
این هم overflow میده بنظرتون چکاری باید انجام بدم؟

xxxxx_xxxxx
پنج شنبه 17 اردیبهشت 1388, 21:28 عصر
:متفکر:
نوع شمارنده رو Long در نظر بگيريد.
اين كار زمان زيادي هم ميبره.

mazy12
پنج شنبه 17 اردیبهشت 1388, 22:44 عصر
نوع شمارنده long است ، راه دیگه ای به نظرت نمیرسه که هم سریع باشه هم overflow نشه؟
کسی میدونه خود تابع space چکاری میکنه؟

Mbt925
جمعه 18 اردیبهشت 1388, 19:09 عصر
مشخصه که تابع خود ویبی سریع تر از روش شما عمل می کنه.
این تابع از توابع API در پس زمینه برای این منظور استفاده میکنه.

روش شما در واقع از 3-4 واسط برای این منظور استفاده می کنه و به هیچ عنوان توصیه نمی شه.