说明 非日期型为原的值 日期型 去掉后面的时间部分
Function (stringvar str)
if not NumericText(str) then
(
if IsDateTime (str) then
(
stringvar array strs:=Split (str,"-");
if count(strs)>=3 then
(
stringvar array strs1:=Split (strs[3],":");
if count(strs1)>=3 then
(
ToText(date(str))
)
else
(
str
)
)
else
(
str
)
)
else
(
str
)
)
else
(
str
)