VB6 利用API获得时间戳精确到毫秒并计算开始和结束时间的差到天日时分秒毫秒，子程序 f_TimeStampToStr
发表于 2023年5月5日 00:20
这可以用于对你程序进行测速，优化你的算法，给你毫秒级的计时。
新建From1（窗体），新建Command1（按钮CommandButton），代码：
新建modTimeStampToStr（模块 modTimeStampToStr.bas），代码：
f_TimeStampToStr(lngTime As Long, Optional lngFormat As Long = 0) As String 说明：
返回列表'时间戳转换为天、小时、分钟、秒和毫秒，为0不显示
'lngFormat格式参数：
'0 默认值 中文显示 X天X小时X分钟X秒X毫秒
'1 DDTHH:MM:SS
'2 HH:MM:SS.MS
'3 HH:MM:SS