mUY INTERESANTE tu explicación, como siempre hay gente que no sabe otra cosa que molestar, su cabeza no les da para más. Espero sigas sacando más videos de visual. saludos
OPTIMUS GT, no conseguí el código fuente, pero gracias a tu ilustrativo y didáctico vídeo, pude recrear completamente el código en visual basic 6.0 y funcionó perfectamente. Algunas modificaciones muy pequeñas fueron implementadas con el propósito de personalizarlo a mis necesidades. Debo aclarar que soy un principiante y gracias a tu vídeo me relacioné un poco con la sintaxis de visual basic. Gracias por todo. un Abrazo
Baaaa.... Ignoralos DALEJRIOS personas como ellos no valen la pena, ademas te agradesco el video me ha sido de ayuda me has salvado de un apuro gracias
gracias amigo por el aporte me sirvió para un proyecto. un detalle al momento de darle doble clic a la misma imagen lo toma en cuenta como acierto.pero ya resolví ese detalle te lo agradesco (Y)
Reconozco que no es muy potente pero tiene la simplicidad para que una persona principiante inicie y aunque no lo creas hay varios softwares comerciales que se han hecho con este lenguaje. Depende para que utilices el lenguaje, si utilizas C para aplicaciones sencillas es como matar una mosca con una bazuca :)
Podrías hacer un vídeo con el vasic, de como crear un programa de tipyng o un programa para aprender a tipear, siempre quise hacer uno, pero en todos los videos no hallé el que busco, gracias me suscribí, un abrazo
Hola! Me puedes ayudar? Hay algo que me falta en los mouse_downs que no se que es para que se den vuelta a la imagen, y creo que tengo un error en las subrutina donde compara. arreglos table[20] As Object num[20] As Byte imagen[20] As String carta1 As Byte carta2 As Byte Public Sub Form_Open() Dim c As Byte v_num() 'tablero picture boxes table[0] = p1 table[1] = p2 table[2] = p3 table[3] = p4 table[4] = p5 table[5] = p6 table[6] = p7 table[7] = p8 table[8] = p9 table[9] = p10 table[10] = p11 table[11] = p12 table[12] = p13 table[13] = p14 table[14] = p15 table[15] = p16 table[16] = p17 table[17] = p18 table[18] = p19 table[19] = p20 'repartir imagenes aleatoriamente por el tablero imagen[0] = "mario.png" imagen[1] = "luigi.png" imagen[2] = "peach.png" imagen[3] = "yoshi.png" imagen[4] = "daisy.png" imagen[5] = "bowser.png" imagen[6] = "toad.png" imagen[7] = "walluigi.png" imagen[8] = "wario.png" imagen[9] = "boo.png" For c = 0 To 19 'table[c].picture = Picture[imagen[num[c] - 1]] table[c].picture = Picture["signo.png"] Next End Public Sub v_num() 'declarar variables Dim x As Byte Dim y As Byte Dim times As Byte Print "inicia v_num" 'vector que guarde numeros sin que se repitan While times < 2 For x = 1 To 10 Repeat y = Int(Rnd(0, 19.999)) Until num[y] = 0 num[y] = x Next Inc times Wend Print "termina v_num" For x = 0 To 19 Print num[x], Next Print "" End Public Sub asigna(a As Byte) 'declarar variables Dim band As Byte If band = 0 Then carta1 = a band = 1 Else carta2 = a checa() Endif End Public Sub checa() If carta1 = carta2 Then Message.Info = "Son iguales" Else Message.Info = "Son distintas" Endif End Public Sub p1_MouseDown() asigna(0) If carta1 = carta2 Then carta1.visible = True carta2.visible = True Endif End Public Sub p2_MouseDown() asigna(1) End Public Sub p3_MouseDown() asigna(2) End Public Sub p4_MouseDown() asigna(3) End Public Sub p5_MouseDown() asigna(4) End Public Sub p6_MouseDown() asigna(5) End Public Sub p7_MouseDown() asigna(6) End Public Sub p8_MouseDown() asigna(7) End Public Sub p9_MouseDown() asigna(8) End Public Sub p10_MouseDown() asigna(9) End Public Sub p11_MouseDown() asigna(10) End Public Sub p12_MouseDown() asigna(11) End Public Sub p13_MouseDown() asigna(12) End Public Sub p14_MouseDown() asigna(13) End Public Sub p15_MouseDown() asigna(14) End Public Sub p16_MouseDown() asigna(15) End Public Sub p17_MouseDown() asigna(16) End Public Sub p18_MouseDown() asigna(17) End Public Sub p19_MouseDown() asigna(18) End Espero me puedas ayudar.
Si no te gusta, entonces ¿para qué los miras? hay miles de videos en youtube. Yo subo videos que a muchos les ayudan, a muchos les agradan mis videos, y si a vos no entonces talvez el problema está en vos. Un saludo compadre ;)
una pregunta.. esto me dice error: Private Sub EstablecerImagenesIniciales() Dim I As Integer For I = 0 To 19 Imagen(I).PaintPicture LoadPicture(".\Imagenes\Interrogacion.jpeg"), 0, 0, 1000, 1000 Next me dice q no encuentra el indice o sub y que hago si no tengo imagenbox yo tengo picturebox
disculpa yo trabajo con visual studio 8 y no se como declarar indices en el objeto picturebox... no me sale esa propiedad ... porfa ayudame ... gracias
mmmm no sé que sea la verdad, pero puede que no acceda correctamente a memorias externas, es mejor que las coloque sen el disco duro, si usas windows 7 puede que también tengas problemas con los permisos de windows.
Mano, en la descripción te dejé mi blog: prograbasic.blogspot.com ahi en la seccion de ejemplos (prograbasic.blogspot.com/p/links.html) encuentras el codigo del juego de memoria. Hay varios, escoge el que más te guste :)
disculpa talvez me puedes ayudar indicando donde y en que boton se programa cada cosa? o ayudandome con los codigos te lo agradeceria mucho .. muchas gracias
DISCULPA UNA PREGUNTA PARA LA DIRECCION DE LASIMAGEN INTERROGANTE YO LA GUARDE EN UNA MEMORIA F:\ Imagen(i).PaintPicture LoadPicture("F:\proyecto2\Imagenes\Interrogacion.jpg"), 0, 0, 1000, 1000 PERO DICE QUE NO EXISTE :/ QUE HAGO??????
como estas bro espero que bien lo qeu pasa que me mandaron hacer este programa pero tengo un problema nesesito que sea de 8 x8 nose si puedes ayudarme o indicarme como aserlo
hola!! oye necesito me digas como las genero aleatoriamente xfis me urge es entrega final y necesito un buen programa para pasar la materia, o si me mandaras el programa ya hecho pero con codigo explicado mas que mejor para asi yo entender el codigo y al ejecutarlo ver como funciona, de antemano gracias
Estimado al abrir el proyecto me aparece el siguiente mensaje : " Error '76' en tiempo de ejecuciòn: No se ha encontrado la ruta '\Imagenes\Interrogacion.jpg' y la linea me muestra esta al depurar; Imagen(i).PaintPicture LoadPicture(".\Imagenes\Interrogacion.jpg"), 0, 0, 1000, 1000 Gracias amigo
Hola de nuevo, oye descargue tu programa de generar memorama con los picturebox desde el codigo y aleatoria las imagenes pero tengo problema al comprender todo el codigo, igual lo subi a tu grupo de facebook pero me pudieras ayudar con comentarlo para comprenderlo, puedes enviarmelo por facebook soy mary mendoza y casi lo acabo de publicar porfis porfis ayudame!!!
hola amigo saludos y felicitaciones aun estas en este canal podrías apoyarme en este proyecto? como le puedo quitar el mensaje correcto e incorrecto y poner un timer que dure 3 segundos para regresar las cartas? muchas gracias espero tu apoyo saludos...
hola amigo... disculpe le queria pedir si puede subir un video de memoria asi igual a este pero en visual 2008 xfavor lo necesito urgente .. muchas gracias de antemano
OYE PUEDES VOLVER A SUBIR EL CODIGO DEL JUEGO DE MEMORIA A OTRO SERVIDOR...PARA PODER DESCARGARLO...YA TU SABES QUE PASO CON MEGAUPLOAD....ME AYUDARIA MUCHO SI LO HICIERAS....GRACIAS POR EL VIDEO.
Hey amigo me muestra un error "Establecer datos iniciales" e indica imagen porque su a ti te corre bien xfavor me suscribiré si me ayudas cn ese pequeño problema.
xfa me puedes ayudar con el programa para basarme que tengo q hacer un proyecto....gracias de antemano o talvez alguien me puede ayudar con el programa... :p
oye ocupo urgente mente el codigo de este video en verdad lo ocupo antes de el viernes si me pudieras dar tu face i me lo podrias mandar por ahi porfaaaaaaaa seria un examen este trabajo
Si no sabes como hacer eso busca un tutorial más básico, estás buscando como hacer un juego de memoria sin saber siquiera cambiar el nombre a los botones, es como que yo quisiera conducir un auto de carreras si estoy aprendiendo a manejar. Saludos.
mUY INTERESANTE tu explicación, como siempre hay gente que no sabe otra cosa que molestar, su cabeza no les da para más. Espero sigas sacando más videos de visual. saludos
OPTIMUS GT, no conseguí el código fuente, pero gracias a tu ilustrativo y didáctico vídeo, pude recrear completamente el código en visual basic 6.0 y funcionó perfectamente. Algunas modificaciones muy pequeñas fueron implementadas con el propósito de personalizarlo a mis necesidades. Debo aclarar que soy un principiante y gracias a tu vídeo me relacioné un poco con la sintaxis de visual basic.
Gracias por todo. un Abrazo
estoy tratando de aprender VB,,,y tu explicas muy bien gracias por el video men
Am gracias dejame checarlo!! Y sigue asi con tus videos he nos sirven de mucho!! Pero explica mas a detalle xfa digo para nosotros principiantes
+Mary Mendoza muchas gracias, regresaré a hacer videos, por falta de tiempo no he podido pero tomaré en cuenta tus sugerencias, gracias :)
Muchas gracias compadre, me alegra ke te haya gustado =D y pronto espero sacar más videos :)
de nada :) me alegra que te haya gustado y servido :)
Baaaa.... Ignoralos DALEJRIOS personas como ellos no valen la pena, ademas te agradesco el video me ha sido de ayuda me has salvado de un apuro gracias
Sos un genio!! Me sirvio mucho!!! Muchas gracias!!!!!
gracias amigo por el aporte me sirvió para un proyecto. un detalle al momento de darle doble clic a la misma imagen lo toma en cuenta como acierto.pero ya resolví ese detalle te lo agradesco (Y)
Hola Alex Cómo pudo resolver ese detalle?
Reconozco que no es muy potente pero tiene la simplicidad para que una persona principiante inicie y aunque no lo creas hay varios softwares comerciales que se han hecho con este lenguaje. Depende para que utilices el lenguaje, si utilizas C para aplicaciones sencillas es como matar una mosca con una bazuca :)
Claro con gusto, en un tiempo veré si saco uno, ahora no creo poder ya que estoy bastante ocupado pero en cuanto pueda lo subo.
jejeje de nada mano, me alegra haber ayudado :)
muchas gracias por el video, espero me sirva =) saludos!
Gracias, me alegra que te hayan gustado :)
Podrías hacer un vídeo con el vasic, de como crear un programa de tipyng o un programa para aprender a tipear, siempre quise hacer uno, pero en todos los videos no hallé el que busco, gracias me suscribí, un abrazo
me gusto mucho eres un genio
muchas gracias :)
puedes colocar en el evento clic una instrucción para deshabilitar la imagen.
Hola! Me puedes ayudar? Hay algo que me falta en los mouse_downs que no se que es para que se den vuelta a la imagen, y creo que tengo un error en las subrutina donde compara.
arreglos
table[20] As Object
num[20] As Byte
imagen[20] As String
carta1 As Byte
carta2 As Byte
Public Sub Form_Open()
Dim c As Byte
v_num()
'tablero picture boxes
table[0] = p1
table[1] = p2
table[2] = p3
table[3] = p4
table[4] = p5
table[5] = p6
table[6] = p7
table[7] = p8
table[8] = p9
table[9] = p10
table[10] = p11
table[11] = p12
table[12] = p13
table[13] = p14
table[14] = p15
table[15] = p16
table[16] = p17
table[17] = p18
table[18] = p19
table[19] = p20
'repartir imagenes aleatoriamente por el tablero
imagen[0] = "mario.png"
imagen[1] = "luigi.png"
imagen[2] = "peach.png"
imagen[3] = "yoshi.png"
imagen[4] = "daisy.png"
imagen[5] = "bowser.png"
imagen[6] = "toad.png"
imagen[7] = "walluigi.png"
imagen[8] = "wario.png"
imagen[9] = "boo.png"
For c = 0 To 19
'table[c].picture = Picture[imagen[num[c] - 1]]
table[c].picture = Picture["signo.png"]
Next
End
Public Sub v_num()
'declarar variables
Dim x As Byte
Dim y As Byte
Dim times As Byte
Print "inicia v_num"
'vector que guarde numeros sin que se repitan
While times < 2
For x = 1 To 10
Repeat
y = Int(Rnd(0, 19.999))
Until num[y] = 0
num[y] = x
Next
Inc times
Wend
Print "termina v_num"
For x = 0 To 19
Print num[x],
Next
Print ""
End
Public Sub asigna(a As Byte)
'declarar variables
Dim band As Byte
If band = 0 Then
carta1 = a
band = 1
Else
carta2 = a
checa()
Endif
End
Public Sub checa()
If carta1 = carta2 Then
Message.Info = "Son iguales"
Else
Message.Info = "Son distintas"
Endif
End
Public Sub p1_MouseDown()
asigna(0)
If carta1 = carta2 Then
carta1.visible = True
carta2.visible = True
Endif
End
Public Sub p2_MouseDown()
asigna(1)
End
Public Sub p3_MouseDown()
asigna(2)
End
Public Sub p4_MouseDown()
asigna(3)
End
Public Sub p5_MouseDown()
asigna(4)
End
Public Sub p6_MouseDown()
asigna(5)
End
Public Sub p7_MouseDown()
asigna(6)
End
Public Sub p8_MouseDown()
asigna(7)
End
Public Sub p9_MouseDown()
asigna(8)
End
Public Sub p10_MouseDown()
asigna(9)
End
Public Sub p11_MouseDown()
asigna(10)
End
Public Sub p12_MouseDown()
asigna(11)
End
Public Sub p13_MouseDown()
asigna(12)
End
Public Sub p14_MouseDown()
asigna(13)
End
Public Sub p15_MouseDown()
asigna(14)
End
Public Sub p16_MouseDown()
asigna(15)
End
Public Sub p17_MouseDown()
asigna(16)
End
Public Sub p18_MouseDown()
asigna(17)
End
Public Sub p19_MouseDown()
asigna(18)
End
Espero me puedas ayudar.
Si no te gusta, entonces ¿para qué los miras? hay miles de videos en youtube. Yo subo videos que a muchos les ayudan, a muchos les agradan mis videos, y si a vos no entonces talvez el problema está en vos. Un saludo compadre ;)
Gracias bro por dejar que podamos descargar el juego :)
pasame el link del juego o archivo
buen video!! me puedes ayudar haciendo una con imagenes aleatorias y usando el comtralador timer......esto en visual basic 2008 o 2010
una pregunta.. esto me dice error:
Private Sub EstablecerImagenesIniciales()
Dim I As Integer
For I = 0 To 19
Imagen(I).PaintPicture LoadPicture(".\Imagenes\Interrogacion.jpeg"), 0, 0, 1000, 1000
Next
me dice q no encuentra el indice o sub y que hago si no tengo imagenbox yo tengo picturebox
Muy buen video... muchas gracias
hola podrías decirme ´por favor cómo le pongo el identificador a las imágenes
disculpa yo trabajo con visual studio 8 y no se como declarar indices en el objeto picturebox... no me sale esa propiedad ... porfa ayudame ... gracias
mmmm no sé que sea la verdad, pero puede que no acceda correctamente a memorias externas, es mejor que las coloque sen el disco duro, si usas windows 7 puede que también tengas problemas con los permisos de windows.
Hola , necesito el codigo del juego de memoria, donde lo puedo conseguir ?
hola, el juego de memoria tiene un error, si haces doble click sobre una misma imagen, da el puntaje como correcto, soy programador...
+Mariano Sanchez xfa puedes mandarme el programa
Jajaja
estimado, al hacer dobleclick en la misma imagen aparece el mensaje de ACERTADO.... como puedes correjir ese error????.... gracias
Claro, en prograbasic.blogspot.com en la seccion de ejemplos están los códigos :) elije el que gustes :)
cual es el codigo para mover una ficha ponganle en ta te ti o en ajedrez es q tengo q entregar un trabajo de eso y me quedo la duda para no desaprobar
el programa tiene una falla, doble click en la imagen da como correcto, igual muy bueno el juego
los links de descarga en dropbox ya no sirven
Mano, en la descripción te dejé mi blog: prograbasic.blogspot.com ahi en la seccion de ejemplos (prograbasic.blogspot.com/p/links.html) encuentras el codigo del juego de memoria. Hay varios, escoge el que más te guste :)
disculpa talvez me puedes ayudar indicando donde y en que boton se programa cada cosa? o ayudandome con los codigos te lo agradeceria mucho .. muchas gracias
Jeey Fer en prograbasic.blogspot.com en la sección de Ejemplos están los códigos, ahí puedes descargarlos.
Si necesito el juego osea descargarlo. Dónde lo puedo descargar ?
holaa no me deja descargarlo del blog , se me tilda y no lo abre al archivo , me lo podes pasar por mensaje
DISCULPA UNA PREGUNTA PARA LA DIRECCION DE LASIMAGEN INTERROGANTE YO LA GUARDE EN UNA MEMORIA F:\
Imagen(i).PaintPicture LoadPicture("F:\proyecto2\Imagenes\Interrogacion.jpg"), 0, 0, 1000, 1000
PERO DICE QUE NO EXISTE :/ QUE HAGO??????
como estas bro espero que bien lo qeu pasa que me mandaron hacer este programa pero tengo un problema nesesito que sea de 8 x8 nose si puedes ayudarme o indicarme como aserlo
+juan llerena Brother ya tienes el juego 8x8 :D
yo tam bien lo necesito con ocho damas
pero con lenguaje c no puedes tener interfaz grafica
hola pana quiero que me ayudes me sale un error de la ubicacion de las imagenes como le ago amigo aiudem
hey no me sale codigo en tu blog??
En el blog tengo un codigo hecho en visual basic 2008 :), descargalo :)
muchas gracias
te consulto como puedo pasarlo a visual basic 2008 express
Hola disculpa podrias realizar un tuto en donde expliques como hacer un puzzle con Visual Basic, en verdad me ayudarias mucho... Plisss
Link caido!! Ayudaaa!!
hola!! oye necesito me digas como las genero aleatoriamente xfis me urge es entrega final y necesito un buen programa para pasar la materia, o si me mandaras el programa ya hecho pero con codigo explicado mas que mejor para asi yo entender el codigo y al ejecutarlo ver como funciona, de antemano gracias
+Mary Mendoza prograbasic.blgospot.com en la sección de ejemplos está el código
debes mostrar los códigos mas de cerca por que así no se te entiende nada
Estimado al abrir el proyecto me aparece el siguiente mensaje : " Error '76' en tiempo de ejecuciòn: No se ha encontrado la ruta '\Imagenes\Interrogacion.jpg' y la linea me muestra esta al depurar; Imagen(i).PaintPicture LoadPicture(".\Imagenes\Interrogacion.jpg"), 0, 0, 1000, 1000
Gracias amigo
Hola de nuevo, oye descargue tu programa de generar memorama con los picturebox desde el codigo y aleatoria las imagenes pero tengo problema al comprender todo el codigo, igual lo subi a tu grupo de facebook pero me pudieras ayudar con comentarlo para comprenderlo, puedes enviarmelo por facebook soy mary mendoza y casi lo acabo de publicar porfis porfis ayudame!!!
hola amigo saludos y felicitaciones aun estas en este canal podrías apoyarme en este proyecto?
como le puedo quitar el mensaje correcto e incorrecto
y poner un timer que dure 3 segundos
para regresar las cartas?
muchas gracias espero tu apoyo saludos...
me da el link de su blog gracias
como podria hacer esto en Basic4Android?
me ayudarias con el pseudo-código me ayudarias mucho porfavor
hola amigo... disculpe le queria pedir si puede subir un video de memoria asi igual a este pero en visual 2008 xfavor lo necesito urgente .. muchas gracias de antemano
En mi blog hay un ejemplo en vb2008
o no se me puede dar el link de su blog xfavor??
prograbasic.blogspot.com en la sección de ejemplos :)
Gracias .....me ayuda para crear mi juego
Si mano está en mi blog, prograbasic.blogspot.com en la seccion ejemplos.
OYE PUEDES VOLVER A SUBIR EL CODIGO DEL JUEGO DE MEMORIA A OTRO SERVIDOR...PARA PODER DESCARGARLO...YA TU SABES QUE PASO CON MEGAUPLOAD....ME AYUDARIA MUCHO SI LO HICIERAS....GRACIAS POR EL VIDEO.
cual es la segunda parte de video
hola!
como podria hacer este juego en visual basic 2005?
Me podrías ayudar con la codificación? es para un deber👉👈
broooo
ayudame jajaja se que son 9 años tarde pero dice que no se encuentra la pagina del codigo que hago
me pasarian un trabajo completo de tres en linea y mover esas fichas a la ves
Interesante video... podrias compartirme el codigo
te lo agraeceria
Eso puede pasar cuando tienes un visual basic portable :)
ahi es diferente la programación, entra a mi blog, prograbasic.blogspot.com en la seccion ejemplos hay uno para visual studio 2008
oye me gusto mucho tu programa cree que me lo puedas pasar porfavor
hola amigo podrías subir otra vez el archivo es que se cayo y lo necesito urgentemente muchas gracias
ps fijate que ví y los links están bien, sigue probando y sino te funciona me mandas un mail a dalejrios@hotmail.com y te envío el código
el codigo ya no esta!!!
Si grax ya lo encontre.. Am pero no tienes uno que saque las imagenes aleatorias??
+Mary Mendoza si claro, el otro ejemplo que ahi está genera imágenes aleatoriamente
mmmm ps creo que de la misma manera, talvez varíe un poco pero del 2005 al 6.0 no creo ke varíe mucho
Lamento no haberte contestado, estaré mas pendiente a mi canal.
links caidos :(
Alguien me dice donde puedo ver los pasos
Me mandarias tu seudo-codigo explicado me ayudarias muchismo.
+Sofia Herrera tienes whatsap
no me deja abrir la carpeta
Alguien que me explique como es esto como se hace y todo eso ?
Los links no funcionan
Hey amigo me muestra un error "Establecer datos iniciales" e indica imagen porque su a ti te corre bien xfavor me suscribiré si me ayudas cn ese pequeño problema.
podrias pasarme los comandos?
¡Hola! Alguien tendrá el código para pasarlo?
De nada mano :)
xfa me puedes ayudar con el programa para basarme que tengo q hacer un proyecto....gracias de antemano o talvez alguien me puede ayudar con el programa... :p
tienes el codigo men ?
2:05 "en cambio aquí lo reducí" ? . Creo que no existe esa palabra. Seguro era reduje y te confundiste.
Es el Camtasia Studio :D
alguien tiene este juego con el código que me lo pueda pasar gracias
oye ocupo urgente mente el codigo de este video en verdad lo ocupo antes de el viernes si me pudieras dar tu face i me lo podrias mandar por ahi porfaaaaaaaa seria un examen este trabajo
me pasan el codigo
prograbasic.blogspot.com ahi en la seccion ejemplos están los codigos :)
mandame los codigos
Que extraño, todos los links funcionan bien. Enviame tu correo en un mensaje privado y con gusto te envío el codigo :)
Holla tienes outro link ?
Digo lo mismo :')
amm no hay segunda parte :) es solo este video
Alguien que haya copiado el programa y que le quedara bien?
puerdes poner nuevamente los ejemplos ya no cargan
Al carajo no todos sabemos como iniciar o los nombre de cada boto hubieras iniciado haciendolo no ya hecho
Si no sabes como hacer eso busca un tutorial más básico, estás buscando como hacer un juego de memoria sin saber siquiera cambiar el nombre a los botones, es como que yo quisiera conducir un auto de carreras si estoy aprendiendo a manejar. Saludos.
please translate this tutorial to english
la mala pa todos
no sirven los lik
No explicar bien debes explicar desde l principio