Declare Function DateSerial ( ByVal year As Integer, ByVal month As Integer, ByVal day As Integer ) As Integer

#include "vbcompat.bi"
result = DateSerial( year, month, day )

year
month
day

Возвращает date serial(серийную дату) , содержащую сформированную дату,  значениями в параметрах year, month и day. Возвращаемая серийная дата не имеет дробную часть.

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

#include "vbcompat.bi"

Dim a As Double = DateSerial(2005, 11, 28)

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

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

• Date Serials
  
• DateSerial
  
• TimeValue
  
• DateValue