You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
End Function<br />
<strong>Visual</strong> <strong>Basic</strong> Express Copiar código<br />
Private Function CalcAge(ByVal year As Integer) As Integer<br />
CalcAge = My.Computer.Clock.LocalTime.Year - year<br />
End Function<br />
Modifique el código <strong>en</strong> el procedimi<strong>en</strong>to de la propiedad Age para utilizar la<br />
función privada.<br />
<strong>Visual</strong> <strong>Basic</strong> Express Copiar código<br />
ReadOnly Property Age() As String<br />
Get<br />
' Age = My.Computer.Clock.LocalTime.Year - birthDateValue<br />
Age = CalcAge(birthYearValue)<br />
End Get<br />
End Property<br />
En el m<strong>en</strong>ú Archivo, elija Guardar todo para guardar el trabajo.<br />
Pasos sigui<strong>en</strong>tes<br />
En esta lección, apr<strong>en</strong>dió a agregar métodos públicos y privados a una clase.<br />
Puede obt<strong>en</strong>er más información sobre los métodos <strong>en</strong> Información detallada:<br />
crear varias versiones del mismo método con sobrecarga o puede continuar con<br />
la sigui<strong>en</strong>te lección y apr<strong>en</strong>der a utilizar y probar la clase que creó.<br />
Información detallada: crear varias versiones del mismo método con<br />
sobrecarga<br />
En esta lección, apr<strong>en</strong>derá a agregar a la clase varias versiones de un método.<br />
En la lección anterior, apr<strong>en</strong>dió a agregar métodos a la clase Persons. A<br />
veces hay casos <strong>en</strong> los que un método único no sirve; por ejemplo, es probable<br />
que deba pasar difer<strong>en</strong>tes tipos de datos al método <strong>en</strong> distintas situaciones o<br />
quizá desee devolver formatos difer<strong>en</strong>tes como resultado.<br />
Everts Garay | Granada, Nicaragua| Paseo por <strong>Visual</strong> <strong>Basic</strong> <strong>2008</strong> 120