是否有函數可以簡單的取出日期取出年或月或日

goldsuper7

$today = "2019/12/1" ;
年取得的日期格式為 YYYY
月取得的日期格式為 MM
日取得的日期格式為 DD

afan

Local $sSource = '2019/12/1'
Local $aSRE = StringRegExp(StringRegExpReplace($sSource, '\d+', '0${0}'), '(\d{4})/0?(\d\d)/0?(\d\d)', 3)
MsgBox(0, '', $aSRE[0] & @LF & $aSRE[1] & @LF & $aSRE[2])

一行代码即可，够简单吧

skyfree

UDF里搜_DateTimeSplit

afan

skyfree 发表于 2020-12-10 20:20
UDF里搜_DateTimeSplit

BTW，强哥，介个不会补零，LZ 要的是DD MM

duxing

固定格式StringMid多简单
StringMid(abs($aok11[1][1]),1,2)&"月"&StringMid(abs($aok11[1][1]),3,2)&"日"&"  "&StringMid(abs($aok11[1][1]),5,2)&":"&StringMid(abs($aok11[1][1]),7,2)

ywc195

过来学习一下，顺便赚点下载币

Dontang2018

学习一下，学习一下

rockkey

过来学习一下，顺便赚点下载币

shqf

afan版主的正则代码总是那么简洁，值得学习，2楼中补0的代码又让我学到了。无事，在此基础上我也想了一种方法，略有扩展，供楼主参考：

Local $sSource = '2019/12/1'
;Local $sSource = '2019年12月1日'
;Local $sSource = '2019-12-1'
;Local $sSource = "12/1/2019"
Local $aSRE = StringRegExp(StringRegExpReplace($sSource, '\d+', '0${0}'), '(\d{4}|\d{2})(?:/|-|年|月|日|$)', 3)
MsgBox(0, '', $aSRE[0] & @LF & $aSRE[1] & @LF & $aSRE[2])