-
I am trying to print a long string of characters (100 bytes or more) stored in a database. The problem that I am having is that I want 30 or so characters to print in a certain section on the page.
Code:
Printer.Print txtInk1(0).Text;
If the length of the characters in thetext box is greater than 30, break on the next line. If it is greater than 60, break again....
This should be easy, but I am tired being that I stayed up late to watch the Yankees. Thank You.
-
Code:
Dim i As Long
Dim strTemp As String
Dim LineSize As Long
LineSize = 30
For i = 1 To Len(txtInk1(0).Text) Step LineSize
strTemp = Mid$(txtInk1(0).Text, i, LineSize)
Printer.Print strTemp
Next i
-
Thank You Mr. Shikadance. That work exactly like I wanted it to.