园林工程项目理解:编程疑问

来源:百度文库 编辑:神马品牌网 时间:2024/04/30 16:16:17
<HTML>
<HEAD><TITLE>演示If语句的使用</TITLE></HEAD>
<BODY>
<%
Dim MyTime
'格式化时间的格式为24小时hh:mm
MyTime = FormatDateTime(Time, 4)
Response.Write("现在的时间是: " & MyTime & " ")
If MyTime >= "05:00" And MyTime < "09:00" Then
Response.Write("早上好!")
ElseIf MyTime >= "09:00" And MyTime < "11:00" Then
Response.Write("上午好!")
ElseIf MyTime >= "11:00" And MyTime < "13:00" Then
Response.Write("中午好!")
ElseIf MyTime >= "13:00" And MyTime < "18:00" Then
Response.Write("下午好!")
ElseIf MyTime >= "18:00" And MyTime < "24:00" Then
Response.Write("晚上好!")
Else
Response.Write("这么晚了,您还没休息!")
End If
%>
</BODY>
</HTML>
里面的哪个"4"是什么意思,这样用有什么好处?
HTML>
<HEAD><TITLE>演示Case语句的使用</TITLE></HEAD>
<BODY>
<%
Dim MyDate
MyDate = Date
Response.Write("今天是: " & FormatDateTime(MyDate, 1) & " ")
Select Case Weekday(MyDate)
Case 1
Response.Write("星期日")
Case 2
Response.Write("星期一")
Case 3
Response.Write("星期二")
Case 4
Response.Write("星期三")
Case 5
Response.Write("星期四")
Case 6
Response.Write("星期五")
Case 7
Response.Write("星期六")
End Select
%>
</BODY>
</HTML>
这里的1又是?
上面的那个4和24有什么关系?要是24换为12呢?

MyTime = FormatDateTime(Time, 4)
就是格式化时间显示为 小时(2位):分钟(2位)的意思
如果不格式化默认是 小小时(2位):分钟(2位):秒(2位)的
FormatDateTime(MyDate, 1)
就是取当前日期了,比如今天是3号就是3了