UTC时间和北京时间互换的VB函数

海洋调查经常使用UTC时间，而有些时候近岸工程使用的是北京时间，之间相差8个小时，需要转换，下面是这两个时间转化的函数： 'UTC转换为北京时间  函数可直接调用 Function UTCToBeijing(UTCyear As Long, UTCmonth As Long, UTCday As Long, UTChour As Long) As String     Dim year As Lo

>>阅读原文<<