原创 vb.net 时间日期函数控件

 2011-2-12 23:32  2683 12 12 分类: 软件与OS

vb.net 时间日期函数控件

函式名称说明                   范例            传回值
Now()     传回今天的时间及日期   Now()           2001/6/1 上午09:10:11
Year()    传回年的部分           Year(Now())     2001
Month()   传回月的部分           Month(Now())    6
Day()     传回日的部分           Day(Now())      1
Weekday() 传回一周的第几天       Weekday(Now()) 6（星期天为1）
Hour()    传回时的部分           Hour(Now())     9
Minute() 传回分的部分           Minute(Now())   10
Second() 传回秒的部分           Second(Now)     11

DateTime 对象提供了许多属性及方法让我们来处理时间及日期，其中Now 属性可以传回系统现在的日期及时间，Today 则是传系统现在的日期
功能                        语法                        备注
传回系统现在的年            DateTime.Today.Year()
传回系统现在的月            DateTime.Today.Month()
传回系统现在的日            DateTime.Today.Day()
传回系统现在星期几          DateTime.Now.DayOfWeek()    注意，星期一为1
传回现在是一年的第几天      DateTime.Now.DayOfYear()
传回系统现在的时            DateTime.Now.Hour()
传回系统现在的分            DateTime.Now.Minute()
传回系统现在的秒            DateTime.Now.Second()
传回现在日期加上指定天数    DateTime.Now.AddDays()      加上指定的天
传回现在日期加上指定月数    DateTime.Now.AddMonths()    加上指定的月
传回现在日期加上指定天数    DateTime.Now.AddYears()     加上指定的年
传回现在日期加上指定秒数    DateTime.Now.AddSeconds()   加上指定的秒
传回现在日期加上指定分钟    DateTime.Now.AddMinutes()   加上指定的分钟
传回现在日期加上指定小时    DateTime.Now.AddHours()     加上指定的小时

DateSerial 函式
当我们需要对于日期做运算的时候，可以利用DateSerial 函式。若是直接对日期型态做运算，则会发生错误。DateSerial 函式可以传回指定的日期，语法如下所示：
dtVar=DateSerial(Year, Month, Day)

DateDiff
DateDiff 函式可以取得两个日期的间隔，并且可以用年、月、日等单位传回两个日期的差距，语
法如下所示：
DateDiff(间隔参数, 日期一, 日期二)
日期相差的单位，必需使用下列表格的参数：
间隔参数              单位
DateInterval.Year     年
DateInterval.Quarter 季
DateInterval.Month    月
DateInterval.Day      日
DateInterval.Week     周
DateInterval.Hour     时
DateInterval.Minute   分
DateInterval.Second   秒

使用Format 函数
Format 函数可以修饰日期、数值以及字符串型态的数据，其传回值的数据型态为字符串。以下为使用语法：

Format(要修饰的数据[,要修饰的格式[,一周的第一天[,一年的第一周]]])

格式的参数是一些有意义的符号，这些符号的意义如下表所示：
符号          意义
0             数值配置符号，如果所指定的位置没有数值则印出0
#             数值配置符号，如果本符号前面为0 则不印出
.             小数点配置符号
,             千分符号
-_$()与空格符文字字符则一五一十的印出

下列程序将数值50000 格式化成 $50,000.00：
<html>
<%
   Response.Write("应付帐款为" & Format(50000,"$##,###.00"))
%>
</html>
语法                                     结果
Format(Now(), "M/d/yy")                  6/1/01
Format(Now(),"MM 月dd 日,dddd,yyyy 年") 06 月01 日,星期五,2001 年
Format(Now(),"MMM-d")                    六月-1
Format(Now(),"h:m:s")                    9:10:11
Format(Now(),"hh:mm:ss")                 09:10:11

写原创有奖励！2024面包板原创奖励正在进行中