首页

58问答库 > vb中如何获取每个月的第一天是星期几

vb中如何获取每个月的第一天是星期几

2024-11-28 11:52:17

推荐回答（2个）

回答（1）：

Sub Fweekday()

Dim Firstday As Date

For i = 1 To 12
Firstday = Year(Now) & "-" & i
Print Firstday & "是星期" & weekday(Firstday, vbMonday)
Next

End Sub

回答（2）：

用weekday函数。
print weekday("2009-5-1")-1 'weekday返回的数比正常多一。
也可以用变量：
r="2009"
s="5"
print weekday(r & "-" & s & "-1")-1

相关问答

vb如何取出日期所在周的第一天

为什么vb获取星期几时要减一

VB怎样获取指定年月的天数

VB中怎样根据日期来设置周次,怎样自定义设置,如我要设置礼拜...

VB6.0 要得到某一周是从哪一天开始的,哪一天结束的？

vb编程计算某年某月某日是星期几

VB中如何表示下个月的第一天和本月最后一天？

怎么用EXCEL VBA算任何一天是星期几

最新问答

vb中如何获取每个月的第一天是星期几

大疆御air如何使用

常见的发电方式有哪几种

苹果手机的屏幕摔碎了，但是开机能显示，不能触屏来打开相应软件，应该怎么办

我是大二的。马上要考有机化学上学期的期末了。我想问问河北工业大学每年的有机化学都重点考哪几章啊？

手机qq2008下载

美能达7622复印机提示卡纸打开双面器（但是里面没纸了，取出来了！）

请问成都的公交线路？？？

适合学日语的漫画(动漫也可以)有什么

裤子面料的门幅一般是多少厘米？应采购门幅多少的坯布？