年月日 Transform(Val(Dtos(Date())),"9999年99月99日")
时分秒 Transform(Val(Chrtran(Time(),":","")),"99时99分99秒")