View Full Version : اختلاف یک تاریخ از تاریخ امروز و نشان دادن آن به صورت روز، سال، ماه
barname_m708
پنج شنبه 02 دی 1389, 09:36 صبح
با سلام خدمت اساتید محترم
در نمونه ای که قرار دادم میخوام تاریخ استخدام از تاریخ روز(تاریخ سیستم) کم بشه و اختلاف این دو تاریخ به صورت روز، سال، ماه در یک textbox نشان داده بشه.لطفا کمکم کنید.
Zero Defect
پنج شنبه 02 دی 1389, 10:10 صبح
سلام
از اکتیوایکس رایگان PDC (http://cpsd.ir/pdc.asp)استفاده کنید , کاملترین مبدل تاریخ شمسی موجود که مشتمل بر 33 تابع کاربردی با خروجیهایی کاملا قابل انطباق با نیاز هستش که سئوال شما در یکی از توابع و با دو خروجی متفاوت قابل اعماله
تابع DDiffToText جوابگوی شماست
در داخل مثال ارائه شده به همراه برنامه دستور زیر رو اضافه کنید تا عملکرد اون رو ببینید
X = MyVar.DDiffToText(MyVar.CurrentDate, "1380/05/11", FullText)
و یا
X = MyVar.DDiffToText(MyVar.CurrentDate, "1380/05/11", NumText)
به جای X نام یک کنترل رو قرار بدید
لینک (http://cpsd.ir/pdc.asp)
barname_m708
پنج شنبه 02 دی 1389, 16:51 عصر
با نش
تشکر از شما
من میخوام با یک تابع این کار رو انجام بدم.اگه ممنه در نمونه ای که قرار دادم این کار رو انجام بدین.ممنونم
Zero Defect
پنج شنبه 02 دی 1389, 17:20 عصر
سلام
کد رو بر مبنای PDC برای شما نوشته بودم و در واقع اون کد فراخوانی ساده دستور بود , حالا اگر میخواید در قالب یک تابع باشه به صورت زیره
Public Function DDiffToText(EnteryDate As String) As String
DDiffToText = MyVar.DDiffToText(MyVar.CurrentDate, EnteryDate, FullText)
End Function
ولی من الان نمونه شما رو دیدم , به نظرم شما از PDC استفاده نکنید بهتره , چرا که برای استفاده از PDC شما باید حداقل یکی از این دو کار رو بتونید انجام بدید :
نحوه کار با اکتیو ایکسها
و یا مطالعه فایل کمک همراه با اون اکتیو ایکس
چرا که هر یک از این دو به تنهایی میتونست منجر به دستیبابی به پاسخ سئوال بشه
موفق باشید
barname_m708
پنج شنبه 02 دی 1389, 18:06 عصر
با تشکر از شما
لطفا نمونه من رو اصلاح کنید.ممنون میشم
barname_m708
جمعه 03 دی 1389, 09:40 صبح
خواهش می کنم یکی از اساتید مشکل .نو حل کنه.ممنوم میشم
bemilove
جمعه 03 دی 1389, 13:15 عصر
این فایل ببین مشکلتو حل می کنه...............می تونی ازش کمک بگیری
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.