hejsan Dessa funktionerna räknar nog ut det, utan kontroll om raden finns... Radbrytning räknas inte som tecken... red/ lite trött iögonen :)första samt sista tecknet på raden?
finns det någon som har en smart funktion för att få fram det första och det sista tecknet på en rad (jag vet vilken) i en RTB? jag vill alltså inte veta om det är ett a eller b utan vilken possition tecket har i texten.
någon som förstår hur jag menar och vet hur jag löser det?
tack på förhand!Sv: första samt sista tecknet på raden?
<code>
Function getFirst(line As Long) As Long
Dim a() As String, i As Long, pos As Long
a = Split(RTB1.Text, vbCrLf)
For i = 1 To line - 1
pos = pos + Len(a(i - 1))
Next
getFirst = pos + 1
End Function
Function getLast(line As Long) As Long
Dim a() As String, i As Long, pos As Long
a = Split(RTB1.Text, vbCrLf)
For i = 1 To line - 1
pos = pos + Len(a(i - 1))
Next
getLast = pos + Len(a(line - 1))
End Function
</code>
/JohanSv: första samt sista tecknet på raden?
tack så mycket för hjälpen!!