listbox problem

[ahmed222too]

iam using vb6
i have a listbox that has more than 100000 entries stored in

when i retrieve these elements only 15913 elements be retrieved
here is my code

For j = 0 To List1.ListCount - 1
Print #1, List1.List(j)
Next j

how can i reteieve all the 100000 elements stored in the listbox

[ot1]

maybe you have overflowed the print buffer..where is your commit to printer statement?

maybe this will work...

For j = 0 To List1.ListCount - 1
Printer.print List1.List(j) 'the default printer
Next j

printer.enddoc 'commit to printer

Or you could put the contents in a multiline RTB control, then print like this

Rich1.text = ""
Rich1.multiline = true
For j = 0 To List1.ListCount - 1
Rich1.seltext List1.List(j) & vbcrlf
Next j

Rich1.selprint


------------------------------

iam using vb6
i have a listbox that has more than 100000 entries stored in

when i retrieve these elements only 15913 elements be retrieved
here is my code

For j = 0 To List1.ListCount - 1
Print #1, List1.List(j)
Next j

how can i reteieve all the 100000 elements stored in the listbox