最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 程序提示中午好,上午好程序
时间:2022-07-02 22:36:38 编辑:袖梨 来源:一聚教程网
function jdsj()
n = cstr(right(year(date()),2)) + "-"
y = cstr(month(date())) + "-"
if len(y) = 2 then y = "0" + y
r = cstr(day(date()))
if len(r) = 1 then r = "0" + r
h = cstr(hour(now())) + "-"
if len(h) = 2 then h = "0" + h
f = cstr(minute(now()))
if len(f) = 1 then f = "0" + f
jdsj = n + y + r + " " + h + f
end function
xxsj = cstr(year(date())) + "年" + cstr(month(date())) + "月" + cstr(day(date())) + "日 " + weekdayname(weekday(now))
Function WHY()
mytime = hour(now())
if mytime>=5 and mytime<9 then why = "早上好!"
if mytime>=9 and mytime<11 then why = "上午好!"
if mytime>=11 and mytime<13 then why = "中午好!"
if mytime>=13 and mytime<18 then why = "下午好!"
if mytime>=18 and mytime<24 then why = "晚上好!"
if mytime>=00 and mytime<5 then why = "挺晚了,注意休息啊!"
End Function
相关文章
- 大奉打更人手游平民职业怎么选 最适合平民的四大职业推荐 07-08
- 顶级专家发布重大看涨以太坊(ETH)预测 07-08
- 碳碳岛配额怎么安排 配额管理技巧详解 07-08
- 洛克王国世界内测资格怎么申请 内测资格获取方法 07-08
- 王者荣耀世界什么时候公测 最新公测时间介绍 07-08
- 金铲铲之战s14战略超频猫阵容搭配指南 07-08