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的功能代码。