望 集_时间 增加方法 时间_格式化

yezi0524

使用api格式化日期格式。支持自定义返回的时间格式。以下为源码。

由于项目不同，需要时间的格式也不一样 有的时候需要 yyyy-MM-dd 有时候 yy-M-d 这样。自己封装了一下。

.版本 2

.子程序 时间_格式化, 文本型, 公开, y年 M月 d日 H小时 m分钟 s秒
.参数 日期时间, 日期时间型
.参数 日期格式化字符串, 文本型, 可空, 默认 yyyy-MM-dd
.参数 时间格式化字符串, 文本型, 可空, 默认 HH:mm:ss
.局部变量 日期, 文本型
.局部变量 时间, 文本型
.局部变量 St, 系统时间

St.年 ＝ 取年份 (日期时间)
St.月 ＝ 取月份 (日期时间)
St.天 ＝ 取日 (日期时间)
St.星期 ＝ 取星期几 (日期时间)
St.时 ＝ 取小时 (日期时间)
St.分 ＝ 取分钟 (日期时间)
St.秒 ＝ 取秒 (日期时间)
日期 ＝ 取空白文本 (255)
时间 ＝ 取空白文本 (255)
.如果真 (删首尾空 (日期格式化字符串) ＝ “”)
    日期格式化字符串 ＝ “yyyy-MM-dd”
.如果真结束
.如果真 (删首尾空 (时间格式化字符串) ＝ “”)
    时间格式化字符串 ＝ “HH:mm:ss”
.如果真结束
GetDateFormatA (0, 0, St, 日期格式化字符串, 日期, 取文本长度 (日期))
GetTimeFormatA (0, 0, St, 时间格式化字符串, 时间, 取文本长度 (时间))
返回 (日期 ＋ “ ” ＋ 时间)

御风软件

时间_到文本（）

萧阳天

本人模块完整支持区域和时间操作