مشاهده پروفایل: kiani2012

یک شنبه 25 آبان 1404, 13:38 عصر

mazoolagh به تاپیک حرفه ای: خارج از دستور - پرسشهایی از جنس دیگر در Access پاسخ داد

هدف ساخت یک textbox برای گرفتن تاریخ ایرانی با فرمت YYYY/MM/DD با شرایط زیر: 1- محدوده مجاز سال از 1200 تا 1500 2- محدوده مجاز ماه از 01 تا 12...

ادامه...

144 پاسخ | 18192 بار دیده شده

شنبه 24 آبان 1404, 18:32 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

مشخصا کدها در این روش کمتر و ساده تر و مستقل از تعداد ورودی ها است. گذشته از این بطور کلی عملیات validation روی فیلدهای bound ساده تر از کنترل های...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 24 آبان 1404, 18:27 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

کد های فرم Statistics_sub : Option Compare Database Option Explicit Const MIN = -1E+100 Const MAX = 1E+100 Private Function OnExit() ...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 24 آبان 1404, 18:24 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

کدهای فرم Statistics : Option Compare Database Option Explicit Private Sub Form_Load() BTN_CLEAR_ALL_Click End Sub Private Sub...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 24 آبان 1404, 18:20 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

یک فرم continuous روی این جدول Numbers میسازیم (Statistics_sub): و این رو به عنوان یک sub-form در جدول Statistics که نتایج آماری رو نشون میده...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 24 آبان 1404, 18:11 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

با وجود اینکه بحث روی محور فرم unbound میچرخه، ولی برای مقایسه همین برنامه پست شماره 22 (که در پست شماره 14 تعریف شده) رو بر اساس یک فرم bound...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 20:17 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

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

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 20:11 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

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

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:57 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

و دست آخر کد ریست کردن فرم: Private Sub Clear_Footer() Dim tb As Variant For Each tb In FooterTextBoxes If tb.Name Like...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:54 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

و کد محاسبات آماری: Const MIN = -1E+100 Const MAX = 1E+100 Private Sub Calc_Statistics() Dim count_all As Integer, sum_all As Double,...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:52 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

برای هر تکسباکس مقدار (TB_Number) ، پراپرتی های BeforeUpdate و OnKeypress و OnExit رو به شکل زیر تعریف میکنیم: و کدشون رو به فرم اضافه میکنیم:...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:43 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

