frame .f text .f.text pack .f.text pack .f set stringa "ciao come va?" .f.text insert end "$stringa " .f.text insert end "questa stringa e' lunga : [string length $stringa] caratteri " .f.text insert end "il terzo carattere della stringa e' : [string index $stringa 2] " .f.text insert end "parte di stringa : [string range $stringa 4 10] " .f.text insert end "il carattere \"a\" compare per la prima volta nell'elemento [string first a $stringa] "

---

stringhe.tcl