Newsgroup: it.comp.appl.access
Titolo: Verificare controlli vuoti in form (di Alex Baraldi)

Ho preso l'esempio proposto sul SitoComune (3.95) da Alex relativo
all'oggetto.
Non riesco però ad adattarla ad una form "Maschere continue". Mi
servirebbe che evidenziasse gli evenutali campi lasciati vuoti solo dei
record incriminati.
Alex, potresti aiutarmi in questa impresa?
Grazie, anche se ci fossero altri aiuti...
Ciao
Paolo

 wrote in message
news:1123079712.8...@g43g2000cwa.googlegroups.com

Innanzitutto quell'esempio funziona solo sull'evento Prima di Aggiornare
relativamente al Record Corrente ...!
Per fare quello che chiedi tu non serve usare quella tecnica
ma devi usare la Formattazione Condizionale disponibile dalla
versione di A2000 in poi.
Ciao.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Potresti darmi qualche suggerimento in più in merito alla
Formattaizone Condizionale? Non credo di avere ancora nozioni
sufficienti in merito...
Ti ringrazio
Paolo

 Paolo
Sinceramente è abbastanza banale essendo Nativa...!
Seleziona il controllo TextBox dalla modalità struttura
quindi seleziona il menù "Formato"--->"Formattazione Condizionale"
Ora imposta il criterio per il quale desideri che il controllo
venga formattato, nel tuo caso Len(nomecontrollo)=0
Per altri dettagli dai un'occhiata all'Help
Ciao


 Per altri dettagli dai un'occhiata all'Help
Ho interrogato l'Help e visto anche Post precedenti di tale argomento,
ma credo di avere ancora bisogno di aiuto...
A me servirebbe che premendo un button (per registrare il tutto), mi
vengano evidenziati i controlli vuoti dei vari record.
Nella Formattazione Condizionale da menù, non mi propone questa
condizione e inoltre non riesco a capire dove inserire
Len(nomecontrollo)=0 nel mio caso...
Ti ringrazio
Paolo

[CUT]
Ho interrogato l'Help e visto anche Post precedenti di tale argomento,
ma credo di avere ancora bisogno di aiuto...
A me servirebbe che premendo un button (per registrare il tutto), mi
vengano evidenziati i controlli vuoti dei vari record.
Nella Formattazione Condizionale da menù, non mi propone questa
condizione e inoltre non riesco a capire dove inserire
Len(nomecontrollo)=0 nel mio caso...
Ti ringrazio
Paolo
---------
Ciao,
ogni textbox (ogni controllo in generale...), se visualizzi la maschera in 
modalità "disegno", ha una proprietà "nome" ed è tramite essa che viene 
identificato.
Se vuoi controllare la lunghezza di un textbox ed eventualmente 
evidenziarlo -> facendo tutto all'interno dell'eveto click di un pulsante 
puoi scrivere:
 

[CUT]
Private Sub Pulsante_Click()
If IsNull(Me.NomeControllo) Then
  Me.NomeControllo.BackColor = 255
  Me.NomeControllo.SetFocus
End If
End Sub
Il codice come vedi è abbastanza semplice...
Buona giornata
Gaspare 

 wrote in message
news:M0mIe.32596$
2U1.1...@news3.tin.it

Ti devo contraddire.
L'oggetto riguarda una Maschera in visualizzazione Continua
pertanto quanto da te suggerito non và bene, colorerebbe
tutti i Records.
E' d'obbligo la formattazione condizionale, che trovo
estremamente semplice ed intuitivo...!
Non capisco la difficoltà...!
Un esempio Semplice da adattare all'Evento Click ed inserire
in un Ciclo For each...Next per i controlli che devi formattare:
NomeControllo.FormatConditions.Add acExpression, , CRITERIO
'Questa solo se devi modificare il 1° Criterio già esistente
'NomeControllo.FormatConditions(0).Modify acExpression, , NUOVOCRITERIO
NomeControllo.FormatConditions(0).BackColor = vbRed
NomeControllo.FormatConditions(0).ForeColor = vbWhite
L'indice della FORMATCONDITIONS è ZEROBASED
Saluti


