说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

请问在VB中如何得到系统的年,月,日

编辑:说三道四文库 发布时间:2018-02-23 12:19
HTML文档下载 WORD文档下载 PDF文档下载
请问在VB中如何得到系统的年,月,日.它们分别是什么函数。
只要一个函数 NOW

msgbox format(now,"YY年MM月DD日")

          Private Sub Form_Load()

             Printer.Print Format(Date"yyyy") '年
             
             Printer.Print Format(Date,"MM") '月
             
             Printer.Print Format(Date,"dd") '月

         End Sub

Date      返回包含系统日期的 Variant (Date)。

Printer.Print Format(Date,"dd") '呵呵这个是 日
其实用NOW就可以行到当前的系统时间的全部数据;
如:
msgbox(now)

dim date_temp as date
date=now
……
但你也可以用year(now)得到年,month(now)得到月,等等,可以任意得到你所需的数据。

OVER!
Date    -返回系统当前日期
Printer.Print Year(Date)   年
Printer.Print Month(Date)  月
Printer.Print Day(Date)    日
顺便
Weekday 返回星期几
MsgBox Format(Date, "YYYY年MM月DD日 (DDDD)"), 64, "TODAY"
UP
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