Dato che non ho capito bene la domanda c'è anche questo:
Text1.SelLength = 20