Hola. Se poco de Visual Basic. Tengo que imprimir varias fotos que estan en distintas carpetas. Para empezar hice un programita muy sencillo em VB pero no logro que ande bien, tal vez ustedes puedan ayudarme.
Private Sub Form_Load()
Dim Matriz(3)
Dim Imagen01 As Picture
Matriz(1) = "c:\fotos\01.jpg"
Matriz(2) = "c:\fotos\02.jpg"
Matriz(3) = "c:\fotos\03.jpg"
For i = 1 To 3
Set Imagen = LoadPicture(Matriz(i))
Printer.PaintPicture Imagen, 450, 450, 1041, 1547
Printer.Print Matriz(i)
Next i
Printer.EndDoc
End Sub
Este codigo para mi tendria que imprimirme las fotos 01,02 y 03, peor solo me imprime la foto 03.jpg y no se a que atribuirlo. Para cerciorarme que el for next anda, hice variar a i, puse el comando Printer.Print Matriz(i) con lo cual se imprimen las tres rutas guardadas en la matriz. No entiendo como es que solo me imprime una sola foto y la ultima. Se me ocurre que imprime lo ultimo que queda en el buffer pero no se y busque informacion y no logro dar con ella. La idea es guardar en una matriz varias rutas de fotos y luego mandarlas por impresora. Pense que era facil pero se me complico. Gracias.
