ritorno variabile da form esterna ad ocx

[liana79]

Ciao a tutti,

Vorrei sapere come impostare il valore di ritorno di una variabile, da una form esterna in un textbox di un ocx.

Mi spiego meglio:
- ho una FormPrincipale che contiene uno o più componenti (uguali) ocx (Mycontrol1,Mycontrol2 ecc).
- Il componente ocx ha un campo textbox ed una label.
-Con DblClick sul campo textbox apro FormRicerca che contiene un elenco. Vorrei che sul dbclick su una riga dell'elenco, il valore della riga venga inserita nella textbox dell'ocx che si trova nella FormPrincipale.

Un vero casino spiegarlo...
Sono giorni che cerco ma non riesco a trovare niente.

Grazie mille
Lia

[Pirelli72]

su una riga dell'elenco....

L'elenco fa parte di un controllo sulla Form FormRicerca?

Se si puoi utilizzare una semplice Function da inserire nella Form FormRicerca così composta:

Dim mySearchText as string

Private Sub myList_DblClick()
mySearchText = myList.Text
End Sub

Public Function MySearch() as String
MySearch = mySearchText 
End Function

poi richiami la suddetta funzione nella FormPrincipale che ti restituisce la riga selezionata.

[liana79]

Grazie,
avevo pensato ad una cosa del genere ma vorrei usare meno codice possibile sulla FormPrincipale.
Conosci un modo per settare il mio oggetto Mycontrol1? mi spiego meglio la FromPrinciple c'è l'ho in una variabile dichiarata Form.
Se dalla FormRicerca imposto varFormPrincipale.MyControl1.textbox = ValoreRigaSelezionata funziona, ma non riesco a passare MyControl1 in una variabile. Ho provato a dichiarare una variabile Object ed anche Control ma non funziona.
Come dovrei settarla secondo te?

grazie ancora
lia

[Pirelli72]

Originariamente inviato da liana79
Grazie,
avevo pensato ad una cosa del genere ma vorrei usare meno codice possibile sulla FormPrincipale.

Pensi che qualche linea di codice in meno possa alleggerire l'esecuzione?????

Conosci un modo per settare il mio oggetto Mycontrol1? mi spiego meglio la FromPrinciple c'è l'ho in una variabile dichiarata Form.
Se dalla FormRicerca imposto varFormPrincipale.MyControl1.textbox = ValoreRigaSelezionata funziona, ma non riesco a passare MyControl1 in una variabile.
lia

Scusa non riesco a capire primo cosa sia MyControl e cosa faccia (ok è un .ocx) e perchè devi passare myControl in una variabile?

Qualche linea di codice che hai buttato giù tanto per capire la situazione?

[liana79]

MyControl1 è il nome del componente ocx inserito nella FormPrincipale.
Cmq ci sono riuscitaaaaaa in questo momento! Cioè, ora passo il valore di mySearchText dalla FormRicerca in una variabile globale che richiamo all'interno dell'activex sul TextBox_GotFocus().
Invece io cercavo di scrivere dalla FormRicerca sulla proprieta text che c'è nel componente.

Mi piacerebbe sempre però capire come potrei dichiarare (tipo) dell'oggetto (componente) MyControl1 in una variabile.

Il componente che cerco di creare è tipo un "text search" praticamente. Dblclick su textbox si apre una finestra con un'elenco. Scegli un valore dall'elenco e lo riporti nel textbox di partenza. Comincia ad essere carino... è il mio primo componente .

graziee

[Pirelli72]

Scusa se te lo chiedo, visto che hai detto

mio primo componente

ma hai proprio la necessità di usare VB6 ?????

[liana79]

Bella domana , cmq si, devo usare vb6 ...