Ciao gibra.. grazie per la risposta....
Ho provato a fare come dici te, ma mi da errore run-time 424. Necessario oggetto.
ho eseguito il codice passo a passo ed ho visto che qnd clicco sulla txt_comm, la variabile ActiveTextBox rimane vuota!!! é come se non viene settata e di cobseguenza, qnq clicco nel command mi da errore dicendo necessario oggetto..
questo è il codice:
nel modulo ho dichiarato:
Dim ActiveTextBox As TextBox
Private Sub txt_comm_Click()
Set ActiveTextBox = txt_comm
End Sub
Private Sub Command18_Click()
Dim sValore As String
sValore = "A"
ActiveTextBox.Text = ActiveTextBox.Text & sValore
End Sub
ho cliccato prima sulla txt_comm e non mi ha dato erore, poi ho cliccato sul command e mi ha dato l'errore.....
Anche a me sembra strano, anche perche ho visto un esempio sull msdn pero era vb.net:
http://msdn.microsoft.com/en-us/library/99053c13.aspx
dove fa vedere che è possibile assegnare ada una variabile control, il nome di una text, per poi richiamarla dopo e modificare la proprietà!
![]()