Hola, supongamos que la clase
Perro es asi:
Public Class Perro
Private _Nombre As String
Private _Raza As String
Public Sub New()
_Nombre = ""
_Raza = ""
End Sub
Public Property Nombre() As String
Get
Return Me._Nombre
End Get
Set(ByVal value As String)
Me._Nombre = value
End Set
End Property
Public Property Raza() As String
Get
Return Me._Raza
End Get
Set(ByVal value As String)
Me._Raza = value
End Set
End Property
End Class
en el formulario podes tener una lista generica (o tambien una coleccion) del tipo
Perro, o sea la collecion va a almacenar objetos de tipo
Perro, y despues podes recorrerla y sacar los datos.
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim vListaPerros As New List(Of Perro)
Dim vPerro1 As New Perro
vPerro1.Nombre = "cachito 1"
vPerro1.Raza = "mestiza 1"
vListaPerros.Add(vPerro1)
Dim vPerro2 As New Perro
vPerro2.Nombre = "cachito 2"
vPerro2.Raza = "mestiza 2"
vListaPerros.Add(vPerro2)
Dim vPerro3 As New Perro
vPerro3.Nombre = "cachito 3"
vPerro3.Raza = "mestiza 3"
vListaPerros.Add(vPerro3)
For Each perrito As Perro In vListaPerros
Debug.
WriteLine("Nombre del Perro: " & perrito.
Nombre) Debug.
WriteLine("Raza del Perro: " & perrito.
Raza) Next perrito
End Sub
End Class
saludos.