如何把12234:59:34转换成秒数!
解决方案 »
- 驱动器列表框问题
- TextBox控件的validate事件怎么用?
- 大哥们帮忙看看这个
- 录入数据时,怎样实现象Access那样,使用一个表格就搞定了,up有分
- ●●●● 并口通信中 ●●●●●
- 有谁知道VB的帮助文件是怎样作的?好像是通过WORD做成.chm,然后再做转换?
- 急!急!急! 如何用VB实现类似WIN2000的文件搜索窗口,如何实现搜索选项的自动调整
- ★★★★★★请教各位VB达人,关于VB程序打包问题!(急)★★★★★★
- VB问题 大家帮帮忙解决下
- 一个MSHFlexGrid中关于列显示和隐藏的问题向朋友们请教
- 在线结帖.诸位大侠,下面这个代码该怎么改啊
- 简单简单~~~~画好图后,如何刷新?绝对来者有分!!
Private Sub Command1_Click()
MsgBox seconds("12234:59:34")
End SubFunction seconds(ByVal period As String) As Long
Dim temp
temp = Split(period, ":")
seconds = CLng(temp(0)) * 3600 + CLng(temp(1)) * 60 + CLng(temp(2))
End Function