-
等级
本版专家分：0结帖率 100% -
给你个日期，比方说是12号吧，而且还知道是周3？？怎么样算是这个月的第几个星期3，想了很久了没有想出来，小弟是新手请大虾门赐教，分不够在加，在线等啊！！！！！！展开阅读全文
-
等级
本版专家分：2111 -
看1号是星期几，大于等于星期3还是小于星期3。
然后以7天为分隔，算,呵呵。
-
等级
本版专家分：2913 -
Dim WeekName(7), MonthAdd(11), NongliData(99), 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
Private Sub Form_Load()
'获取当前系统时间
curTime = Now()
'星期名
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) = "十?quot;"
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) = 333387
NongliData(2) = 1701
NongliData(3) = 1748
NongliData(4) = 267701
NongliData(5) = 694
NongliData(6) = 2391
NongliData(7) = 133423
NongliData(8) = 1175
NongliData(9) = 396438
NongliData(10) = 3402
NongliData(11) = 3749
NongliData(12) = 331177
NongliData(13) = 1453
NongliData(14) = 694
NongliData(15) = 201326
NongliData(16) = 2350
NongliData(17) = 465197
NongliData(18) = 3221
NongliData(19) = 3402
NongliData(20) = 400202
NongliData(21) = 2901
NongliData(22) = 1386
NongliData(23) = 267611
NongliData(24) = 605
NongliData(25) = 2349
NongliData(26) = 137515
NongliData(27) = 2709
NongliData(28) = 464533
NongliData(29) = 1738
NongliData(30) = 2901
NongliData(31) = 330421
NongliData(32) = 1242
NongliData(33) = 2651
NongliData(34) = 199255
NongliData(35) = 1323
NongliData(36) = 529706
NongliData(37) = 3733
NongliData(38) = 1706
NongliData(39) = 398762
NongliData(40) = 2741
NongliData(41) = 1206
NongliData(42) = 267438
NongliData(43) = 2647
NongliData(44) = 1318
NongliData(45) = 204070
NongliData(46) = 3477
NongliData(47) = 461653
NongliData(48) = 1386
NongliData(49) = 2413
NongliData(50) = 330077
NongliData(51) = 1197
NongliData(52) = 2637
NongliData(53) = 268877
NongliData(54) = 3365
NongliData(55) = 531109
NongliData(56) = 2900
NongliData(57) = 2922
NongliData(58) = 398042
NongliData(59) = 2395
NongliData(60) = 1179
NongliData(61) = 267415
NongliData(62) = 2635
NongliData(63) = 661067
NongliData(64) = 1701
NongliData(65) = 1748
NongliData(66) = 398772
NongliData(67) = 2742
NongliData(68) = 2391
NongliData(69) = 330031
NongliData(70) = 1175
NongliData(71) = 1611
NongliData(72) = 200010
NongliData(73) = 3749
NongliData(74) = 527717
NongliData(75) = 1452
NongliData(76) = 2742
NongliData(77) = 332397
NongliData(78) = 2350
NongliData(79) = 3222
NongliData(80) = 268949
NongliData(81) = 3402
NongliData(82) = 3493
NongliData(83) = 133973
NongliData(84) = 1386
NongliData(85) = 464219
NongliData(86) = 605
NongliData(87) = 2349
NongliData(88) = 334123
NongliData(89) = 2709
NongliData(90) = 2890
NongliData(91) = 267946
NongliData(92) = 2773
NongliData(93) = 592565
NongliData(94) = 1210
NongliData(95) = 2651
NongliData(96) = 395863
NongliData(97) = 1323
NongliData(98) = 2707
NongliData(99) = 265877
'生成当前公历年、月、日 ==> GongliStr
curYear = Year(curTime)
curMonth = Month(curTime)
curDay = Day(curTime)
GongliStr = curYear & "年"
If (curMonth < 10) Then
GongliStr = GongliStr & "0" & curMonth & "月"
Else
GongliStr = GongliStr & curMonth & "月"
End If
If (curDay < 10) Then
GongliStr = GongliStr & "0" & curDay & "日"
Else
GongliStr = GongliStr & curDay & "日"
End If
'生成当前公历星期 ==> WeekdayStr
curWeekday = Weekday(curTime)
WeekdayStr = WeekName(curWeekday)
'计算到初始时间1921年2月8日的天数：1921-2-8(正月初一)
TheDate = (curYear - 1921) * 365 + Int((curYear - 1921) / 4) + curDay + MonthAdd(curMonth - 1) - 38
If ((curYear Mod 4) = 0 And curMonth > 2) Then
TheDate = TheDate + 1
End If
'计算农历天干、地支、月、日
isEnd = 0
m = 0
Do
If (NongliData(m) < 4095) Then
k = 11
Else
k = 12
End If
n = k
Do
If (n < 0) Then
Exit Do
End If
'获取NongliData(m)的第n个二进制位的值
bit = NongliData(m)
For i = 1 To n Step 1
bit = Int(bit / 2)
Next
bit = bit Mod 2
If (TheDate <= 29 + bit) Then
isEnd = 1
Exit Do
End If
TheDate = TheDate - 29 - bit
n = n - 1
Loop
If (isEnd = 1) Then
Exit Do
End If
m = m + 1
Loop
curYear = 1921 + m
curMonth = k - n + 1
curDay = TheDate
If (k = 12) Then
If (curMonth = (Int(NongliData(m) / 65536) + 1)) Then
curMonth = 1 - curMonth
ElseIf (curMonth > (Int(NongliData(m) / 65536) + 1)) Then
curMonth = curMonth - 1
End If
End If
'生成农历天干、地支、属相 ==> NongliStr
NongliStr = "农历" & TianGan(((curYear - 4) Mod 60) Mod 10) & DiZhi(((curYear - 4) Mod 60) Mod 12) & "年"
NongliStr = NongliStr & "(" & ShuXiang(((curYear - 4) Mod 60) Mod 12) & ")"
'生成农历月、日 ==> NongliDayStr
If (curMonth < 1) Then
NongliDayStr = "闰" & MonName(-1 * curMonth)
Else
NongliDayStr = MonName(curMonth)
End If
NongliDayStr = NongliDayStr & "月"
NongliDayStr = NongliDayStr & DayName(curDay)
MsgBox NongliStr & NongliDayStr
End Sub
-
等级
本版专家分：0
-
还是不会写代码？？
-
等级
本版专家分：2913
-
上面这个好用
-
等级
本版专家分：2111
-
反过来也可以。
12－7＝5号 是星期3。
5－7＝－2是星期3，是上个月的了。
所以
12号是第2个星期3。
-
等级
本版专家分：20529 -
12号是周三＝＝＝>5号是周三＝＝＝>1号是周六。。。。其他可知。。。。。
-
等级
本版专家分：0
-
我说错了，他是问是这个月的第几个星期，，不是问第几个星期3？？SORRY
-
等级
本版专家分：0
-
不一样啊，如果1号是星期6，那2号不就是第二个星期了，不对的
- CNN简单实战：pytorch搭建CNN对猫狗图片进行分类
上一篇文章介绍了使用pytorch的Dataset和Dataloader处理图片数据，现在就用处理好的数据对搭建的CNN进行训练以及测试
- 使用pytorch完成kaggle猫狗图像识别
碰巧最近入门了一门非常的深度学习框架：pytorch（如果你对pytorch不甚了解，请点击这里），所以今天我和大家一起用pytorch实现一个图像识别领域的入门项目：猫狗图像识别。 深度学习的基础就是数据，咱们先从数据...
- pytorch实现kaggle猫狗识别（超详细）
碰巧最近入门了一门非常的深度学习框架：pytorch（如果你对pytorch不甚了解，请点击这里），所以今天我和大家一起用pytorch实现一个图像识别领域的入门项目：猫狗图像识别。 深度学习的基础就是数据，咱们先从数据谈...
- 基于pytorch的猫狗分类
基于pytorch实现简单的猫狗分类。采用了全连接网络；可以用来了解数据加载过程，网络搭建、训练过程
- Pytorch--CNN实现kaggle猫狗大战(Dogs vs. Cats)
今天咱们来聊聊用Pytorch的CNN完成kaggle猫狗大战。 话不多说，进入正题。 首先，图片数据来源kaggle，在网站上搜索Dogs vs. Cats很多相关图片集，找一个下载下来。 我这里采用的数据集是： Train：4000张cat + ...
- 使用PyTorch实现CNN
使用PyTorch实现CNN 文章目录使用PyTorch实现CNN1. 导入所需包：2. 获取数据集2.1 获取数据集，并对数据集进行预处理2.2 获取迭代数据：`data.DataLoader()`3. 定义网络结构4. 定义损失和优化器`model.parmaters()`...
- 【Pytorch】基于CNN识别手写汉字的识别
原作者博客：「Pytorch」CNN实现手写汉字识别（数据集制作，网络搭建，训练验证测试全部代码） 在这先感谢大佬的无私分享，给我们这些小白提供了巨大的帮助！ 首先放上一些对下文理解有帮助的函数介绍，有像...
- CNN入门+猫狗大战(Dogs vs. Cats)+PyTorch入门
CNN入门+猫狗大战+PyTorch实现写在前面猫狗大战介绍CNN介绍卷积(convolution)池化(pooling)全连接(fully connected)一个简单的CNN网络设计PyTorch实现 写在前面 作为一个深度学习新手，参考了许多资料，进行了一些...
- pytorch vgg16 猫狗识别
第一次做猫狗识别的任务，遇到点问题记录一下： 主要是数据集的问题： 下载完猫狗数据集后，打开有两个文件夹分别是train和test。这两个文件夹中并没有子文件夹。直接将其导入 train_dataset = torchvision....
- pytorch CNN手写字体识别
## """CNN手写字体识别""" import torch import torch.nn as nn from torch.autograd import Variable import torch.utils.data as Data import torchvision #其中包括一些数据库（图片...） import matplotlib....
- PyTorch使用CNN对手写数字进行识别
MNIST数据集是学习各种神经网络的开胃菜。...上次我们采用的是MLP网络，这次使用CNN网络。 1. 准备工作 1.1 导包和设置随机种子 import torchvision import torchvision.datasets as datase...
- pytorch alexNet 进行猫狗识别
第一次做猫狗识别的任务，遇到点问题记录一下： 主要是数据集的问题： 下载完猫狗数据集后，打开有两个文件夹分别是train和test。这两个文件夹中并没有子文件夹。直接将其导入 train_dataset = torchvision....
- Pytorch详解NLLLoss和CrossEntropyLoss
pytorch的官方文档写的也太简陋了吧…害我看了这么久… NLLLoss 在图片单标签分类时，输入m张图片，输出一个m*N的Tensor，其中N是分类个数。比如输入3张图片，分三类，最后的输出是一个3*3的Tensor，举个例子： ...
- PyTorch：基于AlexNet的猫狗识别
猫狗识别是学习CNN中最有趣的一个应用，本次我在Kaggle上的“Dogs vs. Cats Redux”进行了一次尝试。考虑到训练速度和实验的简易性，我使用了比较简单的AlexNet，并且还用了对应ImageNet的预训练模型...
- 学习笔记：cnn 猫狗识别
版权声明：本文为博主原创文章，未经博主允许不得转载。 1.数据获取 本次学习的数据为，kaggle 中的 Dogs vs Cats 数据集 如果不清楚，kaggle，可以看一下，我前面写的这篇文章：...
- PyTorch：基于CNN的数字识别(MNIST)
之前尝试了直接使用全链接直接进行数字识别，效果虽然也说的过去，但是一旦使用我自己写的数字，预测的效果瞬间就不太行了。所以本次又尝试了一下使用卷积神经网络进行数字识别，需要注意的是本博客中的网络结构是...
- Pytorch+CNN 识别自己手写的数字
Pytorch+CNN 识别自己手写的数字 看了网上很多的手写数字识别的例子，发现都没有一个可以识别自己手写的例子，正好现在需要写一个例子，于是自己研究了一下，写出了 一个能识别自己手写的例子供大家参考。转载请注明...
- pytorch实现CNN手写数字识别（MNIST）
导入依赖包 import torch import numpy as np from torch.utils.data import DataLoader from torchvision.datasets import mnist from torch import nn from torch.autograd import Variable ...
- PyTorch绘制训练过程的accuracy和loss曲线
PyTorch、Caffe绘制训练过程的accuracy和loss曲线 衡量模型的好坏其实最重要的看的就是准确率与损失率，所以将其进行可视化是一个非常重要的一步。这样就可以直观明了的看出模型训练过程中准确率以及损失率的变化。...
- pytorch实现猫狗分类+数据集
数据集： Kaggle网站猫狗分类数据集，训练集包括12500张猫和12500张狗，测试集为12500张猫狗无标签图片，我们需要把训练集的猫狗照片各取出2500张作为验证集。 开始部分代码：导入一些必要的包，os包集成了一些对...
- pytorch搭建CNN速记
文章目录pytorch使用CNN总结如何定义数据定义常量定义变量如何定义模型快速搭建个性化搭建如何定义激活函数如何定义优化算法如何定义loss函数如何训练模型如何保存与读取模型保存读取如何进行批训练如何在单GPU上...
- pytorch使用RESNET训练识别图片
import torch from torch import nn from torch.nn import functional as F from torch.utils.data import DataLoader from torchvision import datasets from torchvision import transforms from torch import nn,...
- 使用Pytorch搭建CNN
文章目录卷积卷积层GPUCNN(卷积神经网络)一个简单的CNN准备数据与训练模型ResNet改变学习率SEVgg 卷积 下面的conv函数实现了对二维单通道图像的卷积.考虑输入的卷积核kernel的长宽相同,padding为对图像的四个边缘补...
- 利用Pytorch进行CNN详细剖析
转载请注明出处：利用Pytorch进行CNN详细剖析 （乐投网 - 大数据，人工智能第一干货网） 本文缘起于一次CNN作业中的一道题，这道题涉及到了基本的CNN网络搭建，在MNIST数据集上的分类结果，Batch Normalization...
- 「Pytorch」CNN实现手写汉字识别（数据集制作，网络搭建，训练验证测试全部代码）
之前毕业设计用TensorFlow做了手写汉字识别，使用的中科院的数据集。 现在用Pytorch复现一下。 下载链接在文末
- pytorch loss function 总结
最近看了下 PyTorch 的损失函数文档，整理了下自己的理解，重新格式化了公式如下，以便以后查阅。 值得注意的是，很多的 loss 函数都有 size_average 和 reduce 两个布尔类型的参数，需要解释一下。因为一般损失...
- pytorch使用CNN实现MNIST手写体的识别
**MNIST数据集介绍：**MNIST数据集在torvision.datasets里面，可以自行加载，其中训练集有6W张，测试集有1W，都为灰度图，即channel为1，图片的大小都是28x28，下面图片就是一部分数据。 导入工具包 import ...
- PyTorch: CNN实战MNIST手写数字识别
PyTorch: CNN实战MNIST手写数字识别cnn导包加载数据构造CNN训练并计算损失结果 cnn 卷积神经网络CNN的结构一般包含这几个层： 输入层：用于数据的输入 卷积层：使用卷积核进行特征提取和特征映射 激励层：由于...
- PyTorch 入门实战（五）——2013kaggle比赛 猫狗大战的实现
承接上一篇：PyTorch 入门实战（四）——利用Torch.nn构建卷积神经网络 PyTorch入门实战 1.博客：PyTorch 入门实战（一）——Tensor 2.博客：PyTorch 入门实战（二）——Variable 3.博客：PyTorch 入门实战（三...
- pytorch 猫狗大战
pytorch 迁移学习 猫狗大战 kaggle