تکرار یک عمل به تعداد n بار سپس انجام عمل دیگر

[امین پوراباذری 1,044]

سلام به همه ی دوستان چجوری میشه یه عمل به یک تعداد خاص انجام بشه مثلا صد بار بعد از صد بار پیغام خرید نرم افزار بیاد.ممنون میشم راهنمایی کنید.

[امین شاهدی 5,767]

در این صورت توی اکتیویتی کریت با کد تست کنید چند بار برنامه باز شده :

Dim times As Int
If File.Exists(File.DirInternal,"Openedtimes.txt")=False Then
File.WriteString(File.DirInternal,"Openedtimes.txt",1)
Else
times=File.GetText(File.DirInternal,"Openedtimes.txt")
times=times+1
File.WriteString(File.DirInternal,"Openedtimes.txt",times)
End If

Msgbox("barname tahala "&times&" bar baz shode.","")

[امین شاهدی 5,767]

اگه منظورتون رو درست فعمیده باشم با دستور for میتونین این کار رو بکنین : 

For i=0 To 99
Log("shomare: "&i)
Next
Log("payan")

[Kazem Forghani 2,927]

منظورشون هر بار باز کردن برنامه هست .

مثلا 100 بار اول یه کاری انجام بده .

[امین پوراباذری 1,044]

 

اگه منظورتون رو درست فعمیده باشم با دستور for میتونین این کار رو بکنین : 

For i=0 To 99
Log("shomare: "&i)
Next
Log("payan")

نه امین جان منظورم استفاده از حلقه for نیست یکم بیشتر توضیح میدم فرض کنید شما یک برنامه دارید مثلا یه برنامه که تغییر فرمت میده خوب حالا می خوام اگر کاربر 10 تا فایل تغییر فرمت داد براش انجام بده ولی وقتی خواست فایل یازدهم تغییر فرمت بده دیگه این کار را انجام نده بهش بگه برو برنامه را بخره این جوری یک عمل خواست را به تعداد محدود انجام میده و بیشتر از اون تعداد انجام نمیده

[امین شاهدی 5,767]

نه امین جان منظورم استفاده از حلقه for نیست یکم بیشتر توضیح میدم فرض کنید شما یک برنامه دارید مثلا یه برنامه که تغییر فرمت میده خوب حالا می خوام اگر کاربر 10 تا فایل تغییر فرمت داد براش انجام بده ولی وقتی خواست فایل یازدهم تغییر فرمت بده دیگه این کار را انجام نده بهش بگه برو برنامه را بخره این جوری یک عمل خواست را به تعداد محدود انجام میده و بیشتر از اون تعداد انجام نمیده

 

 

همون کدی دومیه رو که دادم رو استفاده کن حالا توی Activity_create اگه بزاری هر بار تست میکنه ، اگه توی رویداد کلیک بزاری بعد از هر بار کلیک اون کار انجام میشه