Código fuente de lotería por tiempo limitado

. Subrutina_ _Ventana de inicio_Primera activación

Establecer semilla de número aleatorio()

Si (número aleatorio (1, 100)=46)

InfoBox("Ganaste la lotería ")

En caso contrario.

Cuadro de mensaje ("Fallaste")

.

Te daré el código fuente detallado cuando responda mañana. Parece que no puedo usar mi PC hoy. . .

Ese teléfono de disco no lo explica. . .