به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی
درباره من
This topic is a little part of programming in access , We have reached to this goal just with efforts and more exercises also studying the Microsoft Office Documents and their various forums
ادامه...
خبرگزاری فارس-گروه زندگی: دو خانم مانتویی مسافر مترو تهران به دختری بیحجاب میگویند که پوشش نامناسبی برای حضور در اماکن عمومی دارد و بهتر است شکم برهنهاش را بپوشاند. دختر جوان در مقابل این درخواست، میگوید: «زندگی خودمه، دخالت نکنید، اگه با پوشش من مخالفید، جمع کنید و از ایران برید».
در تقویم میلادی نو سالهایی که بر ۴ بخشپذیر باشند (باقیماندهٔ تقسیم آن سال بر ۴ برابر ۰ باشد) کبیسه هستند با این استثنا که از میان سالهایی که بر ۱۰۰ بخشپذیرند (سالهای انتهای سده)، تنها آنهایی که بر ۴۰۰ نیز بخشپذیرند کبیسه هستند.
Private Function IsLeap(ByVal varYear As Integer) As Integer
If (varYear Mod 4 = 0 And varYear Mod 100 <> 0) Or (varYear Mod 400 = 0) Then
بر اساس محاسبات مرکز تقویم مؤسسهٔ ژئوفیزیک دانشگاه تهران که مرجع رسمی تقویم ایران است، از سال ۱۲۰۶ تا ۱۴۹۸ هجری شمسی این سالها کبیسه بودهاند یا خواهند بود:
تابع زیر برای کبیسه نوشته شده درستی یا نادرستی آنرا طبق سال های کبیسه بالا چک کنید
Public FunctionKabiseh(ByValOnlySal As Variant) As Byte
‘ورودی تابع عدد دورقمی است ‘این تابع کبیسه بودن سال را برمیگرداند ‘اگر سال کبیسه باشد عدد یک و درغیر اینصورت صفر را بر میگرداند
Kabiseh = 0
If OnlySal>= 75 Then
If (OnlySal -75) Mod 4 = 0 Then
Kabiseh = 1
Exit Function
End If
ElseIfOnlySal<= 70 Then
If (70-OnlySal) Mod 4 = 0 Then
Kabiseh = 1
ExitFunction
End If
End If
EndFunction
مثلا برای سال ۱۴۰۸ :
سال از ۱۳۷۵ بزرگتر است
( 1408-1375 ) Mod 4=???
اگر صفر شود یعنی کبیسه است که صفر نمی شود ولی طبق سال های کبیسه لیست شده باید کبیسه باشد ، مشکل را بیابید
تبدیل تاریخ میلادی به شمسی با درنظر گرفتن تاریخ شمسی و میلادی مبنا و سپس اضافه کردن تعداد اختلاف روزهای دو تاریخ میلادی به تاریخ شمسی ... البته از سال ۱۹۹۷ ( مبنا ) ببعد را به شمسی تبدیل خواهد کرد و نیز برای تبدیل تاریخ میلادی جاری به شمسی
JMabna=13600629
GMabna=19810920
Convert >>> 1/1/1997
'from 1/1/1997~20/09/1981
DateDiff=5582
-روز ماه های میلادی ۱۲ ۱۰ ۸ ۷ ۵ ۳ ۱ سی و یکروز است
-روز ماه های میلادی ۱۱ ۹ ۶ ۴ سی روزه است
-روز ماه میلادی ۲ با توجه به کبیسه نبودن یا بودن ۲۸ یا ۲۹ روزه است
اختلاف بین سال های ۱۹۹۷ تا ۱۹۸۱ می شود ۱۶ یکی ازآن کم کرده و در ۳۶۵ ضرب می کنیم که حاصل آن ۵۴۷۵ می شود چون سال های کبیسه ۳۶۶ روز می شود چک می کنیم در سال های ۱۹۸۱ تا ۱۹۹۷ چند سال کبیسه وجود دارد جدول های بالا را ببینید سال های ۱۹۹۶ ۱۹۹۲ ۱۹۸۸ ۱۹۸۴ کبیسه هستند لذا باید باندازه تعداد آن به عدد ۵۴۷۵ اضافه کنیم ( ۴+۵۴۷۵ ) فاصله بین ۹/۲۰ تا ۱/۱ در دو تاریخ میلادی یاد شده را بدست آورده و به عدد قبل اضافه میکنیم
(۳۰-۲۰)+۳۱+۳۰+۳۱+۱=۱۰۳
اعداد ۴+۵۴۷۵ و ۱۰۳ را باهم جمع می کنیم که عدد نهایی و اختلاف روزهای بین دو تاریخ میلادی ۵۵۸۲ خواهد شد.
البته تابع DateDiff در اکسس یکی از کارهایش بازگرداندن جمع تعداد روزهای بین دو تاریخ است.
حال باید مقدار ۵۵۸۲ روزبه تاریخ ۱۳۶۰/۰۶/۲۹ اضافه کنیم تا مشخص شود معادل شمسی تاریخ میلادی ۱/۱/۱۹۹۷ چیست. کارهایب باید انجام داد :
۱-مشخص کردن تعداد روزهای باقی مانده تا آخر سال ۱۳۶۰
۲-مشخص نمودن کبیسه بودن یا نبودن سال های بعد ار سال ۶۰
-تعداد روزها از ۲۹ شهریور ۶۰ تا آخر سال ۶۰ می شود ۱۸۱ روز ( ۲+۳۰×۵+۲۹ )
(۵۵۸۲-۱۸۱)/۳۶۵=۱۴.۷۹
(۵۵۸۲-۱۸۱)-۱۴*۳۶۵=۲۹۱
از سال ۶۱ تا ۷۴ ، سه سال کبیسه وجود دارد
۲۹۱-۳=۲۸۸
نماز می خوندن ولی چون باطل بودند شکست خوردند
سربازان جهادی هیتلر ملعون
شهریور ۲۵۳۶
دیماه سال ۱۴۰۲
بهگفته سعید بیگی، مدیرعامل شرکت ساماندهی مشاغل شهر تهران «اگر در برخی از اپلیکیشنهایی که آگهی اینترنتی میگذارند جستوجو کنید، میبینید درحال استخدام دستفروش با حقوقهای خیلی بالا مثل روزانه ۷۰۰هزار، ۸۰۰هزار یا یکمیلیون تومان هستند و نشان میدهد که مراودات ناسالمی وجود دارد.»
دیماه ۱۴۰۲ ( حمله انتحاری در کرمان توسط داعش با حدود ۹۰ شهید شامل زن و کودک )
محل انفجارها به ترتیب در فاصله ۱.۵ کیلومتری و ۲.۷ کیلومتری از مدفن حاج قاسم سلیمانی وپیش از گیتهای بازرسی بوده است.
به گزارش اسپوتنیک، گروه دولت اسلامی، داعش در پستی در صفحه تلگرام خود مسئولیت انفجارهای دیروز کرمان را بر عهده گرفت.
داعش در بیانیه خود نوشت:
در بخشی از غزوه "و هر کجا یافتید بکشید." بیش از ۳۰۰ نفر از شیعیان مشرک در ۲ عملیات انتحاری در ایران کشته و زخمی شدند. دیروز دو برادر "عمر الموحد" و "سیف الله مجاهد" به سوی تجمع بزرگ شیعیان مشرک در کنار مزار رهبر کشته شده خود "قاسم سلیمانی" در شهر کرمان در جنوب ایران رفته و کمربندهای انفجاری خود را در میان جمعیت منفجر کردند که بیش از ۳۰۰ نفر را کشت یا زخمی کرد.
فرارو :
واکنش کیهان به انفجارهای تروریستی کرمان؛ انتقام با قید فوریت!
کیهان: اینکه انتقام نباید، هیجانی باشد درست. این که باید به موقع و در جای مناسب پاسخ داده شود هم درست. اما گاهی باید کنار این «انتقام»، قید «فوری» را هم گذاشت تا اهرم بازدارندگی، به درستی و کامل عمل کند.
دیماه ۱۴۰۲ :
قرار بود آذر ۱۴۰۲ اولین کاروان اعزام شود
پس از این صحبت به دلیل مشخص نبودن زمان صدور مجوز از سوی عربستان تاریخ دیگری برای اعزام زائران عمره اعلام نشد.
حالا حج و زیارت استان تهران در اطلاعیهای به کارگزاران خود اعلام کرد: به دلیل عدم دریافت مجوزهای پروازی توسط شرکت هواپیمایی، کلیه پروازهای عمره از تاریخ ۱۴۰۲/۱۰/۱۳ تا ۱۴۰۲/۱۰/۱۷ (پنج روز اول عملیات) لغو میگردد و با توجه به اهمیت موضوع و شرایط موجود، به کارگزاران محترم تأکید میگردد، نسبت به اطلاع رسانی مناسب به زائران در این خصوص اقدام نمایند.
در این اطلاعیه تاکید شده هرگونه اطلاع رسانی در خصوص پروازهای ۱۴۰۲/۱۰/۱۸ به بعد و اعزام زائرین کاروانهای لغو شده متعاقباً اعلام خواهد شد.
باید منتظر ماند و دید زائران عمره پس از ۹ سال بالاخره چه زمانی رهسپار سرزمین وحی میشوند.
خواهر علی کریمی در بند بخاطر یک اعتماد
خواهر علی کریمی که ۲ فرزند دارد با درخواست چک سفید امضا از طرف برادرش روبرو میشود، وی که سابق بر این نیز به دلیل اعتماد به برادرش ۵۰ فقره چک سفید امضا به علی کریمی داده بود، پس از متوجه شدن این مسئله که چکهای سفید امضای او در معاملات سنگینی مانند خرید باشگاه فوتبال سپیدرود و خرید زمین و ملکهای میلیاردی مورد سوء استفاده قرار گرفته از دادن چکهای سفید امضای جدید به برادر خود امتناع میکند.
لیلا کریمی که متوجه معاملههای میلیاردی سنگین با دسته چک خود و توسط برادرش شده بوده، این بار پس از مشورت با همسر و اعضای خانواده از تحویل چکهای سفید امضای جدید به برادرش امتناع کرده و همین موضوع باعث اختلاف آنها میشود.
علی کریمی پس از اختلاف پیش آمده با خواهرش وی را تهدید به برگشت زدن چکهای سفید امضای قبلی میکند. لیلا کریمی که باور به انجام چنین اقدامی از سمت برادرش نداشته تسلیم درخواست علی کریمی نشده و چکهای جدید را به او نمیدهد.
۱۲ دیماه ۱۴۰۲ :
در عملیاتی همزمان در ۸ منطقه استانبول، ۳۳ تبعه خارجی به ظن جاسوسی برای موساد بازداشت شدند ؛ به گزارش خبرگزاری مهربه نقل از خبرگزاری الجزیره، تلویزیون ترکیه امروز سه شنبه اعلام کرد: موساد (سازمان جاسوسی رژیم صهیونیستی) افرادی را برای انجام عملیات در خاک ترکیه علیه فلسطینیها و فعالان مخالف سیاست تل آویو استخدام کرد.
این اتفاق تروریستی در کرمان روز سیزدهم اتفاق افتاد ( حادثه تروریستی و غیرانسانی روز چهارشنبه 13 دیماه 1402 - کرمان.)
به گزارش خبرنگار ایرنا، زینب سلیمانی روز پنجشنبه در حاشیه عیادت از مجروحان انفجارهای تروریستی شهر کرمان در بیمارستان شهید باهنر در جمع اصحاب رسانه تصریح کرد: اگر دشمنان این اقدامات را انجام می دهند تا مردم را منزجر و عشق و علاقه به این شهید را در دل ها کمرنگ کنند، باید به تصویر شب گذشته گلزار شهدای شهر کرمان نگاه کنند که بعد از حادثه دیروز مملو از جمعیت بود.
۲۰ دیماه ۱۴۰۲ :
یک مامور در حمله مسلحانه به یک پاسگاه نیروی انتظامی در سیستان و بلوچستان به شهادت رسید.
این حمله مسلحانه علیه پاسگاه "جنگل" در شهرستان راسک استان سیستان و بلوچستان رخ داد.
خبرگزاری تسنیم نوشت در این درگیری 3 ساعته یک مامور انتظامی به شهادت رسید.