开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 351|回复: 5
收起左侧

[已解决] 如何把几天前转换为具体的日期呢

 关闭 [复制链接]
结帖率:64% (7/11)
发表于 2024-2-5 21:20:26 | 显示全部楼层 |阅读模式   河南省焦作市
9精币
问题一:如何把 “1天前” 或者 “5天钱”  或者说 N天前 转换为:2024年1月30日 这种日期格式呢?
问题一:如何把  “1小时前” 或者 “15小时前”   转换为:2024年1月30日 这种日期格式呢?

最佳答案

查看完整内容

应该满足正常的中文的逻辑时间增减处理了 [e=1].版本 2 .支持库 spec .程序集 程序集1 .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行 调试输出 (时间_增减 (“1天前”)) 调试输出 (时间_增减 (“5天钱”)) ' 找到“前”则减时间,否则加时间 调试输出 (时间_增减 (“7天前”)) 调试输出 (时间_增减 (“1小时前”)) 调试输出 (时间_增减 (“15小时前”)) 调试输出 (时间_增减 (“1年2小时前”)) 调试输出 (时间 ...

回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳

结帖率:100% (53/53)

签到天数: 15 天

发表于 2024-2-5 21:20:27 | 显示全部楼层   福建省宁德市
应该满足正常的中文的逻辑时间增减处理了
  
窗口程序集名保 留  保 留备 注
程序集1   
子程序名返回值类型公开备 注
_启动子程序整数型 本子程序在程序启动后最先执行
调试输出 (时间_增减 (“1天前”))
调试输出 (时间_增减 (“5天钱”))  ' 找到“前”则减时间,否则加时间
调试输出 (时间_增减 (“7天前”))
调试输出 (时间_增减 (“1小时前”))
调试输出 (时间_增减 (“15小时前”))
调试输出 (时间_增减 (“1年2小时前”))
调试输出 (时间_增减 (“1年2小时后”))
' 开始运行被调试程序
' * [2024年2月4日22时11分1秒]
' * [2024年2月10日22时11分1秒]
' * [2024年1月29日22时11分1秒]
' * [2024年2月5日21时11分1秒]
' * [2024年2月5日7时11分1秒]
' * [2023年2月5日20时11分1秒]
' * [2025年2月6日0时11分1秒]
返回 (0)  ' 可以根据您的需要返回任意数值
子程序名返回值类型公开备 注
时间_增减日期时间型 
参数名类 型参考可空数组备 注
逻辑时间文本文本型时间文本可以包含:年季月周日时分秒 或 年份、季度、月份、周、天、小时、分钟、秒
变量名类 型静态数组备 注
逻辑时间文本长度整数型 
终止位置整数型 
年季月周日时分秒整数型8
是否有前逻辑型 
现行时间日期时间型 
I整数型 
关键字数组文本型0
逻辑时间文本长度 = 取文本长度 (逻辑时间文本)
关键字数组 = { “年份”, “季度”, “月份”, “周”, “天”, “小时”, “分钟”, “秒” }
计次循环首 (取数组成员数 (关键字数组), I)
终止位置 = 寻找文本 (逻辑时间文本, 关键字数组 [I], , )
如果真 (终止位置 ≠ -1)
年季月周日时分秒 [I]_倒找整数 (逻辑时间文本, 终止位置 - 1)

计次循环尾 ()
关键字数组 = { “年”, “季”, “月”, “周”, “日”, “时”, “分”, “秒” }
计次循环首 (取数组成员数 (关键字数组), I)
终止位置 = 寻找文本 (逻辑时间文本, 关键字数组 [I], , )
如果真 (终止位置 ≠ -1)
年季月周日时分秒 [I]_倒找整数 (逻辑时间文本, 终止位置 - 1)

计次循环尾 ()
如果真 (寻找文本 (逻辑时间文本, “前”, , ) ≠ -1)
是否有前 = 真

