社区
VB基础类
帖子详情
如何判定现在的日期是星期几,在线等,急!
wpp9999
2004-09-11 05:08:35
如何判定现在的日期是星期几,在线等,急!
...全文
216
9
打赏
收藏
如何判定现在的日期是星期几,在线等,急!
如何判定现在的日期是星期几,在线等,急!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
iiboy
2004-09-11
打赏
举报
回复
楼上正解
Weekday(date, [firstdayofweek])
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
===========
dim xx as integer
xx=Weekday(Date())
select case xx
case 1
'星期日
case 2
'星期一
....
case 7
'星期六
end select
northwolves
2004-09-11
打赏
举报
回复
Private Sub Command1_Click()
MsgBox DateAdd("d", -Weekday(Date, vbSunday), Date) & "--->" & DateAdd("d", 7 - Weekday(Date, vbSunday), Date), 0, "this week"
End Sub
wpp9999
2004-09-11
打赏
举报
回复
多谢上面各位的指教,有眉目了!
脆皮大雪糕
2004-09-11
打赏
举报
回复
举个例子
Debug.Print WeekdayName(Weekday(Date)) '
脆皮大雪糕
2004-09-11
打赏
举报
回复
WeekdayName函数
描述
返回一个字符串,表示一星期中的某天。
语法
WeekdayName(weekday, abbreviate, firstdayofweek)
WeekdayName函数语法有如下几部分:
部分 描述
weekday 必需的。数字值,表示一星期中的某天。该数字值要依赖于firstdayofweek设置中的设置值来决定。
abbreviate 可选的。Boolean值,表示星期的名称是否被缩写。如果忽略该值,缺省值为False,表明星期的名称不能被缩写。
firstdayofweek 可选的。数字值,表示一星期中第一天。关于其值,请参阅“设置值”部分。
设置值
firstdayofweek参数值如下:
常数 值 描述
vbUseSystem 0 使用本国语言支持 (NLS) API设置值。
vbSunday 1 星期日(缺省)。
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
脆皮大雪糕
2004-09-11
打赏
举报
回复
Weekday 函数
返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几。
语法
Weekday(date, [firstdayofweek])
Weekday 函数语法有下列的命名参数:
部分 描述
date 必要。能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。
Firstdayofweek 可选。指定一星期第一天的常数。如果未予指定,则以 vbSunday 为缺省值。
设置
firstdayofweek 参数有以下设定值:
常数 值 描述
vbUseSystem 0 使用 NLS API 设置。
VbSunday 1 星期日(缺省值)
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
返回值
Weekday 函数可以返回以下诸值:
常数 值 描述
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
viena
2004-09-11
打赏
举报
回复
返回值
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
wpp9999
2004-09-11
打赏
举报
回复
也就是通过现在的日期来判定这个日期所在的一周的时间范围
viena
2004-09-11
打赏
举报
回复
Weekday(date)
!!长尾理论!!
传统的市场曲线是符合80/20铁律的,为了抢夺那带来80% 利润的畅销品市场,我们厮杀得天昏地暗,但是我们所谓的热门商品正越来越名不副实,比如说黄金电视节目的收视率几十年来一直在萎缩,若放在1970年,
现在
的一...
逻辑思维训练500题(修订版)
不过,总体来说,逻辑思维能力的培养要从激发一个人的思维动机,理清一个人的思维脉络,培养正确的思维方法几个方面逐步做起。 人的思维是有动机的,当你有某方面的动机时,你的思维才会得到开发和运用。因此,...
携程校招内部推荐-----简历直通+Offer优先发放!!!
#美团(1572)# 美团基础研发平台上 #美团# 美团基础研发平台上周五一面的,
现在
还无二面通知,是已经凉了吗 许愿:意向快到碗里来 许愿:意向快到碗里来 腾讯hr面状态一个
星期
了还没约 是不是已经凉了啊,我的腾腾,...
鸟哥的Linux私房菜(服务器)- 第二十章、WWW 伺服器
最近更新
日期
:2011/08/05 我們最常講的『架站』其實就是架設一個 Web 網站啦!那麼什麼是 Web 呢?那就是全球資訊廣播的意思 (World Wide Web),或者也可以稱之為互連網吧!這個是我們目前的人類最常...
逻辑思维训练
不过,总体来说,逻辑思维能力的培养要从激发一个人的思维动机,理清一个人的思维脉络,培养正确的思维方法几个方面逐步做起。 人的思维是有动机的,当你有某方面的动机时,你的思维才会得到开发和运用。因此,激发...
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章