在线等待！！！！！

Question

用DTPicker取的时间后
用Tempstr=format(dtpicker.value,"yy-mm-dd")转换后
用mid(Tempstr,1,2)取出的时间
在text中显示是03某字符串Str=xxxx-xx-xxxx-xx
用mid(Str,6,2)插入某字符串后却显示为
xxxx-3-xxxx-xx
请问怎么显示
xxxx-03-xxxx-xx啊

Answer 1

是插入mid(Tempstr,1,2)取出的时间
后显示不对

Answer 2

没看明白，不过你最好用YEAR（），MONTH（），DAY（）等函数取出相应字符串

Answer 3

就是说用DTPicker选出一个时间
取出其中的年
插入字符串xxxx-xx-xxxx-xx中取代
第二个XX
的时候显示出来的是3不是我想要的03
因为现在是2003嘛
我想要的效果的是
XXXX-03-XXXX-XX

Answer 4

Private Sub Command1_Click()
Dim A As String, B As String
 A = "XXXX-XX-XXXX-XX"
 B = "03"
A = Left(A, 5) & B & Right(A, 8)
MsgBox A
End Sub