bucle FOR en un textbox

[davidtcsi]

hola buenas noches, primeramente como estan, espero q esten bien, mi problema radica en una caja de texto, estoy trabajando con visul basic 6.0 y lo que quiero es hacer un buble for en una caja de texto q me vaya contando una serie de cadenas de caracteres, algo haci como si fuera una cajita de tickets ejemplo:

dim i, contar as integer

for i = 1 to contar 'un numero que yo le agrego X por ejemplo 5
Text1.Text = "pedro" + "ARbol de flores" + vbNewLine
next i

lo que quiero es q el nombre "pedro" o lo que yo coloque me apresca en el textbox N cantidad de veces pero con saltos de linea, que se repita, esto lo necesito por q quiero hacer como un ticket de ventas, y como es el mismo ticket no quiero hacerlo N veces sino q con un bucle solo me lo copie N veces en el textbox

eso es lo que necesito gracias y espero su respuesta espro q me ayuden con mi problema. por que por alguna razon q no conosco no me funciona