标题:[求助]一个很简单的题目
只看楼主
fhzhbgying
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2006-12-5
 问题点数:0 回复次数:1 
[求助]一个很简单的题目
一个很简单的题目,但本人学了才两三天不会做请指教
  输入以秒为单位表示的时间,编写程序,将其换算成几日几时几秒!!
搜索更多相关主题的帖子: 编写程序 
2006-12-08 19:35
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
Dim sec As Long
sec = InputBox("请输入秒数")

Dim h As Long, m As Long, s As Long
h = sec \ 3600
m = sec \ 60 Mod 60
s = sec Mod 60
Print h, m, s

我的msn: myfend@
2006-12-08 19:42



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-108201-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.291651 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved