DEFINIR LAS PROPIEDADES

Defina una propiedad ReadOnly denominada Record como sigue:
Public ReadOnly Property Record() As Double Get Dim played As Integer = Wins + Defeats Return CType(Wins / played, Double) End Get End Property
El método Get devuelve la relación de juego del equipo de béisbol (por ejemplo, si el equipo gana 10 juegos y pierde 10 juegos, su relación es de 0,5).
Para permitir que se lea o cambie el campo Stadium del equipo de béisbol, agregue una propiedad de lectura y escritura denominada Ballpark como sigue:
Public Property Ballpark() As String Get Return Stadium End Get Set(ByVal Value As String) Stadium = Value End Set End Property