7,785
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
yangzhaoyu 2001-12-12
- 打赏
- 举报
Private Sub Command1_Click()
Dim a As Date
Dim b As String
a = Date
Debug.Print a
b = Str(Format(a, "yyyymmdd"))
Debug.Print b
End Sub
Dim a As Date
Dim b As String
a = Date
Debug.Print a
b = Str(Format(a, "yyyymmdd"))
Debug.Print b
End Sub
yxp1023 2001-12-12
- 打赏
- 举报
sample:
a="2001-12-12"
b=replace(a,"-","")
response.write b 'you will find b is 20011212, that is all!
a="2001-12-12"
b=replace(a,"-","")
response.write b 'you will find b is 20011212, that is all!
yxp1023 2001-12-12
- 打赏
- 举报
string=replace(date,"-","")
Bardo 2001-11-26
- 打赏
- 举报
StrData=Format(Data,"YYYYMMDD")