در طراحی فرم اینجور قرارداد میکنیم که: 1- تکسباکس های مقادیر با اسامی TB_Number_x و لیبل های متنظر اونها با با LBL_Number_x ساخته بشن (x از 1 تا...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:23 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

بعد توابعی رو که برای validation نیاز داریم در یک ماجول میریزیم: Public Function NumberIsValid(ByVal Value As Variant) As Boolean Value =...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:14 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

ابتدا کلاس MazooTextBox رو درست میکنیم: Option Compare Database Option Explicit Public WithEvents Txt As Access.TextBox Private Sub...

ادامه...

26 پاسخ | 472 بار دیده شده

سه شنبه 20 آبان 1404, 19:06 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

روش کارآمدی که به ما اجازه بده یک کنترل custom داشته باشیم که خودکار در رخدادها به کدهای ما هدایت بشه اینه که یک کلاس از روی کنترل بسازیم. تاپیک...

ادامه...

26 پاسخ | 472 بار دیده شده

دوشنبه 19 آبان 1404, 18:49 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

خب، در برنامه قبلی دیدیم که برای یک دسته از تکسباکس ها 3 روتین با کد (logic یا منطق) یکسان هست (beforeupdate, onexit, onkeypress) و اینجور بنظر...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 16:51 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

این روش درست هست و کار میکنه ولی از نظر نگهداری برنامه و کدهای تکراری مشکل داره که در پست های بعدی همین مشکل رو میبینیم که چجوری میشه برطرف کرد.

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 16:47 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

و خود فرم : Option Compare Database Option Explicit Private Sub CalcAverage()

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 16:41 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

یک باتن برای پاک کردن همه فیلدها: Private Sub BTN_CLEAR_ALL_Click() Me.TB_COUNT_ALL = 8 Me.TB_SUM_ALL = 0 Me.TB_AVERAGE_ALL = 0 ...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 16:40 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

روتین محاسبه: Private Sub CalcAverage() Const count_all = 8 Dim sum_all As Double Dim count_non_zero As Long Dim Value As...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 16:38 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

در گام اول یک روتین مینویسیم برای تشخیص valid بودن یک متن بعنوان یک عدد در محدوده مشخص شده یا خالی بودن اون: Public Function NumberIsValid(ByVal...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 16:30 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

خب، روش اول این هست که بصورت سنتی و ساده برای هر تکسباکس یک مکانیسم مناسب validation پیاده کنیم. مهم این که تعریف validation rule برای تکسباکس،...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 15:58 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

شما صاحب اختیارین، دقت کرده باشین برنامه پیوست همون تاپیک هم یک شماره 1 آخرش داره، یعنی قرار بود نمونه های دیگه هم پشت سرش بیاد، دیگه بجاش تاپیک...

ادامه...

26 پاسخ | 472 بار دیده شده

شنبه 17 آبان 1404, 15:53 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

با سلام و آرزوی روز خوش قانون اصلی و مهم اینه که کد درست و دقیق کار کنه، حالا این که از بین چند کد درست کدوم بهتره بحث دیگه ای داره. چیزی که...

ادامه...

26 پاسخ | 472 بار دیده شده

چهارشنبه 14 آبان 1404, 19:56 عصر

mazoolagh به تاپیک آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access پاسخ داد

برای شروع فرض کنید که نیاز به یک فرم داریم که: 1- 8 تکسباکس داشته باشه 2- که هر یک از اونها یک عدد بین 0 تا 100 قبول کنه (double) 3- و فیلدهای...

ادامه...

26 پاسخ | 472 بار دیده شده

چهارشنبه 14 آبان 1404, 19:46 عصر

mazoolagh تاپیک جدید تحت عنوان آموزش: در باره Validation و Shared Logic در فرم های UnBound در Access ایجاد کرد

فرض کنید یک فرم unbound داریم که چند کنترل آن دارای کد یکسان (از نظر منطق) هستند - (معمولا در validation و محاسبات). این فرم میتونه یک فرم data...

ادامه...

26 پاسخ | 472 بار دیده شده

چهارشنبه 14 آبان 1404, 13:16 عصر

mazoolagh به تاپیک محاسبه میانگین بدون در نظر گرفتن صفر درچند تکست باکس در فرم در Access پاسخ داد

این به روش گرد کردن اعداد اعشاری برمیگرده که بهشBanker's Rounding میگن: یعنی اگر مقدار اعشار برابر نیم باشه به نزدیکترین مقدار زوج گرد میشه. اینجا...

ادامه...

24 پاسخ | 1026 بار دیده شده

چهارشنبه 14 آبان 1404, 13:12 عصر

mazoolagh به تاپیک محاسبه میانگین بدون در نظر گرفتن صفر درچند تکست باکس در فرم در Access پاسخ داد

با سلام متقابل به به - چه سعادتی، دیگه داشتم یواش یواش نگران سلامتی شما میشدم که خوشبختانه آسوده خاطر شدم. === این پرسش جناب majid44 همینجور که...

ادامه...

24 پاسخ | 1026 بار دیده شده

شنبه 10 آبان 1404, 13:46 عصر

mazoolagh به تاپیک محاسبه میانگین بدون در نظر گرفتن صفر درچند تکست باکس در فرم در Access پاسخ داد

سلام و روز خوش روش درست دقیقا همینی هست که شما پیاده کردین: continuous form و bound

ادامه...

24 پاسخ | 1026 بار دیده شده

شنبه 10 آبان 1404, 13:26 عصر

mazoolagh به تاپیک محاسبه میانگین بدون در نظر گرفتن صفر درچند تکست باکس در فرم در Access پاسخ داد

سلام و روز خوش اینها از مواردی هست که قبلا مفصل بررسی شده: تفکیک استاندارد ارقام سوال: حذف 2 رقم اعشار از فیلد مبلغ ، در لیست باکس و راست...

ادامه...

24 پاسخ | 1026 بار دیده شده

kiani2012
کاربر دائمی

تمام آمارها

بیشتر 4 دوستان

-سیّد-

mazoolagh

aram_2

i-nostalgic

بازدیدکنندگان اخیر

اطلاعات پایه

آمار

تعداد پاسخ ها

اطلاعات کلی

4 دوستان

-سیّد-

aram_2

i-nostalgic

mazoolagh

kiani2012 کاربر دائمی

تمام آمارها

بیشتر 4 دوستان

بازدیدکنندگان اخیر

اطلاعات پایه

آمار

تعداد پاسخ ها

اطلاعات کلی

4 دوستان

kiani2012
کاربر دائمی