程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> 更多關於編程 >> VB.NET日期/時間值建立方法

VB.NET日期/時間值建立方法

編輯:更多關於編程

      組合一個日期/時間值

      在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

    1. 上一頁:
    2. 下一頁:
    Copyright © 程式師世界 All Rights Reserved