Replacing Multiple vbNewlines

[Jackkkkk]

Hi, i'm trying to replace multiple vbnewline's as to only allow two vbnewline's in my textbox. I sort of have a idea how i could do it by counting each instance of vbnewline that appears in my string and then replacing them with only two vbnewline's. But the problem is how could i duplicate the vbnewline sub string using a integer value to match the number of instances found in the string, something simmilar to the string() function.