Imports System
Imports System.Xml
Module Module1
Sub Main()
Dim reader As XmlReader = XmlReader.Create("myData.xml")
reader.ReadToFollowing("time")
Dim time As String = reader.ReadElementContentAsString()
Dim transaction_time As DateTimeOffset = XmlConvert.ToDateTimeOffset(time)
Console.WriteLine(transaction_time)
End Sub 'Main
End Module
|