VB输入小时,分,秒,化成多少秒,原代码

[复制链接]
查看11 | 回复4 | 2013-4-15 14:30:31 | 显示全部楼层 |阅读模式
#includevoid main() { time_t seconds; struct tm * timeinfo; int sec; seconds = time (NULL); timeinfo = localtime ( &seconds ); sec= timeinfo->tm_hour; printf("%d:",sec); // 小时sec= timeinfo->tm_min; printf("%d:",sec); // 分sec= timeinfo->tm_sec; printf("%d\n",sec);//秒}...
回复

使用道具 举报

千问 | 2013-4-15 14:30:31 | 显示全部楼层
假设你的text1 输入小时text2 输入分钟 text3 输入秒text4 是转化的秒数,再加一个按钮 代码如下private sub command1_click()text4=val(text1)*3600+val(text2)*60+val(text3)end sub...
回复

使用道具 举报

千问 | 2013-4-15 14:30:31 | 显示全部楼层
代码如下:function CalcSec(byval hh as integer,byval mm as integer,byval ss as integer)dim hh,mm,sshh= 12mm = 30ss =51CalcSec = hh * 3600 + mm * 60 + ssend function...
回复

使用道具 举报

千问 | 2013-4-15 14:30:31 | 显示全部楼层
Dim tt As DateDim ss As Longtt = "10:10:30"ss = Hour(tt) * 3600 + Minute(tt) * 60 + Second(tt)Print ss...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行