Programación General > Visual Basic para principiantes
Necesito Un Codigo??
shakka:
Ahora que mencionas ADO, te refieres al motor Access Data Object?, porque con lo que dices no se donde lo iras a utilizar. :alien:
Ahora dejame ver si entendi:
Lo que quieres hacer es algo como las maquinillas de los casinos, donde jala una palanca y aleatoriamente al detenerse muestrra en cada casilla un simbolo direfente?
Si es asi:
Necesitaras para generar los # aleatorios Rnd y Randomize.
Para pasarle el foco al sgte. control(textbox) utilizar el metodo .SetFocus
Ahora bien, que has hecho y donde esta el problema :lightsabre:
F_Tanori:
--- Cita de: "shakka" ---Ahora que mencionas ADO, te refieres al motor Access Data Object?, porque con lo que dices no se donde lo iras a utilizar.
--- Fin de la cita ---
ADO no es un motor de base de datos es un metodo de acceso a datos (ActiveX Data Objects)
el motor de la base de datos es por ejemplo para access Microsoft Jet para
MySQL MyIsam,InnoDB etc...
--- Cita de: "Klausja" ---
En Primer lugar es parte de 1 sistema del cual me pidieron ayuda, en segundo lugar se mas o menos como se hace solo que tengo dudas bajo que conceptos debo hacerlo si debo atener activo el "ADO" o alguna otra herramienta lo que mas me va a costar es hacer la parte de las probabilidades.
asi que porfa no es necesario que me regañenen que ya estoy bastante biejo para eso.
--- Fin de la cita ---
y es verdad para tu 'duda' no parece como un sistema parece un programilla :P como una practica escolar, y si ya estas bastante 'biejo' como dices deberias saber que 'biejo' se escribe con V :P y no necesitas ADO para nada en lo que quieres hacer....
mira solo necesitas
3 textbox
1 timer
2 botones (Inicio,Parar)
ahora el control timer tiene una propiedad que se llama Interval (Intervalo cada cuanto se ejecuta en milisegundos)
--- Código: Text --- Private Sub cmdDetener_Click() Me.Timer1.Enabled = FalseEnd Sub Private Sub cmdIniciar_Click() Me.Timer1.Enabled = TrueEnd Sub Private Sub Form_Load() Me.Timer1.Interval = 60 Me.Timer1.Enabled = FalseEnd Sub Private Sub Timer1_Timer()Dim li_Hasta As Integer li_Hasta = 9 Me.Text1 = Int(Rnd * li_Hasta) + 1 Me.Text2 = Int(Rnd * li_Hasta) + 1 Me.Text3 = Int(Rnd * li_Hasta) + 1End Sub
Eso es pensando en que sea como una maquina de casino como lo menciona shakka
Suerte!
Todo en buena onda, cualquier correccion, en este o en cualquier post mio adelante estamos para aprender y compartir :)
shakka:
--- Cita de: "F_Tanori" ---
--- Cita de: "shakka" ---Ahora que mencionas ADO, te refieres al motor Access Data Object?, porque con lo que dices no se donde lo iras a utilizar.
--- Fin de la cita ---
ADO no es un motor de base de datos es un metodo de acceso a datos (ActiveX Data Objects)
el motor de la base de datos es por ejemplo para access Microsoft Jet para
MySQL MyIsam,InnoDB etc...
--- Fin de la cita ---
:P Pues si, eso era lo que debia decir, me equivoque, ya estoy delirando.
Klausja:
gracias por ayudarme a realizar el programa, pero quisiera agregar que el cd de donde instale el vb parece que no venia completo por que ahora me pide el "MSDN" para poder ejecutar el asistente de ayuda que ofrece el vb 6.0 por que el error que me da el sistema es que "es un error de compilacion" no se encontro el metodo o el miembro de datos.
Klausja.
PD: otra cosa que quisiera agregar es que si bien es un sistema sencillo lo necesito para recordar las cosas mas basicas para despues poder realizar sistemas con mayor complejidad y si! es un pequeño sistema que me dieron hace como 3 años atras cuando estudiaba vb 6.0 pero que deje de practicar y lo hago para eso para recordar como programar en vb y en cuanto a lo de biejo :D es solo para evitar regaños a distancia ya que solo tengo 24 años pero desde ya gracias por la ayuda prestada y la que me daran :lol:
albertovicat:
Hola Klausja. Sobre lo que decís del CD de VB, te cuento que las MSDN vienen aparte, en DOS Cds más. Te conviene muchísimo conseguirlas. Te digo que hace ya unos años que programo en VB6 y sigo usando la ayuda a cada rato. Por ahí tiene errores, por ej: te dice que un parámetro va entre paréntesis y resulta que iba así nomás, pero son MUYYYYY útiles.
Suerte. :hola:
Navegación
[#] Página Siguiente
[*] Página Anterior
Ir a la versión completa