Newsgroup: it.comp.appl.access
Titolo: problema con checkbox

Ciao a tutti
Ho inserito una checkbox nella maschera principale
con evento su attivato, da spuntare solo all'occorrenza.
Il problrma è che quando tolgo la spunta il valore
nella casella di testo non si azzera.
es:
Private Sub CasellaControllo_GotFocus()
Netto = Dettaglio.Form!TxtNetto
End Sub
Grazie per l'aiuto

es:
Private Sub CasellaControllo_GotFocus()
if CasellaControllo then
   Netto = Dettaglio.Form!TxtNetto
else
   Netto=0
end if
End Sub
Grazie per l'aiuto
-- 
Ciao
Geppo 

 Geppo
ciao Geppo
ho questo errore:
errore di run-time 94
utilizzo non valido di null
grazie

ciao Geppo

usa l'evento click e non GotFocus.
Private Sub CasellaControllo_Click()
...ecc
end sub
grazie
prego
-- 
Ciao
Geppo 

 ha scritto nel messaggionews:5a6ab385-0575-4bc9...@l17g2000yqe.googlegroups.com...

grazie
c'è ancora un problemino,
se lascio checkbox spuntata e mi sposto nei record successivi il
valore non si aggiorna,
devo togliere e rimettere la spunta.
Come posso risolvere?

 Come posso risolvere?
utilizzando l'evento current della form:
private sub form_current()
qui inserisci lo stesso codice che hai messo sotto l'evento click del check.
end sub
-- 
Ciao
Geppo 


ciao Geppo
Non solo è come prima, ma ho notato che se
mi sposto nei record successivi la spunta rimane.
Ecco come ho fatto:
Private Sub CasellaControllo_Click()
If CasellaControllo Then
Netto = DETTAGLIO.Form!TxtNetto
Else
    Netto = 0
End If
End Sub
________
Private Sub form_current()
If CasellaControllo Then
Netto = DETTAGLIO.Form!TxtNetto
Else
    Netto = 0
End If
End Sub

End Sub
Ma la casella di spunta è associata?
-- 


come lo vedo?

 End Sub
Scusa, hai ragione, avevo capito un'altra cosa.
Dunque, per fare quello che chiedi, devi creare in tabella un campo di tipo 
check e associarlo al controllo Check sulla form..
-- 
Ciao
Geppo 

 > Non solo come prima, ma ho notato che se

ciao Geppo
ok l'ho creato nella tabella della maschera principale:
tbTestata_fattura
nome campo netto tipo dati Si/No anche se come logica dovevo inserielo
nella sottomaschera: TbDettaglio_Fattura.
Ora se metto la spunta e la tolgo funziona, ma se mi sposto nei
records successivi il valore resta anche senza spunta, devo togliere e
rimetterla per vedere il valore reale.
E se chiudo e riapro la maschera nonostante le spunte il valore è
zero.

[cut]
Come dice Geppo, tu avrai la form basata su una query. SE questo è vero,
allora devi avere un campo si/no anche nella query. SE no, allora hai un'unica
casella di spunta replicata un tot di righe nella form...ma è sempre la
stessa....e quello che chiedi non funzionerà mai.....
-- 

 --
ciao Fair87
no, io ho una maschera con sottomaschera con le rispettive tb:
1-tbtestata_fattura:
idtestatafattura
idcliente
numero(numerofattura)
data(datafattura)
idtipodocumento(fatt,notaaccr)
idesenzioni
datapagamento
netto (rit_acconto)
2-tbdettaglio_fattura
iddettagliofattura
idtestatafattura
iddescrizione
ncolli
quantita
prezzo
iva
sconto
Questo è tutto.


anche avendo inserito quel codice nell'evento current?
-- 
Ciao
Geppo 

 Geppo
Ciao Geppo
ho scritto quello che mi hai detto
Private Sub form_current() ecc. ecc.,
ma non l'ho trovato tra gli eventi come
Private Sub CasellaControllo_Click()
ecc. ecc.
Eventualmente possiamo fare anche diversamente
se puoi aiutarmi.
Allego un link per farti vedere cosa vorrei fare:
http://img600.imageshack.us/i/fattura.jpg/
fare diversamente.


ciao Geppo
ora mi funziona.
l'errore era che non avevo inserito
nella maschera principale
Private Sub form_current().
Volendo aggiungere nella maschera principale
1- Modifica record
2- Salva record
come faccio ad aggiungere:
Private Sub Form_Current()
Me.AllowEdits = False
End Sub
Visto che è già occupato?
Grazie

Grazie
-- 
Ciao
Geppo

 ha scritto nel messaggionews:ada5d4df-2f91-4f28...@32g2000yqz.googlegroups.com...

ciao Geppo
vorrei fare in modo di non modificare involontariamente
le fatture.
Come devo fare per inserire il codice:
Private Sub Form_Current()
Me.AllowEdits = False
End Sub
perchè la maschera principale sia di sola lettura,
visto che ho già una: Private Sub Form_Current()
nella maschera.
Inoltre volevo chiederti;  visto che avevo l'errore: utilizzo non
valido di null all'inserimento di un nuovo record
in Private Sub Form_Current()
ed ho risolto così:
If CasellaControllo = True Then;
la stessa modifica  l'ho fatta anche nell'evento su click().
Ho fatto bene?
Grazie.
grazie

 Grazie.
-- 
Ciao
Geppo 

 Geppo
ciao Geppo
per la sottomaschera devo fare:
     Form_MDettaglio.Form.AllowDeletions = False
altrimenti da errore.
Ma c.que non mi funziona.


Ciao Geppo
ci sono riuscito, ora mi servirebbe un aiuto
per sbloccare la maschera all'inserimento
della nuova fattura.
Grazie


ciao Geppo
Ho fatto così:
Private Sub NuovaFattura_Click()
On Error GoTo Err_NuovaFattura_Click
    DoCmd.GoToRecord , , acNewRec
    Me.AllowEdits = True
    Form_MDettaglio.Form.AllowEdits = True
Exit_NuovaFattura_Click:
    Exit Sub
Err_NuovaFattura_Click:
    MsgBox Err.Description
    Resume Exit_NuovaFattura_Click
End Sub
va bene?
Grazie

 Grazie
prego
-- 
Ciao
Geppo 

 Geppo
grazie Geppo veramente gentile.
Ora ti chiedo se puoi ancora aiutarmi;
perchè vorrei creare una maschera
riepilogativa delle fatture,
con i seguenti nome campo:
cliente
tipodocumento (fatt, nota accr.)
numero(numero documento)
data(data documento)
imponibile
iva
sconto
rit_Acconto
TotNetto
DataPagamento
Grazie.

 ha scritto nel messaggio 
news:d48f6047-c0bb-4dad...@z19g2000yqb.googlegroups.com...
----cut-----
forse e' il caso di aprire un nuovo thread.
-- 
Ciao
Geppo 

 Geppo
ok

 Geppo
Grazie Geppo.
Ho aperto il thread Maschera riepilogativa

 Geppo
ok
Grazie