有每天带生肖日历?
现在日历本上每天每一个时辰都有生肖.<吉、凶、中>
好多人都在用,运势日历到底是干嘛用的
一款关于自己的私人日历,会告诉你每天适合做什么,可以在各大应用市场下载
怎么在手机日历中全部显示日期
下载个中华万年历
手机日历不显示怎么弄出来
以小米手机系列的小米8手机为例,让其显示日历的步骤如下:
1、第一步打开手机桌面上的设置选项.
2、打开设置页面之后,点击进入"锁屏、密码和指纹"选项,如下图.
3、在锁屏、密码和指纹中,打开"锁屏显示农历"后面的开关按钮,如下图所示.
4、打开成功之后,即可使小米手机显示日历.
2019年日历函数
自定义函数,calendar,将此段代码复制到模块中
计算时间:从21年2月8日到2020年的数据可以转换成农历
option explicit
dim
weekname(7), monthadd(11), nonglidata(120), tiangan(9), dizhi(11), shuxiang(11), dayname(30), monname(12)
dim curtime, curyear, curmonth, curday, curweekday
dim gonglistr, weekdaystr, nonglistr, nonglidaystr
dim i, m, n, k, isend, bit, thedate, num1, num2
dim year, month, day, grid, grid_date
function calendar(grid)
grid_date = grid
year = mid(grid_date, 1, 4)
num1 = instr(grid_date, "-")
num2 = instr(6, grid_date, "-")
if (num2 - num1) = 3 then
month = mid(grid_date, 6, 2)
day = mid(grid_date, 9, 2)
else
month = mid(grid_date, 6, 1)
day = mid(grid_date, 8, 2)
end if
'星期名
weekname(0) = " * "
weekname(1) = "星期日"
weekname(2) = "星期一"
weekname(3) = "星期二"
weekname(4) = "星期三"
weekname(5) = "星期四"
weekname(6) = "星期五"
weekname(7) = "星期六"
'天干名称
tiangan(0) = "甲"
tiangan(1) = "乙"
tiangan(2) = "丙"
tiangan(3) = "丁"
tiangan(4) = "戊"
tiangan(5) = "己"
tiangan(6) = "庚"
tiangan(7) = "辛"
tiangan(8) = "壬"
tiangan(9) = "癸"
'地支名称
dizhi(0) = "子"
dizhi(1) = "丑"
dizhi(2) = "寅"
dizhi(3) = "卯"
dizhi(4) = "辰"
dizhi(5) = "巳"
dizhi(6) = "午"
dizhi(7) = "未"
dizhi(8) = "申"
dizhi(9) = "酉"
dizhi(10) = "戌"
dizhi(11) = "亥"
'属相名称
shuxiang(0) = "鼠"
shuxiang(1) = "牛"
shuxiang(2) = "虎"
shuxiang(3) = "兔"
shuxiang(4) = "龙"
shuxiang(5) = "蛇"
shuxiang(6) = "马"
shuxiang(7) = "羊"
shuxiang(8) = "猴"
shuxiang(9) = "鸡"
shuxiang(10) = "狗"
shuxiang(11) = "猪"
'农历日期名
dayname(0) = "*"
dayname(1) = "初一"
dayname(2) = "初二"
dayname(3) = "初三"
dayname(4) = "初四"
dayname(5) = "初五"
dayname(6) = "初六"
dayname(7) = "初七"
dayname(8) = "初八"
dayname(9) = "初九"
dayname(10) = "初十"
dayname(11) = "十一"
dayname(12) = "十二"
dayname(13) = "十三"
dayname(14) = "十四"
dayname(15) = "十五"
dayname(16) = "十六"
dayname(17) = "十七"
dayname(18) = "十八"
dayname(19) = "十九"
dayname(20) = "二十"
dayname(21) = "二十一"
dayname(22) = "二十二"
dayname(23) = "二十三"
dayname(24) = "二十四"
dayname(25) = "二十五"
dayname(26) = "二十六"
dayname(27) = "二十七"
dayname(28) = "二十八"
dayname(29) = "二十九"
dayname(30) = "三十"
'农历月份名
monname(0) = "*"
monname(1) = "正"
monname(2) = "二"
monname(3) = "三"
monname(4) = "四"
monname(5) = "五"
monname(6) = "六"
monname(7) = "七"
monname(8) = "八"
monname(9) = "九"
monname(10) = "十"
monname(11) = "十一"
monname(12) = "腊"
'公历每月前面的天数
monthadd(0) = 0
monthadd(1) = 31
monthadd(2) = 59
monthadd(3) = 90
monthadd(4) = 120
monthadd(5) = 151
monthadd(6) = 181
monthadd(7) = 212
monthadd(8) = 243
monthadd(9) = 273
monthadd(10) = 304
monthadd(11) = 334
'农历数据
nonglidata(0) = 2635
nonglidata(1) =
nonglidata(2) = 1701
nonglidata(3) = 1748
nonglidata(4) =
nonglidata(5) = 694
nonglidata(6) = 2391
nonglidata(7) =
nonglidata(8) = 1175
nonglidata(9) =
nonglidata(10) = 3402
nonglidata(11) = 3749
nonglidata(12) =
nonglidata(13) = 1453
nonglidata(14) = 694
nonglidata(15) =
nonglidata(16) = 2350
nonglidata(17) =
nonglidata(18) = 3221
nonglidata(19)