[JUEGO] Pong! XD

[79137913]

HOLA!!!

Bueno, aca tengo otro juego mas (lo que es estar aburrido).

Pong, se mueven con arriba y abajo.

Para cambiar la dificultad cierran y vuelven a abrir.

Captura:


Descargar URL:
http://www.mediafire.com/?c2mqmsl29lqss0y

Bueno, solo eso.

P.D: TIENE UN BUG, NO ESCRIBAN NADA EN EL COMBO SOLO SELECCIONENSolucionado

ADD: @Seba: Ya agregue las sangrias

GRACIAS POR LEER!!!

[CAR3S?]

Muy bueno fran! ^^

[Martin-Ph03n1X]

un bug xD   o una webad xD
hahahhh oye ya lo estoy bajando como pongo play ?

[CAR3S?]

un bug xD   o una webad xD
hahahhh oye ya lo estoy bajando como pongo play ?

LO MISMO QUE PREGUNTE AJAAJJA, fijate q dice "inicio"

[Martin-Ph03n1X]

a ya vi
inicias dando click en inicio pero nunca pierdes xD

[Edu]

Jejeje el link me baja el source o el compilado? estaria bueno arreglar esos bugs.
Te aburres si xD

[Martin-Ph03n1X]

puntos 15 =(

[Martin-Ph03n1X]

cuanto tardaste programando esto man?

[79137913]

HOLA!!!

[BUG ARREGLADO Y LINK ACTUALIZADO]

En el link esta el source y el exe.

No, nunca perdes y nunca ganas.

Tiempo... 25 minutos.

[ME FUI A LA PILETA!!!!!]

GRACIAS POR LEER!!!

[Psyke1]

Me gusta la idea!
Buen trabajo, aún así el SRC es mejorable.

Un pequeño ejemplo:

Código (vb) [Seleccionar] Expandir

If Combo1.Text = "Facil" Then
Vert = 100
ElseIf Combo1.Text = "Normal" Then
Vert = 200
ElseIf Combo1.Text = "Dificil" Then
Vert = 300
End If

Te lo dejo en una línea:

Código (vb) [Seleccionar] Expandir

Vert = Choose(Combo1.ListIndex + 1, 100, 200, 300)

P.D: TIENE UN BUG, NO ESCRIBAN NADA EN EL COMBO SOLO SELECCIONEN

Para corregir eso únicamente tienes que cambiar la propiedad Style de tu combo a :

Código [Seleccionar] Expandir

2 - Dropdown List

DoEvents!