Oppure

Loading
18/03/08 9:26
decka88
ciao
esiste un modo per sapere quale form ha richiamato una data procedura?
grazie
aaa
18/03/08 12:43
Scusa cosa hai detto?

Non ho capito di cosa hai bisogno e cosa stai cercando di fare.

Spiegati meglio:-|:-|
18/03/08 12:52
decka88
si scusa...
praticamente vorrei che una sub ricvonoscesse da quale form ( il form su cui si trova la sub chiamante ) e a seconda del form chiamante far eseguire del codice.
sono stato piu chiaro?
aaa
18/03/08 12:57
LuigiBiasi
ciao in questi casi passi un parametro alla sub in questo modo: 
public sub MiaSub(cmd as integer)
'a seconda del valore di cmd esegui una procedura...
select case cmd
case 1
'esegui una cosa quando cmd vale 1
case 2
'esegui un altra cosa quando cmd vale 1
end select
end sub


adesso quando chiami la sub li passi un parametro 
x esempio in un form
private sub form_load()
MiaSub 1 
end sub
oppure in un command_button
private sub command_click()
MiaSub 2
end sub
ecc...


in questo modo puoi sapere se è kiamata dal form o dal command button, poiche se è chiamata dal form cmd avra valore 1 se è kiamata dal commandbutton avra valore 2 ecc..
Spero di averti dato una mano cosi..
ciao
aaa
18/03/08 13:02
decka88
grazie mille.
però il mio problema è che sto mettendo mano a un software che nn ho creato io.
ora è sorta la necessità di fare delle modifiche e devo impedire, in questo caso, alla form_load di eseguire una parte di codice nel caso venga eseguita quando il form viene mostrato in seguito alla visualizzazione di una tabella...
in tutti gli altri casi il codice va eseguito totalmente..
aaa
18/03/08 13:29
LuigiBiasi
allora o utilizzi il metodo che ti ho postato con una piccola modifica..
Postato originariamente da LuigiBiasi: 
public sub MiaSub(optional cmd as integer =0)
'a seconda del valore di cmd esegui una procedura...
il cmd<>1 then 'cioè nn viene dal form
'codice che non deve essere eseguito se la funzione è chiamata dal form
end if
'codice che viene eseguito in ogni caso
end sub


adesso quando chiami la sub li passi un parametro 
x esempio in un form
private sub form_load()
MiaSub 1 
end sub
questo parametro visto che è opzionale glielo passi solo nella form


oppure usi un flag che di default è inizializzato a 0 invece nel fomr è inizializzato ad uno e nella sub verifichi se questo è 0 non vieni dal form altrimenti si e non esegui le instruzioni...

Ciao..
Ultima modifica effettuata da LuigiBiasi 18/03/08 13:34
aaa