Public Sub UsandoClaseContactoOld() Dim c1 As ContactoOld c1 = New ContactoOld("Alberto", "alberto@gmail.com") End