Scusa non avevo visto che è per VB6 allora per VB6 metti questo codice all'interno di un command :

If TextBox1.Caption = "a" Then
TextBox2.Caption = "x"
End If

Dovrebbe essere questo , non ho mai provato il VB6 ma credo che sia giusto il codice