all'interno di una struttura di selezione di una routine "text1_change" dovrei impedire l'inserimento (compreso con il comando incolla) delle lettere(a,b,c...), mentre all'interno di un'altra struttura di selezione, sempre nella stessa routine, dovrei permettere l'inserimento di lettere.

ho provato con la funzione replace, ma diventa lunghissimo, contando che per ogni replce devo fare una struttura di selezione per spostare selstart nel punto giusto, infatti per ogni replace devo fare:

codice:
    
Text1.SelLength = Len(Text1.text)
Sel = Len(Text1.SelText)

    If Replace(txtDati.Text, "A", "") Then

        txtDati.Text = Replace(txtDati.Text, "A", "")
        Sel = Sel - 1

    End If 

If Sel <= 0 Then
    Text1.SelStart = Len(Text1.text)
Else
    Text1.SelStart = Len(Text1.text) - Sel
End If
c'e un metodo più semplice? che sicuramente io ignoro?