一个很简单的问题 通常只有高手才能解答

好色男人

期限 ＝ 取文本左边A (期限, 8)
期限=20135182                ’‘’2013年5月18日2时


如果这个时间是  2013 年 11月18日
那么就是
期限=取文本左边A (期限, 8)
期限=20131118

如果这个时间是 2013年1月1日
期限=取文本左边A（期限，8）
期限=201311XX          ‘’‘’2013年1月1日X时X分

应该能看懂了吧，我表达的可能不太清楚。。



.子程序 取文本左边A, 文本型, 公开, 一个文本内容取左边内容
.参数 内容, 文本型
.参数 多少个, 整数型
.局部变量 文本, 文本型
.局部变量 I, 整数型
.局部变量 X, 整数型
.局部变量 结果S, 文本型

文本 ＝ 内容
I ＝ 多少个
.变量循环首 (1, 取文本长度 (文本), 1, X)
    结果S ＝ 取文本左边 (文本, I)
.变量循环尾 ()
返回 (结果S)

孤心人

好色男人 发表于 2013-5-18 08:08
意思大概就是  
  假如我时间是 2013年1月1日X时X分  成为整数后就是 201311XX    如何在1月1日前添加0？成 ...

.版本 2

输出调试文本 (到文本 (取年份 (取现行时间 ())) ＋ 选择 (取文本长度 (到文本 (取月份 (取现行时间 ()))) ＝ 1, “0” ＋ 到文本 (取月份 (取现行时间 ())), 到文本 (取月份 (取现行时间 ()))) ＋ 选择 (取文本长度 (到文本 (取日 (取现行时间 ()))) ＝ 1, “0” ＋ 到文本 (取日 (取现行时间 ())), 到文本 (取日 (取现行时间 ()))))

好色男人

意思大概就是  
  假如我时间是 2013年1月1日X时X分  成为整数后就是 201311XX    如何在1月1日前添加0？成为  20130101  八个数字   或者在  2013528X  2013年5月18日X时  成为 20130528  
  这么说  应该能看懂了吧

好色男人

孤心人 发表于 2013-5-18 08:19
.版本 2

输出调试文本 (到文本 (取年份 (取现行时间 ())) ＋ 选择 (取文本长度 (到文本 (取月份 (取现 ...

好吧  你赢了  给你了