本文作者:admin

日历网在线_2020年日历带宜忌资料

admin 2021-03-15 23
日历网在线_2020年日历带宜忌资料摘要: 有每天带生肖日历?现在日历本上每天每一个时辰都有生肖.<吉、凶、中>好多人都在用,运势日历到底是干嘛用的一款关于自己的私人日历,会告诉你每天适合做什么,可以在各大应用市场下载怎么在...

  

有每天带生肖日历?

  现在日历本上每天每一个时辰都有生肖.<吉、凶、中>

  

好多人都在用,运势日历到底是干嘛用的

  一款关于自己的私人日历,会告诉你每天适合做什么,可以在各大应用市场下载

  

怎么在手机日历中全部显示日期

  下载个中华万年历

  

手机日历不显示怎么弄出来

  以小米手机系列的小米8手机为例,让其显示日历的步骤如下:

  1、第一步打开手机桌面上的设置选项.

  2、打开设置页面之后,点击进入"锁屏、密码和指纹"选项,如下图.

  3、在锁屏、密码和指纹中,打开"锁屏显示农历"后面的开关按钮,如下图所示.

  4、打开成功之后,即可使小米手机显示日历.

  

2019年日历函数

  自定义函数,calendar,将此段代码复制到模块中

  计算时间:从21年2月8日到2020年的数据可以转换成农历

  option explicit

  dim

日历网在线_2020年日历带宜忌资料

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)

>>>>精品(文文)实时阅读<<<<

文章版权及转载声明

作者:admin本文地址:http://shuangbaotai.net/sbt/36090.html发布于 2021-03-15
文章转载或复制请以超链接形式并注明出处兴趣知识网

阅读
分享