Pokud Vám stačí absolutní pozice caretu v textboxu a netrváte na samostatném číslu řádku a sloupce, můžete zkusit
Label1.Text = TextBox1.SelectionStart
Totéž můžete použít i zpětně:
'nastaví caret na začátek textu
textbox1.SelectionStart = 0
' nastaví caret za poslední znak textu
textbox1.SelectionStart = textbox1.Text.Length
' případně cokoliv mezi
|