منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] عايزه كود عرض التاريخ الهجري في رساله - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] عايزه كود عرض التاريخ الهجري في رساله (/showthread.php?tid=35692)

عايزه كود عرض التاريخ الهجري في رساله - منه - 16-07-20

السلام عليكم ورحمه الله وبركاته
عايزه كود عرض التاريخ الهجري في رساله

RE: عايزه كود عرض التاريخ الهجري في رساله - boudyonline - 17-07-20

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
         Dim Ar As CultureInfo = New CultureInfo("AR-SA")
       Thread.CurrentThread.CurrentCulture = Ar
       Ar.DateTimeFormat.Calendar = New HijriCalendar
       Ar.NumberFormat.DigitSubstitution = DigitShapes.NativeNational
       MsgBox(Format(Date.Now, "dddd dd MMMM yyyy"))
End Sub
مع وضع الكود التالي قبل بدابة فسم النصريحات

كود :
Imports System.Threading
Imports System.Globalization