Default value for dropdown

[tagteam]

I am trying to create a default value for a combo box but i cant get the month right. i would like to to be like 2016.01 but it only goes as 2016.1

The code i am using is:

=CDbl(Year(Date()) & "." & (Month(Date()))

how can i get it to put a 0 in front of the month if it is less than 2 digits?
Thanks

[June7]

Format(Date(), "yyyy.mm")

[tagteam]

Works great, thanks