Visualizza wikitesto di Sovrascrivere mediante nuovi caratteri i caratteri già presenti in un TextBox

Se si prova a sovrascrivere dei caratteri su caratteri già presenti in un ''TextBox'', tale effetto non si produce; ma i caratteri già presenti nel ''TextBox'' verranno spostati a destra men mano che si inseriscono i nuovi caratteri.

Per ottenere questa modalità di sovrascrittura, capace di sostituisce i caratteri già presenti in un ''TextBox'' con nuovi caratteri immessi mediante la tastiera, si può adottare questa semplice linea di codice all'interno della routine scatenata dall'evento ''_KeyPress()'' dell'oggetto ''TextBox'':
 If Key.Code < 220 Then TextBox1.Select(TextBox1.pos, 1)


Mostriamo un esempio pratico:
 '''Public''' Sub Form_Open()
  
  TextBox1.Text = "Questa è una prova."
  
  TextBox1.Pos = 0
   
 '''End'''
 
 
 '''Public''' Sub TextBox1_KeyPress()
  
  If Key.Code < 220 Then TextBox1.Select(TextBox1.Pos, 1)
   
 '''End'''