vb6 InkEdit; limit to number of lines/ words/ chars?

[dilettante]

I'm not sure what you tested, but I don't run into any limit:

Private Sub Form_Load()
    Const CHAR_COUNT As Long = 150000
    Dim S As String
    Dim I As Long

    S = Space$(CHAR_COUNT)
    '"Chop it up" into numbered lines:
    For I = 1 To Len(S) - 39 Step 40
        Mid$(S, I, 6) = Format$(CStr(I), "@@@@@@")
        Mid$(S, I + 37, 3) = "|" & vbNewLine
    Next
    'Stick an asterisk at the last character:
    Mid$(S, Len(S), 1) = "*"
    RTB.Text = S
End Sub