189 8069 5689
通过函数获得。
让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：申请域名、虚拟空间、营销软件、网站建设、东安网站维护、网站推广。
主要是通过time.Now()函数和time.AddDate函数以及time.Date()函数来构造和加减日期，获取一年所有的周日。
选择单元格区域中的一列日期或时间，或者确保活动单元格在包含日期或时间的表列中。
选择单元格区域或表中的一列日期或时间。
在“开始”选项卡上的“编辑”组中，单击“排序和筛选”，然后执行下列操作之一：
若要按从早到晚的顺序对日期或时间排序，请单击“从最旧到最新排序”。
若要按从晚到早的顺序对日期或时间排序，请单击“从最新到最旧排序”。
问题：检查日期和时间是否存储为日期或时间 如果结果不是您所希望的，可能是因为该列中包含存储为文本（而不是日期或时间）的日期或时间。要使 Excel 正确地对日期和时间进行排序，该列中的所有日期和时间都必须存储为日期或时间系列数值。如果 Excel 无法将值识别为日期或时间值，就会将该日期或时间存储为文本。有关详细信息，请参阅将存储为文本的日期转换为日期。
注释 如果要按星期日期进行排序，请设置单元格格式以显示星期日期。如果要按星期日期进行排序，而不考虑日期，请使用 TEXT 函数将它们转换为文本。但是，TEXT 函数会返回一个文本值，因此排序操作将基于字母数字数据。有关详细信息，请参阅按星期日期显示日期。
1.可以用DateDiff函数，返回值表示两个指定日期间的时间间隔。
2.也可以把两个日期直接相减：
a = Now - CDate("2014-1-1") '2014年1月1日到今天，共这么多天。
b = CDate("2014-3-1") - CDate("2014-1-1") '2014年1月1日到2014年3月1日，共这么多天。
vb的函数是强大的，闰年和平年它自己会处理，无需担心。
追问：
那需要什么控件，能详细说一下吗
回答：
不需要任何控件呢，是系统自带的函数呢，你写到代码里面试试就可以了。
你稍等，我给你写代码：
'窗体弄一个按钮Command1，加入以下代码，你试试看：
Private Sub Command1_Click()
Dim a As Long
Dim b As Long
a = Now - CDate("2014-1-1")'2014年1月1日到今天，共这么多天。
b = CDate("2014-3-1") - CDate("2014-1-1")'2014年1月1日到2014年3月1日，共这么多天。
Print "2014年1月1日到今天，共" a "天。"
Print "2014年1月1日到2014年3月1日,共" b "天。"
End Sub
首先这个具体日期是和这个时间应该是一一对应的关系，下周三应该有一个具体的数据和日期一一对应，比如说下周三是今年的具体的第几天，然后就可以计算出当时的日期了。比如：
// 2022年第一天
day := time.Date(2022, 1, 1, 0, 0, 0, 0, time.Local)
// 2022年的第304天
days := 304
// 2022年第304天的日期
expectedDay := day.Add(time.Duration(days*24*3600) * time.Second)
// 这一天是星期几
fmt.Println(expectedDay.Weekday())
// 这一天的日期
fmt.Println(expectedDay.Date())