Dim input_date As String = "25/12/2012"
Dim input_hour As Int = 21 'input time 2130
Dim input_min As Int = 30
Dim UTC_datetime As Long
UTC_datetime = DateTime.DateParse(input_date) + (input_hour * DateTime.TicksPerHour) + (input_min * DateTime.TicksPerMinute) + DateTime.GetTimeZoneOffsetAt(DateTime.DateParse(input_date))