输入秒数,将它按小时、分钟、秒的形式来输出.例如输入24680 秒,则输出6小时51分20秒.是C方向的

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/30 04:10:58
输入秒数,将它按小时、分钟、秒的形式来输出.例如输入24680秒,则输出6小时51分20秒.是C方向的输入秒数,将它按小时、分钟、秒的形式来输出.例如输入24680秒,则输出6小时51分20秒.是C方

输入秒数,将它按小时、分钟、秒的形式来输出.例如输入24680 秒,则输出6小时51分20秒.是C方向的
输入秒数,将它按小时、分钟、秒的形式来输出.例如输入24680 秒,则输出6小时51分20秒.
是C方向的

输入秒数,将它按小时、分钟、秒的形式来输出.例如输入24680 秒,则输出6小时51分20秒.是C方向的
Private Sub Form_Load()
Dim H As Long, M As Long, S As Long
Dim SC As Long
SC = 24680
H = SC \ 3600
M = (SC - H * 3600) \ 60
S = SC - H * 3600 - M * 60
MsgBox H & "小时" & M & "分" & S & "秒"
End Sub