问一个关于时间的问题~

[yinxun]

x_time =hour(rs("Date")) & ":"&minute(rs("Date"))

比如现在是17：05

就显示了17：5

请问怎么才能显示17：05 ？

[sy_binbin]

'**********************************************************************************************
'函数名称: ZeroFill(Num,Num_Length)
'函数功能: 前面补0
'参数说明: Num 要操作的数字
' Num_Length 显示的位数
'返回值 : 格式化的字符串
'**********************************************************************************************
Function ZeroFill(Num,Num_Length)
Dim ZeroFill_i,ZeroFill_ReturnNum
For ZeroFill_i=len(Num) To Num_Length-1
ZeroFill_ReturnNum=ZeroFill_ReturnNum&"0"
Next
ZeroFill_ReturnNum=ZeroFill_ReturnNum&Num
ZeroFill=ZeroFill_ReturnNum
End Function



x_time =ZeroFill(hour(rs("Date")),2) & ":"&ZeroFill(minute(rs("Date")),2)

[taia]

x_time =FormatDateTime(rs("Date"), 4)

[Msxindl_Com]

<%=FormatDateTime("17:5",4)%>

[cimzzxiang]

[Quote=引用 3 楼 liaitan 的回复:]
<%=FormatDateTime("17:5",4)%>
[/Quote]