تیم نرم افزاری پایگاه سایبری استان خوزستان

محلی عمومی برای انتقال دانش برنامه نویسی

تیم نرم افزاری پایگاه سایبری استان خوزستان

محلی عمومی برای انتقال دانش برنامه نویسی

تیم نرم افزاری پایگاه سایبری استان خوزستان کانال رسمی تلگرام پایگاه سایبری استان خوزستان

جهت بیان هرگونه سوال و یا دیدگاه می توانید از کاربری تلگرام زیر استفاده نمایید
Telegram: @saiber89

آپ پیسی نام گروه نرم افزاری ماست که قصد داریم در خدمت جامعه خود با رویکرد انتقال دانش برنامه نویسی و رفع مشکلات شما در ضمینه های برنامه نویسی باشیم ./

آخرین نظرات
نویسندگان

تبدیل تاریخ میلادی به شمسی و قمری

پنجشنبه, ۱ تیر ۱۳۹۶، ۰۷:۴۵ ب.ظ | افسر سایبری | ۰ نظر

با سلام

نظر به صلاحدید و بکارگیری بالای کد تبدیل تاریخ میلادی به شمسی و همچنین هجری قمری

نمونه کد این مورد تقدیم سروان گرامی میشود.


در این ماژور ابتدا یک زیربرنامه بنام shamsi_date ایجاد کردیم تا هرگاه شما آن را در برنامه صدا بزنید تاریخ شمسی را به شما تقدیم نماید.

برای مثال اگر بخواهید تاریخ شمسی درون یک لیبل به نمایش قرار داده بشود مینویسیم: Label1.Text = Shamsi_date

به همین سادگی

همچنین زیربرنامه hejri_date نیز مانند تاریخ شمسی می باشد


التماس دعا


Public Class Form1

    Private Function shamsi_date() As String
        Dim shdt As New Globalization.PersianCalendar
        Dim sal = shdt.GetYear(Now.Date)
        Dim mah = shdt.GetMonth(Now.Date)
        Dim roz = shdt.GetDayOfMonth(Now.Date)
        Return sal & "/" & mah & "/" & roz
    End Function

    Private Function hejri_date() As String
        Dim shdt As New Globalization.HijriCalendar
        Dim sal = shdt.GetYear(Now.Date)
        Dim mah = shdt.GetMonth(Now.Date)
        Dim roz = shdt.GetDayOfMonth(Now.Date)

        Return sal & "/" & mah & "/" & roz

    End Function

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("تاریخ شمسی: " & shamsi_date())
        MessageBox.Show(" تاریخ قمری: " & hejri_date())

       
    End Sub
End Class

پاسخگویی رایگان به سوالات کاربران

انتشار در واتساپ

*****

انتشار در تلگرام



  • افسر سایبری

نظرات  (۰)

هیچ نظری هنوز ثبت نشده است

ارسال نظر

کاربران بیان میتوانند بدون نیاز به تأیید، نظرات خود را ارسال کنند.
اگر قبلا در بیان ثبت نام کرده اید لطفا ابتدا وارد شوید، در غیر این صورت می توانید ثبت نام کنید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی