You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
En la v<strong>en</strong>tana Propiedades, seleccione la propiedad Items y haga clic <strong>en</strong> el<br />
botón ....<br />
En el Editor de la colección de cad<strong>en</strong>as, escriba lo sigui<strong>en</strong>te y haga clic <strong>en</strong><br />
Aceptar.<br />
Catcher<br />
First Base<br />
Pitcher<br />
Shortstop<br />
Haga doble clic <strong>en</strong> el control ComboBox para abrir el Editor de código y escriba<br />
el sigui<strong>en</strong>te código <strong>en</strong> el controlador de ev<strong>en</strong>tos<br />
ComboBox1_SelectedIndexChanged.<br />
Copiar código<br />
Dim SelectedPlayer As Persons.Players<br />
SelectedPlayer = team(ComboBox1.SelectedItem)<br />
MsgBox("Playing " & ComboBox1.SelectedItem & " is " & _<br />
SelectedPlayer.FullName & "!")<br />
Presione F5 para ejecutar el programa. Seleccione una posición de la lista<br />
desplegable, aparecerá <strong>en</strong> un cuadro de m<strong>en</strong>saje el jugador para esa posición.<br />
Información detallada: utilizar un bucle For Each...Next <strong>en</strong> una<br />
colección<br />
En esta lección, obt<strong>en</strong>drá información sobre cómo utilizar un bucle For<br />
Each...Next para recorrer una colección.<br />
En una lección anterior, obtuvo información sobre cómo utilizar un bucle<br />
For...Next para ejecutar un bloque de código un determinado número de<br />
veces. Los objetos de la colección de <strong>Visual</strong> <strong>Basic</strong> Expressadmit<strong>en</strong> un tipo<br />
especial de bucle, el bucle For Each...Next, que se utiliza para ejecutar un<br />
bloque de código para cada elem<strong>en</strong>to de la colección, <strong>en</strong> lugar de ejecutar el<br />
bloque un número fijo de veces.<br />
Agregar un bucle For Each... Next<br />
En la lección anterior, agregó manualm<strong>en</strong>te al control ComboBox los valores de<br />
la propiedad Position de los objetos Players <strong>en</strong> la colección de equipos.<br />
Everts Garay | Granada, Nicaragua| Paseo por <strong>Visual</strong> <strong>Basic</strong> <strong>2008</strong> 136