不是 有 函數(shù)嘛?
創(chuàng)新互聯(lián)建站專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù),包含不限于成都網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站、外貿(mào)網(wǎng)站建設(shè)、來安網(wǎng)絡(luò)推廣、重慶小程序開發(fā)、來安網(wǎng)絡(luò)營銷、來安企業(yè)策劃、來安品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運(yùn)營等,從售前售中售后,我們都將竭誠為您服務(wù),您的肯定,是我們最大的嘉獎(jiǎng);創(chuàng)新互聯(lián)建站為所有大學(xué)生創(chuàng)業(yè)者提供來安建站搭建服務(wù),24小時(shí)服務(wù)熱線:13518219792,官方網(wǎng)址:www.cdcxhl.com
now() 就是 吧
取得 后 再 分離出你所需的,分別賦值 就行了,當(dāng)然 還是 有 函數(shù)的
vb.net 中沒有了 time() 函數(shù)。
可以通過 Now().TimeOfDay 截取當(dāng)前的系統(tǒng)時(shí)間。
Now()函數(shù)取當(dāng)前的系統(tǒng)日期時(shí)間,TimeOfDay 方法取日期時(shí)間中的時(shí)間部分。如下:
Dim t As TimeSpan
Dim s As Integer
t = Now().TimeOfDay
s = t.Hours * 3600 + t.Minutes * 60 + t.Seconds
變量s 就是 從午夜到現(xiàn)在經(jīng)過的秒數(shù)。
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim d1970 As New System.DateTime(1970, 1, 1, 0, 0, 0, 0)
Dim iSeconds As Long
iSeconds = (Now.Ticks - d1970.Ticks) / 10000000
MsgBox(iSeconds)
End Sub
假設(shè)你得到 N 秒
那么,一個(gè)小時(shí)就是 3600 秒,一分鐘就是 60 秒,我們就可以這樣子分割出來 :
小時(shí) hour = N / 3600;
分鐘 minute = ( N - ( hour * 3600 ) ) / 60;
秒 second = N - ( hour * 3600 + minute * 60 );
然后自己按照 hour : minute : second 的格式打印出來就行了 。