Buenas estoy intentando simplificar este código, en concreto lo que aparece entre comentarios. El código me funciona pero deseo reprentar los datos mediante una lista en una sola línea, o tupla como lo llaman... estoy probando con {} tal y como lo hago con los array o matrices, pero no doy con ello, alguna sugerencia. Gracias y salu2
Private Structure Cord
Public X, Y as Integer
End Structure
Private Structure Obj
Public PosA as Cord
Public PosR() as Cord
End Structure
Private Obj1 As Obj ' Declaramos un Objeto de la estructura Obj
ReDim Obj1.PosR(2) ' Definimos la matriz de la estructura a 3 valores
' -------- Esto funciona, deseo simplificar algo estilo
' Obj1 = { {10, 20}, { {5, 3}, {7, 9}, {1, 4} } }
Obj1.PosA.X = 10 : Obj1.PosA.Y = 20
Obj1.PosR(0).X = 5 : Obj1.PosR(0).Y = 3
Obj1.PosR(1).X = 7 : Obj1.PosR(1).Y = 9
Obj1.PosR(2).X = 1 : Obj1.PosR(2).Y = 4
' ----------------------------------------
' Representar esta parte mediante una línea, tupla o como se haga en
' Visual Basic 2013
Procedimiento(Obj1) ' Pasar el procedimiento con el Objeto