日期转换的问题!!
1。假设从SQL Server某表读出日期型字段的值为“2002-5-3”,请编写一个函数,将其转变为“2002-05-03”。下面给出若干语句,其中processing为自定义函数,其功能是实现字符的转变,例如processing(5)将返回“05”。(不能使用Format函数)Private sub command1_click()
Dim mydate As Date
Dim change As String
mydate = rs!birthday 'birthday是日期型数据,rs为记录集
change = Trim(Str(Year(mydate))) & "/" & processing (Month(mydate)) & "/" & processing (Day(mydate))
End sub
请在下面写出自定义函数processing的功能代码。