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

返回日期序列号，其中包含由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中
  
  

• 日期序列号
  
• DateSerial
  
• TimeValue
  
• DateValue