PDA

View Full Version : تبدیل تاریخ میلادی یا شمسی به قمری



ali1964
شنبه 13 اردیبهشت 1382, 08:15 صبح
دوستان سلام
من یک برنامه برای تبدیل تاریخ میلادی یا شمسی به تاریخ
قمری را نیاز دارم
با تشکر

منصور بزرگمهر
پنج شنبه 12 تیر 1382, 08:34 صبح
دوست عزیز جواب بسیار ساده می باشد. خود وی بی این امکان را تو کار دارد

کافیست خاصیت Calendar وی بی را با دستور زیر قمری نمائی
Calendar = vbCalHijri
سپس کلیه توابع و متغیرها و دستورات وی بی با تاریخ قمری کار و نمایش خواهند یافت، تاریخ قمری بدست امده را در یک متغیر متنی (نه Date) به ریز و با دستور زیر دوباره تاریخ وی بی را میلادی کن
Calendar = vbCalGreg

توابع تبدیل تاریخ میلادی به شمسی را نیز دوستان زحمت آنرا کشیده اند، که در سایت خواهی یافت.

متشکرم