找回密码
 加入
搜索
查看: 2028|回复: 5

[AU3基础] [已解决]怎么能查出当前月的最大日期

[复制链接]
发表于 2016-11-10 19:52:19 | 显示全部楼层 |阅读模式
本帖最后由 xuanniao110 于 2016-11-11 09:04 编辑

怎么能查出当前月的最大日期呢     比如这个月是11月    而在这个月中最大日期为30号    怎么来获取到这个30号呢   因为我要写个时间进度    也就是    当前10号/30号   现在就是这个30号不知道怎么获取  有知道的朋友给个例子好么   谢谢
发表于 2016-11-11 00:31:22 | 显示全部楼层
MsgBox(0, '当年当月', _GetMDay())
MsgBox(0, '当年二月', _GetMDay(2))
MsgBox(0, '15年二月', _GetMDay(2, 2015))

Func _GetMDay($iMON = @MON, $iYEAR = @YEAR)
        ;$iMON - 月份(默认当月), $iYEAR - 年份(默认当年)
        If $iMON < 1 Or $iMON > 12 Or $iYEAR < 1 Then Return SetError(1)
        Local $aMon[13] = ['', 31, 0, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31]
        If $iMON <> 2 Then Return $aMon[$iMON]
        If Mod($iYEAR, 4) Then Return 28
        If Not Mod($iYEAR, 100) And Mod($iYEAR, 400) Then Return 28
        Return 29
EndFunc   ;==>_GetMDay

评分

参与人数 1金钱 +10 收起 理由
haijie1223 + 10 表驱动法

查看全部评分

发表于 2016-11-11 07:44:17 | 显示全部楼层
#include <date.au3>
MsgBox(0,"",StringMid(_DateAdd('D',-StringMid(_NowCalcDate(),9,2),_dateadd('M',1,_NowCalc())),9,2))
 楼主| 发表于 2016-11-11 09:04:15 | 显示全部楼层
回复 2# afan


谢谢大版主    非常感谢
 楼主| 发表于 2016-11-11 09:04:35 | 显示全部楼层
回复 3# h20040606


兄弟   谢谢你
发表于 2016-11-11 22:58:30 | 显示全部楼层
回复 5# xuanniao110

有高手出手了 呵呵
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-25 14:14 , Processed in 0.080321 second(s), 25 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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