展会信息港展会大全

VB.NET日期/时间值建立方法
来源:互联网   发布日期:2016-01-19 13:00:05   浏览:1273次  

导读:组合一个日期 时间值 在VB NET中可以用几种方法组合一个日期 时间值。列表A说明了几种实现相同功能的方法。 ◆第一个消息框将显示:dtDate1: 1 2 2007 12:00:00 A M ◆第二个消息框将显示:dtDate2 ...

组合一个日期/时间值

在VB.NET中可以用几种方法组合一个日期/时间值。列表A说明了几种实现相同功能的方法。

◆第一个消息框将显示:dtDate1: 1/2/2007 12:00:00 A.M.

◆第二个消息框将显示:dtDate2: 1/2/2007 12:00:00 A.M.

◆第三个消息框将显示:dtDate3: 2/3/2007 3:01:59 A.M.

◆第四个消息框将显示:dtDate4: 2/3/2007 3:01:59 P.M.

实例说明

要设定变量dtDate1的值,我利用#符号设定日期为1/2/2007。由于没有指定时间,系统会默认将时间分配为12:00:00 A.M.。(如果你指定#1/2/2007 3:59:00 PM#,则指定的时间为3:59:00 P.M。)

要设定变量dtDate2的值,我利用Date对象,把它提交给和dtDate1相同的日期值。其结果相同;dtDate1显示的日期和 dtDate2的日期完全一样。由于我省略了时间,系统默认设定时间为12:00:00 A.M.。

要设定变量dtDate3的值,我提供包括时间在内的完整信息。注意,我使用军用时间,将其设为3:00:00 A.M。

要设定变量dtDate4的值,我使用和dtDate3相同的日期和时间,但它的时间设为15:00:00,得到3:00:00 P.M。

Private Sub DateTimeCombination()

Dim dtDate1 As Date = #1/2/2007#

Dim dtDate2 As New Date(2007, 1, 2)

Dim dtDate3 As New Date(2007, 2, 3, 3, 1, 59)

Dim dtDate4 As New Date(2007, 2, 3, 15, 1, 59)

MsgBox("dtDate1: " & dtDate1.ToString())

MsgBox("dtDate2: " & dtDate2.ToString())

MsgBox("dtDate3: " & dtDate3.ToString())

MsgBox("dtDate4: " & dtDate4.ToString())

End Sub

赞助本站

人工智能实验室

相关热词: 日期 时间 VB NET

AiLab云推荐
展开

热门栏目HotCates

Copyright © 2010-2024 AiLab Team. 人工智能实验室 版权所有    关于我们 | 联系我们 | 广告服务 | 公司动态 | 免责声明 | 隐私条款 | 工作机会 | 展会港