نقل قول: تقویم شمسی VB.Net
دوست عزیز از این کدها استفاده کن
این کدها رو تو فرمت اضافه کن
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
این تاریخ شمسی رو تو یه لیبل نشون می شده تو می تونی از تکست باکس یا هر چیز دیگه ای که خواستی استفاده کنی
Label2.Text = MiladiToShamsi(Now)
نقل قول: تقویم شمسی VB.Net
من کد بالا را نوشتم ولی به جای تاریخ شمسی داره اسم Label2 را نشان می دهد.
وقتی بر روی Labe2 کلیک می کنم یک تاریخی نشان می دهد اما همیشه که نمیشه روی آن کلیک کرد چون می خواهم این تاریخ را به صورت اتوماتیک وارد دیتابیس کنم با این وجود باید اول بر روی Label2 کلیک کرد و بعد مقدار آن وارد دیتابیس یشه.
لطفا بگویید هر کد را دقیقا در کجا باید نوشت و اگر تنضیمات خاصی باید انجام داد باید چه کرد.
تشکر
نقل قول: تقویم شمسی VB.Net
دوست عزیز شما کد را در کلیک لیبل گذاشتید
در صوراتی که باید مثلا در فرو لود قرار دهید که زمانی که فرم لود می شود لیبل شما نیز پر شود
1 ضمیمه
نقل قول: تقویم شمسی VB.Net
دوست عزیز کد درست هست
اینم نمونه
موفق باشی
نقل قول: تقویم شمسی VB.Net
درمورد تاریخ شمسی دوست عزیز کمک کردن بهتون اما در مورد دیتابیس پیشنهاد میشه تمام برنامه هایی که با وی بی دات نت طراحی میکنید از دیتابیس اس کیو ال استفاده کنید
با تشکر دامن پاک