Imports System Class Sample Shared Sub Main() ' DateTimeOffsetからUNIX時間への変換 Dim dto As New DateTimeOffset(2009, 02, 13, 23, 31, 30, New TimeSpan(+00, 00, 00)) Console.WriteLine(dto.ToUnixTimeSeconds()) ' 2038-01-19T03:14:07+00:00をUNIX時間に変換 Console.WriteLine((New DateTimeOffset(2038, 01, 19, 03, 14, 07, New TimeSpan(+00, 00, 00))).ToUnixTimeSeconds()) ' 2038-01-19T12:14:07+09:00をUNIX時間に変換 Console.Wr