PDA

View Full Version : حلقه for



reza2371
پنج شنبه 19 اردیبهشت 1398, 18:12 عصر
سلام
فرض کنید یه فرم داریم در حالت Continuous
اگر بخوایم تعداد رکورد های موجود در اون بدانیم چند تا هست چکار باید بکنم.

من میخوام توی فرمی که شرایطش را گفتم دستور for بنویسم که تک تک رکورد ها را از اول بره جلو و وقتی به پایان رسید توقف کنه
نمیدونم چطور تعداد را برای دستور for مشخص کنم؟؟

??? for i = 0 to

next i

Mehr@ban
جمعه 20 اردیبهشت 1398, 08:56 صبح
سلام
در فوتر استفاده شود

count(*)










Detect languageundefined


undefined


















Text-to-speech function is limited to 200 characters






Options (http://barnamenevis.org/moz-extension://950fbe79-ef61-49fb-b2c5-8d05319a846b/content/html/options/options.html?bbl) : History (http://barnamenevis.org/moz-extension://950fbe79-ef61-49fb-b2c5-8d05319a846b/content/html/options/options.html?hist) : Feedback (http://barnamenevis.org/moz-extension://950fbe79-ef61-49fb-b2c5-8d05319a846b/content/html/options/options.html?feed) : Donate (https://www.paypal.com/cgi-bin/webscr?cmd=_s-xclick&hosted_button_id=GD9D8CPW8HFA2)
Close

reza2371
جمعه 20 اردیبهشت 1398, 10:11 صبح
با این روش تمام رکورد ها را چک میکنه؟

Mehr@ban
شنبه 21 اردیبهشت 1398, 04:20 صبح
برای شمارش از تابع کانت استفاده میشه برای بدست آوردن

تعداد بدون کدنویسی در رکورد سورس یک تکست باکس بنویس:
=Count(*)
البته همونطور که گفتم باید این تکست باکس در فوتر یا هدر صفحه باشه

و برای داخل شرط هم میتونی از تابع Dcount استفاده کنی که نمونش در تالار زیاده
dim a intger
a = dcount("filde1","table1")

بعد از اون A توی حلقه استفاده کن

reza2371
شنبه 21 اردیبهشت 1398, 06:51 صبح
ممنونم از شما

reza2371
شنبه 21 اردیبهشت 1398, 21:50 عصر
سلام
توی فرمم از حلقه استفاده کردم و داخل حلقه یه شرط گذاشتم بدون توجه به شرط به تعداد رکورد هام تکرار میشه ولی متاسفانه شرط را اجرا نمیکنه
مشکل کجاست؟