Programación en Visual Basic 2008

Agregue el siguiente código debajo de los métodos existentes.
Visual Basic Express Copiar código
Public Function MiddleInitial() As String
MiddleInitial = Left$(middleNameValue, 1)
End Function
Public Function MiddleInitial(ByVal period As Boolean) As String
MiddleInitial = Left$(middleNameValue, 1) & "."
End Function
En el menú Archivo, elija Guardar todo para guardar el trabajo.
Probar una clase
En esta lección, aprenderá a crear una instancia de una clase para probar la
clase.
En lecciones anteriores, creó una clase Persons y le otorgó propiedades y
métodos. Lo que ha hecho hasta ahora es agregar código, ahora es el momento
de utilizar la clase Persons y asegurarse de que funcione según lo esperado.
Crear una instancia de una clase
Aunque es posible que no se haya dado cuenta, ha estado utilizando clases en
muchas de las lecciones anteriores. Los formularios y controles son en realidad
clases; cuando arrastra un control Button a un formulario, está creando
realmente una instancia de la clase Button.
También puede crear instancias de cualquier clase en el código utilizando una
declaración con la palabra clave New. Por ejemplo, para crear una nueva
instancia de la clase Button, agregará el código siguiente.
Visual Basic Express Copiar código
Dim aButton As New Button
Para utilizar y probar la clase Persons, debe crear primero un proyecto de
prueba y agregar una referencia al módulo de clase.
Inténtelo
Everts Garay | Granada, Nicaragua| Paseo por Visual Basic 2008 122