共用方式為

DateAndTime.TimeSerial 方法

  • 發行項

傳回 Date 值，表示指定之時、分和秒，且日期資訊設定為相對於西元 1 年的一月 1 日。

命名空間： Microsoft.VisualBasic
組件： Microsoft.VisualBasic (在 microsoft.visualbasic.dll 中)

語法

'宣告
Public Shared Function TimeSerial ( _
    Hour As Integer, _
    Minute As Integer, _
    Second As Integer _
) As DateTime
'用途
Dim Hour As Integer
Dim Minute As Integer
Dim Second As Integer
Dim returnValue As DateTime

returnValue = DateAndTime.TimeSerial(Hour, Minute, Second)

public static DateTime TimeSerial (
    int Hour,
    int Minute,
    int Second
)

public:
static DateTime TimeSerial (
    int Hour, 
    int Minute, 
    int Second
)

public static DateTime TimeSerial (
    int Hour, 
    int Minute, 
    int Second
)

public static function TimeSerial (
    Hour : int, 
    Minute : int, 
    Second : int
) : DateTime

參數

  • Hour
    必要項。從 0 到 23 的 Integer 運算式。不過，也接受超過這個範圍的值。
  • Minute
    必要項。從 0 到 59 的 Integer 運算式。不過，也接受超過這個範圍的值。Minute 的值會加入到計算所得的小時，因此負數的值會指定該小時之前的分鐘。
  • Second
    必要項。從 0 到 59 的 Integer 運算式。不過，也接受超過這個範圍的值。Second 的值會加入到計算所得的分鐘，因此負數的值會指定該分鐘之前的秒鐘。

傳回值

傳回 Date 值，表示指定之時、分和秒，且日期資訊設定為相對於西元 1 年的一月 1 日。

備註

如需詳細資訊，請參閱 Visual Basic 的主題 TimeSerial 函式 (Visual Basic)。

下列範例將示範負數、零和正數的引數值。TimeSerial 函式會傳回一個時間，表示在中午前三個小時又 15 分鐘的時間，或是 8:45:00 AM。

Dim alarmTime As Date = TimeSerial(12 - 3, -15, 0)

如果 Minute 或 Second 其中一項超過其正常範圍，則它會適當地套用到下一個更大的單位。例如，如果您指定 75 分鐘，則會評估為一個小時又 15 分鐘。

TimeSerial 會減少總秒數的模數 86,400，也就是一天中的秒數。因此，傳回的值一定會在 00:00:00 和 23:59:59 之間。

Date 資料型別包含日期元件。TimeSerial 會將這些都設定為 1，因此傳回值表示 1 年的第一天。不過，如果引數的值造成計算出的時間超過 24 小時，則會視需要遞增一天。在下列範例中，Hour 和 Minute 的值會產生超過 24 小時的組合時間。

MsgBox(TimeSerial(23, 75, 0)) 
' The preceding statement displays "1/2/0001 12:15:00 AM".

如果引數的值產生負數的計算時間，則日期資訊會設定為 1/1/0001，且時間資訊會調整為在 00:00:00 和 23:59:59 之間。但是，如果計算所得時間少於負 24 小時，則會發生 ArgumentOutOfRangeException 錯誤。

因為 System.DateTime 結構可支援每一個 Date 值，所以其方法在組合 Date 值時，可為您提供一些額外的選項。例如，您可以運用任一多載 DateTime 建構函式，使用想要之元件組合填入 Date 變數。下列範例會將 newDateTime 設定為 1978 年五月 6 日早上 8:30 之前的十分之一秒。

Dim newDateTime As Date = New Date(1978, 5, 6, 8, 29, 59, 900)

範例

下列範例會使用 TimeSerial 函式，傳回指定之時、分和秒的時間。

Dim thisTime As Date
thisTime = TimeSerial(16, 35, 17)

平台

Windows 98、 Windows 2000 SP4、 Windows CE、 Windows Millennium Edition、 Windows Mobile for Pocket PC、 Windows Mobile for Smartphone、 Windows Server 2003、 Windows XP Media Center Edition、 Windows XP Professional x64 Edition、 Windows XP SP2、 Windows XP Starter Edition

.NET Framework 並不支援各種平台的所有版本。如需支援平台版本的相關資訊，請參閱系統需求一節的內容。

版本資訊

.NET Framework

支援版本：2.0、1.1、1.0

.NET Compact Framework

支援版本：2.0、1.0

請參閱

參考

DateAndTime 類別
DateAndTime 成員
Microsoft.VisualBasic 命名空間

其他資源

TimeSerial 函式 (Visual Basic)
DateSerial 函式 (Visual Basic)
DateValue 函式 (Visual Basic)
Hour 函式 (Visual Basic)
Minute 函式
Now 屬性
Second 函式 (Visual Basic)
TimeValue 函式 (Visual Basic)