TC官方合作论坛

标题: 想写个日期的tll，结果到处碰壁~~~ [打印本页]
作者: xiaoling2013    时间: 2015-12-17 15:08
标题: 想写个日期的tll，结果到处碰壁~~~

//求大神指教

变量 日期串,长度,日期变量
功能 按钮0_点击()
    昨天("2015-1-31")
结束
功能 昨天(今天日期,格式="2015-12-12",返回昨日日期="假")
    字符串分割(今天日期,"-",日期串)
    如果(数组大小(日期串)!=3)
        消息框("日期格式错误","格式:2015-12-12")
        返回 0
    结束
    选择(日期串[1])
        条件 1
        如果(日期串[2]==1)
            日期串[0]=日期串[0]-1
            日期串[1]=12
            日期串[2]=31
            消息框(日期串[1])
            返回 日期串[0]&"-"&日期串[1]&"-"&日期串[2]
        否则
            返回 日期串[0]&"-"&日期串[1]&"-"&日期串[2]-1
        结束
    结束
结束
作者: 言术    时间: 2015-12-17 15:21
  1. 变量 日期串=数组(),大小,日期变量
  2. 功能 按钮0_点击()
  3.     昨天("2015-1-31")
  4. 结束

  6. 功能 昨天(今天日期,格式="2015-12-12",返回昨日日期="假")
  7.     大小=字符串分割(今天日期,"-",日期串)
  8.     如果(大小!=3)
  9.         消息框("日期格式错误","格式:2015-12-12")
  10.         返回 0
  11.     结束
  12.     选择(日期串[1])//1
  13.         条件 1
  14.         如果(日期串[2]==1)//日期串[2]=31
  15.             日期串[0]=日期串[0]-1//2014
  16.             日期串[1]=12
  17.             日期串[2]=31
  18.             消息框(日期串[1])//12
  19.             返回 日期串[0]&"-"&日期串[1]&"-"&日期串[2]
  20.         否则
  21.             返回 日期串[0]&"-"&日期串[1]&"-"&日期串[2]-1
  22.         结束
  23.     结束
  24. 结束
复制代码
作者: xiaoling2013    时间: 2015-12-17 15:40
言术 发表于 2015-12-17 15:21

结果还是一样
作者: 言术    时间: 2015-12-17 15:46
xiaoling2013 发表于 2015-12-17 15:40
结果还是一样

你把想要的功能描述一下，比如功能 昨天()  传入什么参数，返回什么参数。
作者: 言术    时间: 2015-12-17 15:53

加个括号试试

作者: xiaoling2013    时间: 2015-12-17 15:57
言术 发表于 2015-12-17 15:46
你把想要的功能描述一下，比如功能 昨天()  传入什么参数，返回什么参数。 ...

算出昨天的日期，昨天（2008-3-1）返回昨天的日期2008-2-29
作者: xiaoling2013    时间: 2015-12-17 16:09
言术 发表于 2015-12-17 15:53
加个括号试试

晚上回家试试，谢谢了。




欢迎光临 TC官方合作论坛 (http://52tc.info/) Powered by Discuz! X3.4