Dim startdateformat as String = DateTime.DateFormat
Dim starttimeformat as String = DateTime.TimeFormat
Dim MyTimeStamp as Long
DateTime.DateFormat = "yyyy-MM-dd"
DateTime.TimeFormat = "HH:mm:ss"
MyTimeStamp = DateTime.DateTimeParse("2014-09-17", "10:28:30")