时间格式有关问题，请前辈们指点，先多谢了

时间格式问题，请前辈们指点，先谢谢了！
Dim Str_time As String
  Str_time = Format(DateTime.Now, "Long Date")
  Str_time = Mid(Str_time, 3)
  Me.txt_年月日.Text = Str_time

现在这段代码执行后得到的实践形式是08年4月1日
可是我想得到结果是08年04月01日！
请问前辈们，该怎么做？

[解决办法]
Str_time = Format("值",YYMMDD)
[解决办法]
Str_time.string(yy/MM/dd)