PDA

View Full Version : معادل روز تاریخ



mona_b
سه شنبه 03 آذر 1383, 15:22 عصر
سلام
دنبال تابعی می گردم که بعنوان ورودی تاریخ شمسی را بگیرد ودر خروجی مشخص کند که چندمین روز هفته (چند شنبه) است.

ساران سافت
سه شنبه 03 آذر 1383, 15:33 عصر
از format$(now,"dddd") استفاده کنید. :)

mona_b
سه شنبه 03 آذر 1383, 15:50 عصر
این تابع با ورودی میلادی درست کار میکند ولی وقتی تاریخ شمسی به آن دادم روز را اشتباه برگرداند.

mona_b
سه شنبه 03 آذر 1383, 16:04 عصر
فکر کنم برای استفاده از این تابع باید تاریخ شمسی را به میلادی تبدیل کنم و بعد از این تابع استفاده کنم. :wink:

vbprogramer
سه شنبه 03 آذر 1383, 16:37 عصر
توابع تبدیل تاریخ شمسی و میلادی زیادی در سایت موجود است با یک جستجو می توانید از آنها استفاده کنید :D

ساران سافت
سه شنبه 03 آذر 1383, 23:51 عصر
اگر خواستی یک Dll خوب در این زمینه دارم. بگو تا بفرستم :) :wink:

mona_b
چهارشنبه 04 آذر 1383, 19:12 عصر
بله حتما
اگه لطف کنید بفرستید :)

computer365
سه شنبه 25 اردیبهشت 1386, 09:03 صبح
من جواب گرفتم ولی نام روزها از یک روز قبل اورده میشه
یعنی به فرض تاریخ 86/02/15
جمعه میاره در حالی که باید شنبه باشه

__H2__
سه شنبه 25 اردیبهشت 1386, 10:39 صبح
سلام
اگر اقفال شوید و متحول شوید و دست از VB6 پکیده بردارید! با VB8 تمام اینکارها بسیار ساده و با دقت کامل انجام میشود، ماژول مخصوصی هم با دقت فوق العاده بالا برای تبدیل تاریخ شمسی وجود دارد.

MehdiCia
سه شنبه 25 اردیبهشت 1386, 11:24 صبح
سلام
اگر اقفال شوید و متحول شوید و دست از VB6 پکیده بردارید! با VB8 تمام اینکارها بسیار ساده و با دقت کامل انجام میشود، ماژول مخصوصی هم با دقت فوق العاده بالا برای تبدیل تاریخ شمسی وجود دارد.

مگه VB 8 هم هست؟ :متفکر::کف:
-------------------------------------------
اینو ببین حتما کارت راه میفته


http://www.parsaspace.com/evilboy/Shamsi.rar

__H2__
سه شنبه 25 اردیبهشت 1386, 13:05 عصر
مگه VB 8 هم هست؟ :متفکر::کف:


سلام
چی میگه ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟
VB7 که آمد مرد و رفت! تا چند ماه دیگر قرار است VB9 هم بیاید
نام دیگر VB7 همان Visual Basic.Net 2003 بود و
نام دیگر VB8 همان Visual Basic.Net 2005 است

این هم لینک امکانات جدیدی که قرار است به VB9 نصبت به VB8 اضافه شود. (http://msdn2.microsoft.com/en-us/library/ms364068(vs.80).aspx)