怎么让输出日期带上星期几
发布网友
发布时间：2022-10-04 20:48
共1个回答
热心网友
时间：2023-10-15 19:31
可以参考下面的代码：
Private Sub DTPicker1_Change()
Text1.Text = DateDiff("d", DTPicker1, DTPicker2)
End Sub
Private Sub DTPicker2_Change()
Text1.Text = DateDiff("d", DTPicker1, DTPicker2)
End Sub
扩展资料：
VB参考函数
Date 函数： 返回当前系统日期。
DateAdd 函数： 返回加上了指定的时间间隔的日期。
DateDiff 函数： 返回两个日期之间的间隔。
DatePart 函数： 返回给定日期的指定部分。
DateSerial 函数： 返回指定年月日的日期子类型的变体 。
DateValue 函数： 返回日期子类型的变体 。
Day 函数： 返回日期，取值范围为 1 至 31。
参考资料来源：百度百科-Visual Basic
