VB里如何计算两个时间之差,如17:30:00到21:00:00共4小时30分钟,谢谢!

解决方案 »

  1.   

    DateDiff("n", "17:30:00","21:00:00")
      

  2.   

    ? datediff("n","17:30:00","21:00:00")
     210 
    210分钟即4小时30分如果单位为秒,则:
    ? datediff("s","17:30:00","21:00:00")
     12600 
      

  3.   

    思路:由于1个小时=60分, 1分=60秒所以... 把他们都换算为 分(或秒)再相减就可以得到他们的分差一共是多少然后再化为时间样式..比如"17:30:00" =17x60+30=1050    "21:00:00"=21x60+0=1260 然后拿1260-1050=210分钟210/60=3 余 30 所以我们就可以得到 3小时30分 的答案(这里可以用"\"整除 和"mod"求余来计算得到3 和 30) 
    -------------------------
    楼主: 17:30:00到21:00:00 时差是3小时30分哦!
    -------------------------提示:把"17:30:00"分开计算可以用字符串处理函数 left 提取出左边两个字符17出来 * 60 
    30的提取方法:先用right提取出"30:00"然后在用left 提取出左边两个字符30就出来了