test de punto net

(.NET Framework 3.5)
Definir los campos y constructores
1. Agregue dos campos Private a la clase BaseballTeam de la manera siguiente:
2. Private Name As String
3. Private Stadium As String

4. Agregue dos campos Private más y proporcione los valores iniciales de los campos como sigue:
5. Private Wins As Integer = 0
6. Private Defeats As Integer = 0

7. Modifique elconstructor Public de la clase con el fin de inicializar el nombre del equipo y el estadio:
8. Public Sub New(ByVal Nm As String, ByVal St As String)
9. Name = Nm
10. Stadium = St
11. End Sub

Definir los métodos
1. Agregue un método Public a la clase de la manera siguiente:
2. Public Sub PlayGame(ByVal RunsFor As Integer, _
3. ByVal RunsAgainst As Integer)
4. IfRunsFor > RunsAgainst Then
5. Wins = Wins + 1
6. Else
7. Defeats = Defeats + 1
8. End If
9. End Sub

10. Todas las clases en Visual Basic .NET o Visual Basic 2005 heredan por último las propiedades de una clase base denominada Object. Esta clase define las funciones comunes para todas las clases. Un ejemplo es el método ToString, que devuelve una representación decadena del estado de la clase. Reemplace este método en la clase BaseballTeam como sigue:
11. Public Overrides Function ToString() As String
12. Return Name & ", play at " & Stadium & ": " & _
13. " W" & Wins & " L" & Defeats
14. End Function

Definir métodos sobrecargados
1. Visual Basic .NET y Visual Basic 2005 admiten métodos sobrecargados. Los métodos sobrecargados sonlos que tienen el mismo nombre pero una firma diferente. Defina una enumeración Enum en la clase BaseballTeam de la manera siguiente:
2. Public Enum Result
3. Win
4. Lose
5. End Enum

6. Para definir una versión sobrecargada del método PlayGame que tome como parámetro el resultado de un juego, cree otro método PlayGame como sigue:
7. Public Sub PlayGame(ByVal Res As Result)
8.If Res = Result.Win Then
9. Wins = Wins + 1
10. Else
11. Defeats = Defeats + 1
12. End If
13. End Sub

Definir las propiedades
1. Defina una propiedad ReadOnly denominada Record como sigue:
2. Public ReadOnly Property Record() As Double
3. Get
4. Dim played As Integer = Wins + Defeats
5. Return CType(Wins / played, Double)
6. End Get
7. EndProperty

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).
8. 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:
9. Public Property Ballpark() As String
10. Get
11. ReturnStadium
12. End Get
13. Set(ByVal Value As String)
14. Stadium = Value
15. End Set
16. End Property

Crear y utilizar un objeto
1. Muestre el código de Module1.vb en la ventana Vista Código.
2. En el método Main, utilice el operador New para crear un objeto BaseballTeam. Asigne la referencia de objeto a una variable BaseballTeam local de la manera siguiente:
3. Dim sf AsBaseballTeam = New BaseballTeam("San Francisco Giants", _
4. "Candlestick Park")

5. Agregue el código siguiente para probar los métodos públicos en el objeto:
6. sf.PlayGame(7, 2)
7. sf.PlayGame(BaseballTeam.Result.Lose)

8. Agregue las instrucciones siguientes que ejercen las propiedades del objeto:
9. Console.Out.WriteLine("Record: " &sf.Record)
10. sf.Ballpark = "3Com Park"

11. Muestre el estado actual del objeto, como sigue:
12. Console.Out.WriteLine(sf.ToString())

13. Establezca la referencia de objeto en Nothing para indicar que ya no necesita el objeto BaseballTeam. Esto hace que el objeto esté disponible para la recopilación de elementos no utilizados. (Tenga en cuenta que Visual Basic .NET y Visual...