Hola a todos estoy intentando introducir unos datos en una clase de Vb.net, pero no se como meterle mano, lo estoy haciendo así.
Clase
<Serializable()> _
Public Class Peticion_Disponibilidad
Public ListClientes() As Clientes
End Class
<Serializable()> _
Public Class Clientes
Public Tipo As String
Public Nombre As String
Public CantidadCli1() As Clientes1
Public CantidadCli2() As Clientes2
Public CantidadCli3() As Clientes3
End Class
<Serializable()> _
Public Class Clientes1
<XmlAttribute()> _
Public NumeroCli1 As Integer
<XmlAttribute()> _
Public EdadCli1 As String
End Class
<Serializable()> _
Public Class Clientes2
<XmlAttribute()> _
Public NumeroCli2 As Integer
<XmlAttribute()> _
Public EdadCli2 As String
End Class
<Serializable()> _
Public Class Clientes3
<XmlAttribute()> _
Public NumeroCli3 As Integer
<XmlAttribute()> _
Public EdadCli3 As String
End Class
y esto es lo que trato de hacer...
ReDim Preserve PeticionServicio.ListClientes(1)
Dim xx As New ServicioWeb.Clientes
xx.Tipo= "Adulto"
xx.Nombre= "Pepe"
xx.CantidadCli1(0).NumeroCli1 = 2
xx.CantidadCli1(0).EdadCli1 = ""
xx.CantidadCli2(0).NumeroCli2 = 1
xx.CantidadCli2(0).EdadCli2 = ""
xx.CantidadCli3(0).NumeroCli3 = 0
xx.CantidadCli3(0).EdadCli3 = ""
ServicioWeb.ListClientes(1) = xx
Me da un error en xx.CantidadCli1(0).NumeroCli1 = 2 indicando, "referencia a objeto, no establecida como instancia del objeto"..
Alguien me pude echar un cable???
Muchas gracias desde ya.. Saludos a todos.