[CUT]
Ciao @Alex,
sai benissimo che quando mi "contraddici" va più che bene...così imparo 
qualcosa in più ! ;-)
Non utilizzo sempre "access" per cui spesso le sparo...penso che sia meglio 
di "non partecipare"! :-)
Buona giornata
Gaspare 

Credo che mi sto avventurando in qualcosa di più grande delle mie
conoscenze ad oggi.
Ho fatto dei tentativi con le tue indicazioni, ma non riesco proprio a
farlo funzionare.
Se puoi darmi ancora un suggerimento te ne sarei davvero grato...
Paolo

 Gaspare
Ciao Gaspare.


 wrote in message
news:1123159801.6...@g14g2000cwa.googlegroups.com

Sinceramente mi pare di averti scritto tutto...!
Ora quello che devi fare è impostare un Criterio per le TextBox
alle quali inserire la Formattazione condizionata.
Nel caso fosse solamente UNA il codice che ti ho passato 
è già funzionante e da mettere(opportunamente corretto con i
nomi dei controlli tuoi) nell'EVENTO_CLICK di quel famigerato 
Button da inserire nel Pie di pagina.
Sinceramente non saprei come altro aiutarti.


Ho provato in questo modo, ma...
Private Sub Esci_Click()
For Each ctr In Section(0).Controls
                   If ctr.ControlType = acTextBox Or ctr.ControlType =
acComboBox Then
ctr.FormatConditions.add acExpression, , MioCampo& "=" & Null
ctr.FormatConditions(0).BackColor = vbRed
ctr.FormatConditions(0).ForeColor = vbWhite
End If
Next ctr
End Sub
...dove sbaglio?
Grazie
Paolo

 Paolo
Prova cosě:
ctr.FormatConditions.add acExpression, , MioCampo.Name & "=IsNull"


...continua a darmi: errore di run time '7966' Il numero di condizione
di formato specificato è maggiore del numero di condizioni formato
disponibili...

 disponibili...
Togli l'= dall'espressione ed aggiungi lo Spazio...mi è scappato!
@Alex 


Mi spiace disturbarti oltre modo, ma non ce n'è... ancora non funzia...

 Mi spiace disturbarti oltre modo, ma non ce n'è... ancora non funzia...
Innanzitutto non hai dichiarato la variabile Oggetto ctr
che ovviamente non troverà, presumo tu non stia nemmeno usando
l'option Explicit per le dichiarazioni e che tu non abbia nemmeno
compilato il codice per la ricerca errori.
Private Sub Esci_Click()
   Dim ctr As Access.Control
   For Each ctr In Section(0).Controls   
       If ctr.ControlType = acTextBox Or ctr.ControlType = acComboBox
Then
         ctr.FormatConditions.Add acFieldValue, acNotEqual, Chr(34) &
"IsNull" & Chr(34)
         ctr.FormatConditions(ctr.FormatConditions.count - 1).BackColor
= vbRed
         ctr.FormatConditions(ctr.FormatConditions.count - 1).ForeColor
= vbWhite
      End If
   Next
End Sub
Prova a vedere se funziona, da me va ottimamente..!
Ovvio che se leggi l'Help riesci a capire come adattare
eventuali modifiche della condizione di formattazione.
Saluti


Subito, mi ha funziononato Alex, al contrario di come mi serviva (nel
senso che colorava i campi pieni e non quelli vuoti), ma funzionava...
poi ha ricominciato a darmi il solito errore postato sopra... boh, non
so...
Comunque ti ringrazio per la pazienza e da qui in poi proverò a
cavarmela da solo sull'argomento... non ti voglio più tediare:-)
Saluti
Paolo

 wrote in message
news:1123335655.7...@o13g2000cwo.googlegroups.com

Si devi studiarla un pò meglio.
Modifica questo:
acNotEqual 
in 
acEqual
Ciao
