fork(1) download
copy 
  1. Imports System
  2.  
  3. Public Class Test
  4.    Public Shared Sub Main()
  5.        Console.Write("01/01/1900 : ")
  6.        Console.WriteLine(DateDiff(DateInterval.Day, Cdate("01/01/2013"),Cdate("01/01/1900"))-2)
  7.        Console.Write("01/01/1900 : ")
  8.        Console.WriteLine(DateDiff(DateInterval.Day, Cdate("01/01/1900"),Cdate("01/01/2013"))+2)
  9.        Console.Write("12/30/1899 : ")
  10.        Console.WriteLine(DateDiff(DateInterval.Day, Cdate("01/01/2013"),Cdate("12/30/1899")))
  11.        Console.Write("12/30/1899 : ")
  12.        Console.WriteLine(DateDiff(DateInterval.Day, Cdate("12/30/1899"),Cdate("01/01/2013")))
  13.    End Sub
  14. End Class 
  15.  
  16.  
Success #stdin #stdout 0.12s 25880KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
01/01/1900 : -41275
01/01/1900 : 41275
12/30/1899 : -41275
12/30/1899 : 41275
https://ideone.com/pyhOlk
language:
VB.NET (mono-3.10)
created:
11 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!