Ciao Sabrina,
giusto per dare un'alternativa
Me.TuaEtichetta.caption = Choose((Me.TuaEtichetta.caption = "Ciao")+2, "Testo vero", "Testo false"
Piccola spiegazione agli utenti del Forum
Choose permette di scegliere il valore dell'indice del primo argomento, cioè metti il numero della posizione dell'artenativa che vuoi, in questo caso "testo vero", "testo falso".
Ora quella verifica sulla caption restitisce 0 o -1: bene aggiungendo 2 tu hai proprio 1 se vero e 2 se falso.
Il risultato è che hai scritto tutto su di un rigo, cosa sempre auspicabile e sperimenti che gli argomenti di funzioni possono essere anche calcolati.
.. come mi diverto a fare ste cose..
Inviato da Sabrina (DNW TEAM) on 18/02/2008 11.29.01
La tua domanda non è chiara, vuoi cambiare il testo del pulsante quando viene premuto?
Vuoi scrivere del testo in una Label o una Textbox quando il tasto viene premuto?
Per semplicità te le scrivo entrambe, però cerca di essere chiaro nelle richieste e avrai risposte chiare
Trascinati su una maschera access un pulsante di nome Comando0 ed una etichetta di nome Etichetta2
Il codice che segue cambia il testo dell'etichetta e del bottone alla pressione del bottone stesso.
Option Compare Database
Option Explicit
Private Sub Comando0_Click()
If (Me.Etichetta2.Caption = "Nessun Messaggio") Then
Me.Etichetta2.Caption = "Ciao a tutti"
Else
Me.Etichetta2.Caption = "Nessun Messaggio"
End If
If (Me.Comando0.Caption = "Sono Pronto ad essere premuto") Then
Me.Comando0.Caption = "Sono Stato Premuto"
Else
Me.Comando0.Caption = "Sono Pronto ad essere premuto"
End If
End Sub
Inviato da Guido on 15/02/2008 09.57.51
Salve a tutti sono un PRINCIPIANTE come posso
associare un testo alla pressione di un pulsante grazie.
Si accetta qualsiasi aiuto per migliorare
guide comprese
Guido
