تبدیل long (تاریخ) به string

[amirsafari 116]

سلام دوستان بنده یه متغیر long دارم که توش تاریخ ذخیره میشه میخواستم تبدیلش کنم به string  که بتونم توی لیبل نشونش بدم

[amirsafari 116]

ببینید دوستان این کد منه 
میخوام توی لیبل نشونش بدم
 

ToastMessageShow("Check the logs...", True)
	ToastMessageShow("Today is " & DateUtils.GetDayOfWeekName(DateTime.Now),False)
	ToastMessageShow("There are " & DateUtils.NumberOfDaysInMonth(DateTime.GetMonth(DateTime.Now), _
		DateTime.GetYear(DateTime.Now)) & " days in this month.",False)
	Dim targetDate As Long = DateUtils.SetDate(2014, 1, 1)
	Dim timeToDate As Period = DateUtils.PeriodBetween(DateTime.Now, targetDate)
	ToastMessageShow(timeToDate,False)
	ToastMessageShow("Time left to 2014: " & timeToDate.Months & " months, " & timeToDate.Days & " days",False)

[ha88an 203]

dim s as long

log(DateTime.getyear(s))

log(DateTime.GetMonth(s))

log(DateTime.GetDayOfMonth(s))