Visual Basic - ayuda con fotos

Life is soft - evento anual de software empresarial
   
Vista:

ayuda con fotos

Publicado por josemiguel (2 intervenciones) el 09/08/2008 20:25:51
hola atodos en este foro estoy haciendo un programa y me gustaria que mostrara fotos alguien sabe como le aria para poner una coleccion de 50 fotos o mas
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda con fotos

Publicado por adolfo (23 intervenciones) el 09/08/2008 23:15:35
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0 'Addnew
dataContactos.Recordset.AddNew
Case 1 'Carga Bmp
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
Picture1.Picture = LoadPicture(CommonDialog1.FileName)
End If
End Select
End Sub

Private Sub Form_Load()
'Ajusta el DataControl
dataContactos.DatabaseName = App.Path & "Bd-Foto 97.mdb"
dataContactos.RecordSource = "CONTACTOS"
End Sub

este codigo lo encontre con el maestro guille en elguille.info
creo que sirve checalo

oye LOLO solo dame una idea
si por ejemplo yo quisiera mostrar las fotos de una boda las de un bautizo las de un cumpleaños como le haria para que no se intercalaran es decir

si hago una busqueda y digigo muestrame solo las fotos de la boda que solo me aparecieran las de la boda y asi sucesivamente sale saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ayuda con fotos

Publicado por josemiguel (2 intervenciones) el 09/08/2008 23:18:36
ok funciona de maravilla gracias adolfo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ayuda con fotos

Publicado por igor (633 intervenciones) el 10/08/2008 13:04:21
A mi se me ocurre que utilices varios picture, un array por ejemplo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar