I have had to resort to using sub strings here is my code:
Dim Date As Date = datestamp.Substring(6, 2) & "/" & datestamp.Substring(4, 2) & "/" & datestamp.Substring(0, 4) & " " &
timestamp.Substring(0, 2) & ":" & timestamp.Substring(2, 2) & ":" & timestamp.Substring(4, 2)