Newsgroup: it.comp.appl.access
Titolo: Alternare pulsanti e svuota campi

Buongiorno a tutti,
Due quesiti:
1) ho creato un pulsante e con ciň voglio che svuoti il contenuto di tre
caselle di testo:
   base
   Altezza
   Area
2) Se ho due pulsanti  "Calcola" e "Azzera" le cui proprieta che ho
impostato sono:
   per "Calcola" che  č il pulsante predefinito e che č sempre visibile
   per "Azzera"  che  NON č ilpulsante predefinito e che NON č sempre
visibile
Nella maschera il pulsante "Calcola" si sovrappone ad "Azzera" (Cioč
CAlcola copre Azzera)
Quello che voglio fare e che quando premo "Calcola", il tasto "Azzera" si
pone in primo piano rispetto
a "Calcola".
E viceversa quando premo "Azzera" (il cui evento e quello di svuotare le 3
textbox), il Tasto "Calcola" ritorna in pprimo piano.
NB. E' un suggerimento che ho appreso da un esempio "Dov'č quel documento"
trovato sul 
www.sitocomune.it
, ma non riesco a venirne a capo
Qualccuno sa dirmi cosa manca ?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Qualccuno sa dirmi cosa manca ?
Ma cosa manca in cosa?
Hai spiegato un concetto, e nel concetto non manca nulla...
..ma di fatto nel codice cosa hai scritto per non esserne venuto a capo?
Riporta il codice dei due pulsanti e vediamo cosa manca.
Pablitomf


 
gia' pablitomf ti ha spiegato cosa manca ;<)
personalmente avrei fatto cosi'
1) un solo pulsante con etichetta (caption) "Calcola"
2) sul click:
    se etichetta = "Calcola"
	   esegue calcolo
            etichetta = "Azzera"
     altrimenti
            esegue azzera
            etichetta = "Calcola"
     fine se
--
a.cara

 ha scritto nel messaggio news:c67ors$29r$1...@news.newsland.it...

puoi usare l'alternativa di Alessandro Cara, oppure se vuoi mantenere i due pulsanti fai cosě:
pulsante_Calcola_click
'esigue ciň che deve fare
pulsanteCalcola.visible = false
pulsanteAzzera.visible = true
----
pulsante_Azzera_click
'esigue ciň che deve fare
pulsanteCalcola.visible = true
pulsanteAzzera.visible = false
Ciao
Nick


Per quale motivo hai postato lo stesso quesito in un nuovo thread?
Ho gią risposto a questo tuo quesito ieri 21/4/2004 alle ore 18:59
all'interno del del thread che ha per subject "Verificare che MioControllo
non sia vuoto" e che hai aperto sempre ierei alle ore 14:35; se c'č qualcosa
di poco chiaro nelle mia soluzione avresti potuto chiedere spiegazioni
nell'altro thread invece di aprirne uno nuovo.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 nell'altro thread invece di aprirne uno nuovo.
**********************
Scusami se non ho continuato il post ieri ma l'ulimavolta che l'ho
consultato non c'era nulla, o forse sono cecato.
Comunque ora l'ho trovato e ho copiato il codice da te proposto nel'
evento click Calcola, ma mi da errore sulla stringa:
If Me!Calcola.Caption <> "Azzera valori"
non so cosa sia errato !


 Nick
Credo che non possa funzionare. Non č possibile mettere a .visible=false
un controllo che ha lo stato attivo.
--
rgrds
SC



hai ragione, non ci avevo pensato...
bisogna dunque agguiungere tra i due un set focus ad un altro campo...
ciao
Nick

 Nick
Puoi anche spostare prima il fuoco sull'altro pulsante.
Una cosa di questo genere:
Private Sub Comando0_Click()
MsgBox "Pippo0"
Me.Comando1.Visible = True
Me.Comando1.SetFocus
Me.Comando0.Visible = False
End Sub
Private Sub Comando1_Click()
MsgBox "Pippo1"
Me.Comando0.Visible = True
Me.Comando0.SetFocus
Me.Comando1.Visible = False
End Sub
Comunque si dovrebbe gestire l'evento anche su "Current" e/o su "Load",
altrimenti, all'apertura della maschera si vedrebbero 2 pulsanti. La
soluzione di A. Cara evita tutto questo.


 non so cosa sia errato !
Mi č rimasto nella tastiera un Then; prova cosě:
If Me!Calcola.Caption <> "Azzera valori" Then
