من از آن روز که در بند توام،آزادم

این ها script   هایی هستند که مربوط به زمان هستند .

PageTimer("","")

ExitTimer("")

ScriptTimer("","")

RunScript("")

Pause("")

Return()

Refresh()

در آموزش های قبلی برخی از این کد ها استفاده کردیم اما در این بخش بیشتر به این script ها می پردازیم :

PageTimer("ms","PageLabel")

با اجرای این کد می توان پس از زمانی که تعیین می کنید به صفحه مورد نظر بروید . مثلا در این کد پس از گذشت 1000 میلی ثانیه (1 ثانیه) به صفحه ای که با Label آن را در قسمت دوم نوشته ایم (در اینجاpage 2  ) می رود :

PageTimer("1000","Page 2")

ExitTimer("ms")

این یک تایمر است که پس از گذشتن زمان مشخص شده پنجره بسته می شود (عمل Exit() انجام می شود) . در این کد پس از کذشتن یک دقیقه پس از اجرای این Script پنجره بسته خواهد شد .

ExitTimer("60000")

ScriptTimer("ObjectLabel","ms")

پس از گذشتن زمان تعیین شده Script مورد نظر اجرا می شود . در اینجا فقط منظور شئ Script نیست این کد مربوط به هر شئی که بتوان در آن Script مورد نظر خودتان را وارد کنید مثلا Text Button ، Rectangle و... می باشد . در قسمت اول نام شئ و در قسمت دوم زمان را می نویسیم . در مثال شئی با نام Script پس از 1 ثانیه اجرا می شود .

ScriptTimer("Script","1000")   

RunScript("ObjectLabel")

این کد مانند کد بالا عمل می کند با این تفاوت که بلافاصله Script را اجرا می کند .

RunScript("Script")

Pause("ms")

می انید که برای اجرای کد ها ، آنها از بالا به پایین خوانده می شود (بدون هیچ وقفه ای) . از این دستور برای وقفه در بین خطوط کد ها استفاده می شود .

Return()

اگر خطوط Script ها را مانند یک رشته سیم فرض کنیم ، دستور Return مانند کلیدی است که  این ارتباط و رسانایی بین رشته ها را قطع می کند . یا وقتی به این خط رسید بقیه خط ها را نمی خواند . از اینscript  می توانید در دستور شرطی If یا حلقه for استفاده کنید .

Refresh()

تقریبا از اسم این کد می توان به طرز کار آن پی برد . این Script در حلقه ها بسیار مفید است . مثلا در یک حلقه Normal در هنگام شمارش شما نمی توانید از کلید های دیگر استفاده کند . اما اگر در حلقه خود Refresh را جای دهید این مشکل برطرطرف می شود .

برای اجرای کد های نمونه زیر ، یک Text با نام Counter ایجاد کنید .

یک حلقه با Refresh :

For n=1 To 100000

  i=n

  DisplayValue("Counter","i")

  Refresh()

Next n

یک حلقه Normal  :

For n=1 To 100000

  i=n

  DisplayValue("Counter","i")

Next n

تغییری که در اجرای این دو حلقه وجود دارد کاملا محسوس است .