Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Gestire il nome di un oggetto tramite variabile... si può ?
Forum - Visual Basic 6 - Gestire il nome di un oggetto tramite variabile... si può ?

Avatar
hemmaus (Normal User)
Pro


Messaggi: 96
Iscritto: 15/07/2009

Segnala al moderatore
Postato alle 23:45
Martedì, 21/07/2009
Ciao miei fidi...
oggi mi trovo nella necessità di impostare all'interno di una funzione una variabile del tipo string che ha lo stesso nome del label che devo modificare.
Mi spiego meglio con un esempio:

Variabile: Vers as string
Vers=Versione
Label di nome Versione

quello che vorrei fare è dire vers.caption="prova" dove Vers assume il nome dell'oggetto.
Secondo voi è possibile?
sarebbe molto comodo per non ripetere per ciascuna label che deve variare il codice.

Spero di essermi spiegato.
Grazie


PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 0:14
Mercoledì, 22/07/2009
se ho capito vuoi fare una funzione per risparmiare codice... esempio:

Codice sorgente - presumibilmente VB.NET

  1. function Nome(Byval vers as label)
  2. vers.caption = "ciao"
  3. end function
  4.  
  5. private sub form_load()
  6. call Nome(label1)
  7. end sub



PM Quote
Avatar
hemmaus (Normal User)
Pro


Messaggi: 96
Iscritto: 15/07/2009

Segnala al moderatore
Postato alle 11:48
Mercoledì, 22/07/2009
esattamente quello che mi occorreva.
Grazie mille.
Ciao:k:

PM Quote
Avatar
sspintux (Normal User)
Newbie


Messaggi: 8
Iscritto: 22/07/2009

Segnala al moderatore
Postato alle 14:39
Mercoledì, 22/07/2009
Testo quotato

Postato originariamente da hemmaus:

quello che vorrei fare è dire vers.caption="prova" dove Vers assume il nome dell'oggetto.
Secondo voi è possibile?
sarebbe molto comodo per non ripetere per ciascuna label che deve variare il codice.



volendo potresti utilizzare anche la CallByName

Codice sorgente - presumibilmente Plain Text

  1. msgbox callbyname(TuoForm.controls(Vers),"Caption",vbGet)


PM Quote