[Microformt]

بسم الله الرحمن الرحيم
 الاخوه الكرام
 هل يوجد طريق مختصرة يتم نحويل التاريخ الهجري الى ميلادي ؟؟
 تحياتي

[AL_BRNS]

السلام عليكم

جرب التالي

PHP كود :

Private Sub Command1_Click()
Dim hDate As Date, gDate As String
VBA.Calendar = vbCalHijri
hDate = InputBox("ادخل التاريخ الهجري")
gDate = hDate
VBA.Calendar = vbCalGreg
MsgBox "التاريخ يوافق " & hDate & "ميلادي "
End Sub 


بالتوفيق .