现行时间 = 取现行时间 ()
计次循环首 (取数组成员数 (年季月周日时分秒), I)
判断 (是否有前 = )
现行时间 = 增减时间 (现行时间, I, -年季月周日时分秒 [I])
现行时间 = 增减时间 (现行时间, I, 年季月周日时分秒 [I])

计次循环尾 ()
返回 (现行时间)
子程序名返回值类型公开备 注
_倒找整数整数型 
参数名类 型参考可空数组备 注
逻辑时间文本文本型
终止位置整数型
变量名类 型静态数组备 注
I整数型 
代码整数型 
整数文本文本型 
变量循环首 (终止位置, 1, -1, I)
代码 = 取代码 (逻辑时间文本, I)
判断 (代码 ≥ #键0 代码 ≤ #键9 )
整数文本 = 字符 (代码) + 整数文本
判断 (代码 = #空格键 取文本长度 (整数文本) = 0)

跳出循环 ()

变量循环尾 ()
返回 (到整数 (整数文本))


i支持库列表   支持库注释   
spec特殊功能支持库

评分

参与人数 2精币 +2 荣誉 +1 收起 理由
笨潴 + 1 热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻!
396384183 + 2 你好,后面的可以如何直接把时分秒去掉呢,只要年月日

查看全部评分

回复

使用道具 举报

结帖率:64% (7/11)

签到天数: 14 天

 楼主| 发表于 2024-2-5 21:21:12 | 显示全部楼层   河南省焦作市
想要个具体的例子 非常感谢 ,我只知道  调试输出 (“昨天:” + 时间_到文本 (增减时间 (时间, 5, -1), , 1))
回复

使用道具 举报

结帖率:100% (4/4)
发表于 2024-2-5 21:28:09 | 显示全部楼层   河南省焦作市
  
变量名类 型静态数组备 注
时间日期时间型 
' 被增减的部分 1、#年份; 2、#季度; 3、#月份; 4、#周; 5、#日; 6、#小时; 7、#分钟; 8、#秒。
时间 = 增减时间 (取现行时间 (), 5, -1)
调试输出 (到文本 (时间))


i支持库列表   支持库注释   
spec特殊功能支持库

评分

参与人数 1好评 +1 精币 +1 收起 理由
396384183 + 1 + 1 YYDS~!

查看全部评分

回复

使用道具 举报

结帖率:100% (20/20)

签到天数: 17 天

发表于 2024-2-5 21:48:35 | 显示全部楼层   浙江省杭州市
  
子程序名返回值类型公开备 注
test  
变量名类 型静态数组备 注
str文本型 
dltS整数型 
str = “1小时前”
dltS = 到整数 (str)
判断 (寻找文本 (str, “分钟”, , ) ≠ -1)
dltS = dltS × 60
判断 (寻找文本 (str, “小时”, , ) ≠ -1)
dltS = dltS × 3600
判断 (寻找文本 (str, “天”, , ) ≠ -1)
dltS = dltS × 3600 × 24
调试输出 (“没有条件的判断条件”)
如果真 (寻找文本 (str, “前”, , ) ≠ -1)
dltS = -dltS
调试输出 (dltS)
调试输出 (timedelta (取现行时间 (), dltS))
调试输出 (timedelta ([2024年1月10日12时13分14秒], dltS))
' * -3600
' * [2024年2月5日20时47分21秒]
' * [2024年1月10日11时13分14秒]
' 被调试易程序运行完毕
子程序名返回值类型公开备 注
timedelta日期时间型 
参数名类 型参考可空数组备 注
now日期时间型
deltaS整数型增量秒数
返回 (增减时间 (now, #秒, deltaS))


i支持库列表   支持库注释   
spec特殊功能支持库

评分

参与人数 1好评 +1 精币 +1 收起 理由
396384183 + 1 + 1 YYDS~!

查看全部评分

回复

使用道具 举报

结帖率:100% (4/4)
发表于 2024-2-5 21:57:38 | 显示全部楼层   河南省焦作市
1752328925 发表于 2024-2-5 21:28
[e=1].版本 2
.支持库 spec

调试输出 (到文本 (取日期 (增减时间 (取现行时间 (), 5, -1))))
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表