To get the height of first row, try processing the XML content, for example:
Dim x As New XmlDocument
x.Load(CType(data.GetData("XML Spreadsheet"), System.IO.Stream))
Dim m As New XmlNamespaceManager(x.NameTable)
m.AddNamespace("ss", "urn:schemas-microsoft-com:office:spreadsheet")
Dim h = x.SelectSingleNode("/ss:Workbook/ss:Worksheet[@ss:Name='Sheet1']/ss:Table/ss:Row/@ss:Height", m)?.Value
Then you can cast h to Double using CDbl(h).