[VB 6] RichText Box

[ale500]

salva...ho un problema con l'utilizzo delle rchtext box ed in particolare ho problema per colorare le singole frasi...

stò facendo una semplice chat dove vi una textbox che registra tutto quello ch3e i 2 utenti si sono detti...

in verde quello che ha detto l'utente A ed in rossoche ha detto l'utente B...il problema è che invece che colorarmi le singole grasi ogni volta mi colora tutto o quasi...come posso fare

questo èil posto ed i parametri per richiamare la funzione del colore

    A = Len(txtChat.Text) - Len(strData)
    B = Len(strData)
    Call Colora(A, B, True)

e questa è la funzione colora

Private Sub Colora(Inizio As Long, Lunghezza As Long, Colore_Verde As Boolean)
    With txtChat
        .SelStart = Inizio
        .SelLength = Lunghezza
        If Colore_Verde = True Then
            .SelColor = Verde
        Else
            .SelColor = Rosso
        End If
    End With
End Sub

dove è che sbaglio???

aiuto???

se non capite il codice fatemelo sapere, ciao e grazie!

[ale500]

aiutatemi...vi prego...

che codice usate voi per "colorare" singole parole o frasi???

[FinalFantasy]

A posto di Rosso e Verde metti vbRed e vbGreen. Poi se cerki vekki post miei (di almeno 5-6 mesi fa) ci sn maggiori dettagli

[ale500]

il problema non stà li....

Rosso e Verde sono delle costanti che ho definito personalmente per comodità!!!

come fai tu a colorare solo una parte del testo

[FinalFantasy]

te lo detto...cercati sto post

[ale500]

mannaggia li pescetti.....

non lo riesco a trovare...

qualcuno potrebbe aiutarmi...grazie.