dado.gif con ocx

[tarimas_gml]

me gustaria k alguien me diera el codigo para hacer un programa en visual basic de un dado que le des click en un boton y k empieze a dar vueltas el dado y te despliegue el resultado en una caja de textooo

[Guan]

   Es pregunta va en deskargas de software, no tiene nada de programacion.. .
Tienes alguna duda sobre un codigo? o kieres ya el prorgama exo por otro?

Saludos

[zXxOsirisxXz]

Hola..

Usa este codigo para lo del numero random.. lo de moverse el dado no lo se.. creo k es MacromediaFlas h, tendrias k unir ambos programas me parece.


Agrega:

1 Command Buttom O la imagen del dado
1 textbox

Codigo:

Public Function Rand(ByVal Low As Long, _
                     ByVal High As Long) As Long
  Rand = Int((High - Low + 1) * Rnd) + Low
End Function

Private Sub Command1_Click() 'O bien enves del command button podria ser la imagen del dado
Randomize
dado = Rand(1, 6)
if dado = 1 then text1 = 1
if dado = 2 then text1 = 2
if dado = 3 then text1 = 3
if dado = 4 then text1 = 4
if dado = 5 then text1 = 5
if dado = 6 then text1 = 6
end sub

Espero que te alla servido de algo.

[Guan]

lo de moves el dado es hacer 6 imagenes con el numero de cada lado en cad auna, y con un timer de unos 500 milisegundos ir cambiando la imagen, cuando ya tienes el numero aleatorio, paras el timer de movimiento, y fijas la imagen dependiendo del numero