您正在使用 IPV4 [3.94.150.98] 访问本站,您本次已经查看了 1 页
用户名: 密 码: 验证码:     用QQ登录本站
首页 软件 编程 笑话 知识 公告 台风 日历 计算器
悟空收录网       [公益]保护绿色环境,构建和谐社会      

【腾讯云】 爆款2核2G3M云服务器首年 61元,叠加红包再享折上折      
[公益] 地球是我家,绿化靠大家      
2024年 清明节 007
2024年 劳动节 034
2025年 元 旦 279
2025年 春 节 307
 
您现在的位置:首页 >> ASP/ASP.net >> 内容
本类新增
本类热门
asp下用datediff实现计算两个时间差的函数
内容摘要: Function TimeDiff(sBegin, sEnd)Dim iHourB, iMinuteB, iSecondB, iMiniSecondBDim iHourE, iMinuteE, iSecondE, iMiniSecondEDim dTimeB, dTimeE, dTimeDiffDim iHour, iMinute, iSecond, iMi......
Function TimeDiff(sBegin, sEnd)

Dim iHourB, iMinuteB, iSecondB, iMiniSecondB

Dim iHourE, iMinuteE, iSecondE, iMiniSecondE

Dim dTimeB, dTimeE, dTimeDiff

Dim iHour, iMinute, iSecond, iMiniSecond


iHourB = clng(Left(sBegin, 2))

iMinuteB = clng(Mid(sBegin, 4, 2))

iSecondB = clng(Mid(sBegin, 7, 2))

iMiniSecondB = clng(Mid(sBegin, 10, 4))


iHourE = clng(Left(sEnd, 2))

iMinuteE = clng(Mid(sEnd, 4, 2))

iSecondE = clng(Mid(sEnd, 7, 2))

iMiniSecondE = clng(Mid(sEnd, 10, 4))


dTimeB = iHourB * 3600 + iMinuteB * 60 + iSecondB + iMiniSecondB / 1000

dTimeE = iHourE * 3600 + iMinuteE * 60 + iSecondE + iMiniSecondE / 1000

dTimeDiff = dTimeE - dTimeB


iHour = Int(dTimeDiff / 3600)

dTimeDiff = dTimeDiff - iHour * 3600

iMinute = Int(dTimeDiff / 60)

dTimeDiff = dTimeDiff - iMinute * 60

iSecond = Int(dTimeDiff)

dTimeDiff = dTimeDiff - Int(dTimeDiff)

iMiniSecond = dTimeDiff


TimeDiff = iHour & "小时" & iMinute & "分钟" & iSecond & FormatNumber(iMiniSecond, 3) & "秒"

End Function


版权声明:本内容来源于网络,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。
上一篇:常用的ASP代码

 

下一篇:随机取出数据库中的若干条记录的方法

发布日期:2021/6/15
手机扫二维码直达本页
发布时间:12:34:56
点  击:3
录  入:齐天大圣
相关文章
Baidu
YiJiaCMS 7.3.8 build231228(MSSQL) 闽ICP备05000814号-1
本空间由腾讯云(轻量应用服务器)提供,Cloudflare提供加速防护
运行时间载入中.....