Declare Function TimeSerial ( ByVal hour As Integer, ByVal minute As Integer, ByVal second As Integer ) As Double

#include "vbcompat.bi"
result = TimeSerial( hours, minutes, seconds )

hour
minute
second

Возвращает date serial содержит время, формируемое значениями в параметрах hours, minutes и seconds. Возвращенный date serial не имеет целую часть.

hours должны быть указаны в диапазоне 0-23

Компилятор не распознает эту функцию, если не подключен заголовочный файл vbcompat.bi или datetime.bi.

#include "vbcompat.bi"

Dim ds As Double = DateSerial(2005, 11, 28) + TimeSerial(7, 30, 50)

Print Format(ds, "yyyy/mm/dd hh:mm:ss")

• Не существует в QB. Эта функция появилась в PDS и VBDOS
  
  

• Date Serials
  
• DateSerial
  
• TimeValue
  
• DateValue