'以对话框显示当前时间的时、分、秒 MsgBox "当前时间:" & Time & Chr(10) & _ "时:" & Hour(Time) & Chr(10) & _ "分:" & Minute(Time) & Chr(10) & _ "秒:" & Second(Time)