مشکل در نمایش تاریخ

[mah47gh]

با سلام آیا میتوان در ویژوال بیسیک دات نت تاریخ را بصورت 1397/05/10 در شیئی لیبل نمایش داد

[mehran6764]

سلام

چرا نشه ؟! دقیقا مشکلتون برای نمایش تاریخ به فرمتی که گفتین چیه ؟

[mah47gh]

سلام

چرا نشه ؟! دقیقا مشکلتون برای نمایش تاریخ به فرمتی که گفتین چیه ؟

سلام تایمر تاریخ فارسی را با یک لیبل را در فرم بصورت 1397/05/10 نمایش دهد

[mah47gh]

Public Function MiladiToShamsi(ByVal MDate As Date) As String

MiladiToShamsi = ""

Dim pc As New Globalization.PersianCalendar

Dim Sal As Integer = pc.GetYear(MDate)

Dim Mah As Integer = pc.GetMonth(MDate)

Dim Roz As Integer = pc.GetDayOfMonth(MDate)

MiladiToShamsi = Format(Sal, "0000") & "/" & Format(Mah, "00") & "/" & Format(Roz, "00")

Return MiladiToShamsi

End Function