Proyecto 1 - Numero Magico

Visual Basic sirve para programar juegos, desde los mas sencillos hasta los mas complicados.

para crear un juego de Street Fighter, primero se debe a manejar las herramientas dentro de VB. 

Con el juego 'Numero Magico' podran ver lo mas sencillo de programacion.

Siguiendo este diseño, podemos llamar a la caja de texto 'TxtNum' y a los labels 'LblTit' y 'LblNum'. los botones se llamaran 'CmdJug'  y 'CmdGen' respectivamente.

CODIGO:

Private sub CmdJug_click()

If Val(txtnum) > Val(lblnum) Then

MsgBox "Ingrese un numero Menor", 64, "error"

ElseIf Val(txtnum) < Val(lblnum) Then
MsgBox "ingrese un numero Mayor", 48, "error"
ElseIf Val(txtnum) = Val(lblnum) Then
MsgBox "Ganasteeeeeeeee!!!!!", 32, "Numero magico"
End
End If
End Sub
-------------------------------------------------
Private sub CmdGen_click()
randomize

LblNum =Int((Rnd*20)+1)

CmdGen.enabled = false

CmdJug.enabled = false

end sub

----------------------------------------------------

El objetivo de este juego es adivinar el numero que genera la maquina, por eso si TxtNum y LblNum son iguales, el jugador gana.

NOTA, NOTA, NOTA:

Randomize sirve para generar un numero aleatoriamente. 

Val( ) sirve para realizar operaciones con variables.