Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
En el Explorador de soluciones, seleccione Form1 y <strong>en</strong> el m<strong>en</strong>ú Ver,<br />
seleccione Diseñador.<br />
En el Cuadro de herrami<strong>en</strong>tas, arrastre cuatro controles TextBox, un control<br />
CheckBox y dos controles Button al formulario.<br />
Seleccione el primer control Button y <strong>en</strong> la v<strong>en</strong>tana Propiedades establezca su<br />
propiedad Text <strong>en</strong> Update .<br />
Seleccione el segundo control Button y <strong>en</strong> la v<strong>en</strong>tana Propiedades establezca su<br />
propiedad Text <strong>en</strong> Full Name .<br />
Haga doble clic <strong>en</strong> el primer botón (Update) para abrir el Editor de código y <strong>en</strong><br />
el controlador de ev<strong>en</strong>tos Button1_Click, agregue el sigui<strong>en</strong>te código.<br />
<strong>Visual</strong> <strong>Basic</strong> Express Copiar código<br />
With person1<br />
.FirstName = Textbox1.Text<br />
.MiddleName = Textbox2.Text<br />
.LastName = Textbox3.Text<br />
.BirthYear = Textbox4.Text<br />
.Alive = CheckBox1.Checked<br />
End With<br />
Observe que cuando escribe, se muestra una lista que conti<strong>en</strong>e todos los<br />
miembros de la clase Persons. Puesto que se agregó como una refer<strong>en</strong>cia,<br />
IntelliS<strong>en</strong>se muestra la información sobre la clase tal como lo haría para<br />
cualquier otra clase.<br />
En el controlador de ev<strong>en</strong>tos Button2_Click, agregue el sigui<strong>en</strong>te código.<br />
<strong>Visual</strong> <strong>Basic</strong> Express Copiar código<br />
' Test the FullName method.<br />
MsgBox(person1.FullName)<br />
' test the Age property and CalcAge method.<br />
MsgBox(CStr(person1.Age) & " years old")<br />
' Test the Alive property.<br />
Everts Garay | Granada, Nicaragua| Paseo por <strong>Visual</strong> <strong>Basic</strong> <strong>2008</strong> 124