Oppure

Loading
18/09/09 10:40
muteblaster
e' da qualche giorno che sto' facendo un po' di esperimenti con text e rich (box)......
e volevo ottenere che alla pressione di un bottono del mouse si selezionasse l'inera riga e non solo una parola....
aveve idea di come si possa fare?
aaa
18/09/09 10:59
mash_mash
prova così

Private Sub txt(tuonome)_GotFocus()

txt(tuonome).SelStart = 0
txt(tuonome).SelLength = Len(txt(tuonome))

End Sub

aaa
18/09/09 11:25
muteblaster
questo mi seleziona l'intero testo e non solo la linea che vorrei.....
puo' andar bene se il text e' a singola linea ma se e' multiline mi ritrovo selezionate tutte le linee

selstart = 0 parto dall'inizio del text e con len(text) vado fino alla fine ma non della riga me dell'intero test.....

aaa
18/09/09 11:49
mash_mash
"intera riga e non una parola" cito il tuo testo per me significa che tu hai una riga da selezionare .
Comunque adesso guardo come posso aiutarti.
aaa
18/09/09 13:15
mash_mash
private sub cmd.click()
dim i as integer
i = InStr(txttuonome,vbCrLf)
If i > 0 then
txttuonome.SelStart = 0
txttuonome.SelLenght = i - 1
end if
End Sub
aaa
19/09/09 5:26
muteblaster
anche facendo cosi' non concludo nulla ,....bella la idea di rilevare le vbcrlf, ma la funzione instring rileva solo il primo andar a capo poi si ferma......comunque ci penso su questa idea

grazie dell'aiuto....
aaa
19/09/09 13:11
GrG
il codice di mash_mash seleziona la prima riga, invece tu che vuoi fare?
aaa
21/09/09 3:30
muteblaster
vorrei che la intera riga dove io clicco si selezioni......
aaa