Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - ThonyMaster

#401
estoy haciendo un programita ya le ice una base de datos sencillito y tiene esto:

un a base datos pequeña q tiene tres registros y los carga en unos text.
tambien tengo un db grid para mostrar la lista de todos los productos juntos y un DBcombo en el q se muestran o se puede elegir los nombres de los productos.
pero necesito saber si hay algun code para q cuando yo seleccione un nombre de los q aparecen en el DB combo me aparezkn los demas registros de ese nombre en un DBlist!!
ejemplo:
mi base de datos es de cornetas!!

en el db combo se muestran los nombres de las cornetas.
-peavey
-Rcf
-cerwin Vega

cuando yo seleccione RCF !!

Me salga:

Vatios: 2000
Marca: RCF
Mdelo: P300

estos 3 registros ya estan en la base de datos solo qiero saber como llamarlos  a la DB list.!!!!

Gracias este foro es muy bueno si me ayudan seria muxo mejor!!!!
#402
Multimedia / Ayuda Con ULEAD STUDIO!!
5 Febrero 2009, 18:59 PM
wenas panas yo estoy empezando hacer videos y necesito saber como exporto mi proyecto en ulead studio pára poder verlo en mi Reproductor de DVD

Gracias!!!
#403
Multimedia / Problema con Movie maker
25 Enero 2009, 20:05 PM
buenas tengo un problemita con el movie maker no me hace nada cuando importo videos o imagenes no corren, osea no se ve el video en la pantallita y los efectos tampoco , no hace nada y cuando trato de instalar otro como mi winxp es pirata da un error con SP2 como hago para repararlo??
#404
pana gracias pero ninguna me ha funcionado!!
#405
como podria hcer esto con el select case!!??????

Código (vb) [Seleccionar]
Private Sub Command2_Click()
  If Val(Text1) = Silverado Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado2 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado3 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado4 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado5 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado5 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado6 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado7 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado8 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado9 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado10 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado11 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
  If Val(Text1) = Silverado12 Then
  Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
  End If
 
End Sub




#406
nada no da igual alguno de ustedes me puede mandar su mail por un privado aver si me ayudan mas rapido estoy desesperado y eso me tiene trancado!!!
tambien nesecito agregar un modulo BAS y no se como se agrega esa cosa!!
#407
okis gracias puse todas las imagenes en la misma carpeta donde esta el programa cosa de cuando yo le de al boton mostrar la llame asi
Código (vb) [Seleccionar]
Private Sub Command2_Click()
Dim carro As String

carro = Val(Text1)
  If carro = Silverado Then
Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
End If


End Sub


pero ahora quiero saber como hacer para cuando yo selecciones otra q nosea la silverado la llame xq no lo hace solo llama esa osea como deberia ser el code!!! porfa
#408
no me voy a complicar mucho lo he echo de esta manera es largo pero weno!!!

Código (vb) [Seleccionar]
Dim carro As String

carro = Val(Text1)

If carro = Silverado Then
Image1.Picture = LoadPicture(App.Path & "\silverado.bmp")
End If

If carro = Aveo Then
Image1.Picture = LoadPicture(App.Path & "\Aveo.bmp")
End If

ahora esto no me llama las imagenes bien xq!!!!!????? solo muestra una o la otra pero cuando escribo aveo no lo muestra o cuando escribo silverado solo muestra el aveo!!!!???
#409
pana soy nuevo asi que si podrias explicarme mas o menos el code!! como seria??????????? gracias
#410
panas estoy haciendo un programita de ventas sencillo esoty utilizando el control data y db grid para guardadr los registros de los carros existentes entonces necesito saber como hago para q cuando yo seleccione un carro se ponga en picture la foto del carro.
me explico mejor alguien qiere comprar un carro me dice el nombre yo lo pongo en sistema le doy a buscar y me sale la foto del carro en un picture nos e si me entienden??