国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

第一種方法：?jiǎn)蝹€(gè)過(guò)程單個(gè)函數(shù)

       日期時(shí)間差函數(shù)DateDiff ()

    例如：DateDiff (“m”,#12/15/1990#, ##1/10/1990# )會(huì)返回-11，即兩個(gè)日期相間隔11個(gè)月（第一個(gè)參數(shù)指定間隔單位為月；DateDiff (“d”, #12/5/90# , #12/15/90# )會(huì)返回10，即兩個(gè)日期間隔10天（第一個(gè)參數(shù)指定間隔單位為天）。

    獲得分鐘：

    time1為初始時(shí)間

    time2為結(jié)束時(shí)間

    DateDiff("m"，time1,time2)

 

 

   

第二種方法：多個(gè)過(guò)程

      1、多個(gè)函數(shù)

 

    如果是要取hh:mm:ss格式變量里的分鐘數(shù),可以這么寫 
    dim a 
    dim b as integer 
    a=format(time,"hh:mm:ss") 
    b=minute(a) 
    print b 

    如果是把當(dāng)前時(shí)間轉(zhuǎn)換為分鐘,就參考上面的的做法就OK了. 

    b=HOUR(TIME)*60+MINUTE(TIME)+SECOND(TIME)/60 
    print b

    具體實(shí)例：如果是把變量a的時(shí)間格式轉(zhuǎn)換為多少分鐘？

    Dim a
    Dim b As Integer
    a = Format(Time, "00:01:25")
    b = Minute(a)

    Print Hour(a) * 60               '小時(shí)轉(zhuǎn)化為分鐘
    Print Minute(a)                  
    Print Second(a) / 60             '秒轉(zhuǎn)化為分鐘
    Print Hour(a) * 60 + Minute(a) + Int(Second(a) / 60)

    2、單個(gè)函數(shù)

          獲取日期時(shí)間的指定部份函數(shù)DatePart ()

          說(shuō)明：返回特定日期指定部分。

            例如：DatePart (“y”, #9/11/92#)會(huì)返回天數(shù)255，因?yàn)?/span>9月11日為1992年的第255天；DatePart (“w”, #8/22/2000)會(huì)返回3，表示為星期二。DatePart ()函數(shù)的參數(shù)意義同DateDiff ()函數(shù)。

             獲得分鐘：

                      dim h as instring

                       dim m as instring

                      dim s as instring

                      h = datepart("h",time) 獲得小時(shí)

                       m = datepart("m",time) 獲得分鐘

                       s = datepart("s",time) 獲得秒

                       總的分鐘數(shù)為h*60+m+s/60

本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)點(diǎn)擊舉報(bào)。