开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 3187|回复: 30
收起左侧

[易源码分享] 易语言日期处理类 特别适合处理股票交易

[复制链接]
结帖率:86% (18/21)
发表于 2023-1-14 19:02:35 | 显示全部楼层 |阅读模式   河南省郑州市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
本帖最后由 sksksz 于 2023-1-14 19:15 编辑

下载前麻烦来个精币打赏

  
窗口程序集名保 留  保 留备 注
类_日期处理   
变量名类 型数组备 注
节假日文本型0 

子程序名返回值类型公开备 注
_初始化 当基于本类的对象被创建后,此方法会被自动调用
如果真 (初始化 () < 1)
信息框 (“模块 日期处理 无法获取节假日期,请检查网络畅通”, 0, 到文本 ({  }), )
结束 ()

子程序名返回值类型公开备 注
_销毁 当基于本类的对象被销毁前,此方法会被自动调用

子程序名返回值类型公开备 注
初始化整数型 
变量名类 型静态数组备 注
数据文本型 
数组1文本型0
临时日期文本型 
i整数型 
清除数组 (节假日)
数据 = 到文本 (HTTP读文件 (“http://116.63.67.184:7702/&func=get-jdate”))
数组1 = 分割文本 (数据, #换行符, )
计次循环首 (取数组成员数 (数组1), i)
临时日期 = 取文本左边 (数组1 [i], 8)
' 如果真 (取文本长度 (文本区分_只取数字 (临时日期)) = 8)
加入成员 (节假日, 临时日期)
计次循环尾 ()
返回 (取数组成员数 (节假日))
子程序名返回值类型公开备 注
是否为实时逻辑型 
参数名类 型参考可空数组备 注
日期日期时间型
如果真 (取简洁洁日期2 (交易日增减 (取现行时间 (), 0)) = 取简洁洁日期2 (交易日增减 (日期, 0)))
返回 ()
返回 ()
子程序名返回值类型公开备 注
是否为交易日逻辑型 
变量名类 型静态数组备 注
时间日期时间型 
时间 = 取现行时间 ()
如果真 (是否为工作日 (时间) 是否为节假日 (时间))
返回 ()
返回 ()
子程序名返回值类型公开备 注
是否为开盘时间逻辑型 
如果真 (时间是否大于等于 (9, 15, 0) 时间是否小于等于 (15, 0, 0))
返回 ()
返回 ()
子程序名返回值类型公开备 注
交易日增减日期时间型 
参数名类 型参考可空数组备 注
原日期日期时间型
增减值整数型
变量名类 型静态数组备 注
增减标记整数型 
增减计次整数型 
临时日期日期时间型 
判断 (增减值 ≥ 1)
增减标记 = 1
判断 (增减值 ≤ -1)
增减标记 = -1
判断 (增减值 = 0)
如果真 (是否为工作日 (原日期) 是否为节假日 (原日期))
增减值 = -1
增减标记 = -1

返回 (原日期)
临时日期 = 原日期
判断循环首 (增减计次 < 取绝对值 (增减值))
临时日期 = 增减时间 (临时日期, #日, 增减标记)
如果真 (是否为工作日 (临时日期) 是否为节假日 (临时日期))
增减计次 = 增减计次 + 1

判断循环尾 ()
返回 (临时日期)
子程序名返回值类型公开备 注
取简洁日期1文本型 2020-06-06
参数名类 型参考可空数组备 注
日期日期时间型
变量名类 型静态数组备 注
文本型 
文本型 
文本型 
年 = 到文本 (取年份 (日期))
月 = 到文本 (取月份 (日期))
日 = 到文本 (取日 (日期))
如果真 (取文本长度 () = 1)
月 = “0” + 月
如果真 (取文本长度 () = 1)
日 = “0” + 日
返回 (年 + “-” + 月 + “-” + 日)
子程序名返回值类型公开备 注
取简洁洁日期2文本型 20200606
参数名类 型参考可空数组备 注
日期日期时间型
变量名类 型静态数组备 注
文本型 
文本型 
文本型 
年 = 到文本 (取年份 (日期))
月 = 到文本 (取月份 (日期))
日 = 到文本 (取日 (日期))
如果真 (取文本长度 () = 1)
月 = “0” + 月
如果真 (取文本长度 () = 1)
日 = “0” + 日
返回 (年 + 月 + 日)
子程序名返回值类型公开备 注
取简洁年月日N文本型 
参数名类 型参考可空数组备 注
日期日期时间型
分割文本型分割符
变量名类 型静态数组备 注
文本型 
文本型 
文本型 
年 = 到文本 (取年份 (日期))
月 = 到文本 (取月份 (日期))
日 = 到文本 (取日 (日期))
如果真 (取文本长度 () = 1)
月 = “0” + 月
如果真 (取文本长度 () = 1)
日 = “0” + 日
返回 (年 + 分割 + 月 + 分割 + 日)
子程序名返回值类型公开备 注
是否为工作日逻辑型 
参数名类 型参考可空数组备 注
日期日期时间型
如果真 (取星期几 (日期) ≠ 7 取星期几 (日期) ≠ 1)
返回 ()
返回 ()
子程序名返回值类型公开备 注
是否为节假日逻辑型 
参数名类 型参考可空数组备 注
日期日期时间型
变量名类 型静态数组备 注
日期文本文本型 
i整数型 
日期文本 = 取简洁洁日期2 (日期)
计次循环首 (取数组成员数 (节假日), i)
如果真 (日期文本 = 节假日 [i])
返回 ()

计次循环尾 ()
返回 ()
子程序名返回值类型公开备 注
时间是否大于等于逻辑型 
参数名类 型参考可空数组备 注
整数型
整数型
整数型
参时间日期时间型
变量名类 型静态数组备 注
现行时间日期时间型 
原始时间日期时间型 
当前时间日期时间型 
当前时间戳长整数型 
原始时间戳长整数型 
判断 (是否为空 (参时间))
现行时间 = 取现行时间 ()
现行时间 = 参时间

原始时间 = 指定时间 (2000, 1, 1, 时, 分, 秒)
当前时间 = 指定时间 (2000, 1, 1, 取小时 (现行时间), 取分钟 (现行时间), 取秒 (现行时间))
当前时间戳 = 时间转时间戳 (当前时间)  ' 到整数 (时间_到时间戳 (当前时间, 真, ))
原始时间戳 = 时间转时间戳 (原始时间)  ' 到整数 (时间_到时间戳 (原始时间, 真, ))
如果真 (当前时间戳 ≥ 原始时间戳)
返回 ()
返回 ()
子程序名返回值类型公开备 注
时间是否小于等于逻辑型 
参数名类 型参考可空数组备 注
整数型
整数型
整数型
参时间日期时间型
变量名类 型静态数组备 注
现行时间日期时间型 
原始时间日期时间型 
当前时间日期时间型 
当前时间戳长整数型 
原始时间戳长整数型 
判断 (是否为空 (参时间))
现行时间 = 取现行时间 ()
现行时间 = 参时间

' 现行时间 = 取现行时间 ()
原始时间 = 指定时间 (2000, 1, 1, 时, 分, 秒)
当前时间 = 指定时间 (2000, 1, 1, 取小时 (现行时间), 取分钟 (现行时间), 取秒 (现行时间))
当前时间戳 = 时间转时间戳 (当前时间)  ' 到整数 (时间_到时间戳 (当前时间, 真, ))
原始时间戳 = 时间转时间戳 (原始时间)  ' 到整数 (时间_到时间戳 (原始时间, 真, ))
如果真 (当前时间戳 ≤ 原始时间戳)
返回 ()
返回 ()
子程序名返回值类型公开备 注
时间转时间戳长整数型 
参数名类 型参考可空数组备 注
时间日期时间型
返回 (取时间间隔 (时间, [1970年1月1日8时], #秒 ))
子程序名返回值类型公开备 注
时间戳转时间日期时间型 
参数名类 型参考可空数组备 注
时间戳长整数型
返回 (增减时间 ([1970年1月1日8时], #秒, 时间戳))
子程序名返回值类型公开备 注
取简洁时分文本型 
参数名类 型参考可空数组备 注
时间日期时间型
变量名类 型静态数组备 注
文本型 
文本型 
文本文本型 
时 = 到文本 (取小时 (时间))
分 = 到文本 (取分钟 (时间))
如果真 (取文本长度 () = 1)
时 = “0” + 时
如果真 (取文本长度 () = 1)
分 = “0” + 分
文本 = 时 + “:” + 分
返回 (文本)
子程序名返回值类型公开备 注
取简洁时分秒文本型 
参数名类 型参考可空数组备 注
时间日期时间型
变量名类 型静态数组备 注
文本型 
文本型 
文本型 
文本文本型 
时 = 到文本 (取小时 (时间))
分 = 到文本 (取分钟 (时间))
秒 = 到文本 (取秒 (时间))
如果真 (取文本长度 () = 1)
时 = “0” + 时
如果真 (取文本长度 () = 1)
分 = “0” + 分
如果真 (取文本长度 () = 1)
秒 = “0” + 秒

文本 = 时 + “:” + 分 + “:” + 秒
返回 (文本)


i支持库列表   支持库注释   
internet互联网支持库

日期处理类.e

14.28 KB, 下载次数: 68, 下载积分: 精币 -2 枚

评分

参与人数 2好评 +2 精币 +8 收起 理由
易语言资源网 + 1 + 3 开源精神必须支持~
小明无敌 + 1 + 5 支持开源~!感谢分享

查看全部评分


结帖率:50% (1/2)
发表于 2023-10-28 23:36:42 | 显示全部楼层   四川省眉山市
谢谢分享。支 持
回复 支持 反对

使用道具 举报

签到天数: 2 天

发表于 2023-10-21 14:34:53 | 显示全部楼层   四川省成都市
回复 支持 反对

使用道具 举报

签到天数: 1 天

发表于 2023-9-30 08:21:03 | 显示全部楼层   天津市天津市
感谢提供,非常不错的
回复 支持 反对

使用道具 举报

发表于 2023-8-29 07:53:05 | 显示全部楼层   广西壮族自治区百色市
希望有用
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)

签到天数: 1 天

发表于 2023-8-22 23:22:12 | 显示全部楼层   广东省珠海市
小小心意,意思一下
回复 支持 反对

使用道具 举报

结帖率:100% (9/9)

签到天数: 6 天

发表于 2023-7-17 22:38:01 | 显示全部楼层   湖北省荆州市
666看看是不是我要的 学习下
回复 支持 反对

使用道具 举报

结帖率:25% (1/4)
发表于 2023-7-15 10:09:02 | 显示全部楼层   福建省厦门市
谢谢分享资源
回复 支持 反对

使用道具 举报

结帖率:50% (2/4)

签到天数: 15 天

发表于 2023-5-10 15:28:27 | 显示全部楼层   广东省深圳市
谢谢分享资源,网址好像失效了
回复 支持 反对

使用道具 举报

结帖率:50% (2/4)

签到天数: 15 天

发表于 2023-5-10 15:28:10 | 显示全部楼层   广东省深圳市
谢谢分享资源
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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