送分100分：如何从一个时间变量中提取出年月日时分秒。

如何从一个时间变量中提取出年月日时分秒等信息
具体如下

 Dim Nian As String * 2, Yue As String * 2, Ri As String * 2, Shi As String * 2, Feng As String * 2, Miao As String * 2  Dim Nian