fork download

copy

Imports System
Imports System.IO
Imports System.String
Imports System.DateTime
 
Public Class Test
	Public Shared Sub Main()
		Console.WriteLine(ConvertDateFormatTY13(""))
	End Sub
 
	 Private Function ConvertDateFormatTY2013(ByVal pstrDateToParse As String) As Date
        Dim parsedDate As Date
        If DateTime.TryParse(pstrDateToParse, parsedDate) Then
            Return parsedDate
        End If
 
        If DateTime.TryParseExact(pstrDateToParse, New String(1){"MMddYYYY"}, New CultureInfo("en-US"), DateTimeStyles.None, parsedDate) Then
            Return parsedDate
        End If
 
        Return HighDate
    End Function
End Class

Visual Basic.Net Compiler version 0.0.0.5914 (Mono 2.4.2 - r)
Copyright (C) 2004-2008 Rolf Bjarne Kvinge. All rights reserved.


/home/6vxpfN/prog.vb (17,104) : Error VBNC30451: Could not resolve the name 'CultureInfo'
There were 1 errors and 0 warnings.
Compilation took 00:00:00.7242770

Standard output is empty