Class Car
Public PetName As String
Public ID As Integer
End Class
Module Program
Sub Main()
Dim inventory As XElement = _
Green
BMW
Stan
' Call ToString() on our XElement.
Console.WriteLine(inventory)
End Sub
End Module