RE:Como Imprimir 2 listbox con printer
No estoy seguro si quieres imprimir los objetos ListBox o lo que contienen. Si es el contenido lo que te interesa, la respuesta está abajo. Si por el contrario, te interesan los objetos, te ruego me disculpes.
Prueba el siguiente código en un formulario que contenga dos ListBox (List1 y List2) y botón (Command1). Fíjate en el evento Click del botón, ahí está el código que realiza la impresión que, si bien no está muy sofisticado, te puede dar la pauta para realizar una rutina mejor...
Private Sub Command1_Click()
Dim CONT As Integer
For CONT = 0 To List1.ListCount
Printer.Print List1.List(CONT); Tab(10); List2.List(CONT)
Next CONT
Printer.EndDoc
End Sub
Private Sub Form_Load()
Dim CONT As Integer
List1.Clear
List2.Clear
For CONT = 1 To 10
List1.AddItem CStr(CONT)
Next CONT
For CONT = 11 To 20
List2.AddItem CStr(CONT)
Next CONT
End Sub