[求助]计算明天日期的新思路
 

[求助]计算明天日期的新思路
www.dimcax.com
[求助]计算明天日期的新思路
正规的算法是根据月份判断日期 如果遇到2月29还要判断闰年
我很懒 方法是直接设置系统时间看看是否修改成功 直到修改成功就是下一天
代码如下:
通过工具菜单->加载应用程序 可加载该程序，然后可直接在命令行输入相关命令运行。如需要每次启动时均加载该程序，则可以将该文件放在启动组中。
文件预览:
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.
月底跳转的部分缺一句日期没有修改成功cmd就自动退出(目前可以去掉wsh.run的等待)
我在考虑是结束进程还是别的方法
dos编程不太熟 正在研究
不知道哪位高人有好的办法
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.
怎么不用dateadd函数，直接dateadd("d",1,date)

d
多谢明总指点
晕了 vb不会真吃亏啊
学习！
debug.print dateadd("d", 1, date)
唉白写了
命令: date
wed
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.
(vla-eval (vlax-get-acad-object)(strcat "msgbox " "(dateadd(\"d\", 1, date))"))
结贴
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.